&<img src="../resources/images/opentocr.png" title="Open Contents list" border="0"&>
You are here:

4.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.

&<img src="../resources/images/opentoc-dark.png" title="Open Contents List" border="0"&>