5.3.4 Modifying the Simple Inquiry to Do It All
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.