Versions Compared

Old Version 2

changes.mady.by.user Alejandra Rivera

Saved on

compared with

New Version Current

changes.mady.by.user user-eb51a

Saved on

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

Modify the previous inquiry function to inquiry, addition and deletion of records in the file.

Files Involved

Physical file CUSMST (customer master file)

RDML Program

     GROUP_BY   NAME(#CUSTADD)  FIELDS(

...

#CUSTNO #NAME #ADDL1      
 
     END_LOOP

...

Points to Note:
  • The function supports display, add, maintain and delete of records from the file.
  • Another strategy would be to use two separate functions and use the TRANSFER command to transfer control between them.