Try the special procedure keyword (*PROC) without data type specifications.
dcl-ds PSDS;
Pgm *PROC;
WSID Char10) pos(244);
User char(10) pos(254);
end-ds;
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im
Auftrag von darren@xxxxxxxxx
Gesendet: Wednesday, 18.12 2013 16:51
An: midrange-RPG RPG message board
Betreff: Free form PSDS *PROC
When I'm converting my program status data structure from fixed format to
free form, I expect this to work, but it doesn't. Is there a syntax issue,
or do I just have to specify the position for these keywords?
dcl-ds PSDS;
Pgm char(10) *PROC;
RNF3308: Keyword name is not valid; the keyword is ignored.
WSID char(10) pos(244);
User char(10) pos(254);
end-ds;
Work-around is:
dcl-ds PSDS;
Pgm char(10) pos(1);
WSID char(10) pos(244);
User char(10) pos(254);
end-ds;
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
midrange.com
