CHGSORT *PGM PRODLIB RPG CHGSRTSRC *PGM PRODLIB CLPThese are very old third party objects were part of package purchased in 1998 to convert S36 objects to RPG400. These are still being used to sort file somehow I don't know. If I got the source code of these, these can be rewritten in RPGLE. Please help and advise here.
Discuss This Question: 12  Replies
Creation information: Creation date/time . . . . . . . . . : 09/03/96 14:01:33 Created by user . . . . . . . . . . : PETE System created on . . . . . . . . . : ALC400B Object domain . . . . . . . . . . . : *USER
Is there not any way to encapsulate these objects somehow so that these can be pushed on V7R1.
SORT000690 - source member-
how OPNQRYF file will be on basis this code.
pl help me to build OPNQRYF FILE , I a giving custmast structure here
Kapil, Did you get this resolved?
It appears you have 3 sets of omit statements(O in column 6), followed by 4 sets of include (I in column 6) statements. The A or O in column 7 indicates and AND or OR respectively. For column 7, the A connects the selection statement lines with the previous line while the O starts a new selection logic group. Also, you will need to know what is in those LDA positions referenced by the substring comparisons. The end result of the sort is a file of record address pointers for the records surviving through that selection process and the record addresses allow you to read those CUSTMAST records in ascending sequence based on the data in positions 1 - 10. (Your program reads these addresses and links them to the CUSTMAST records.)