HP RPG/iX Utilities Reference Manual (30318-90006)

5- 287
| O* UPDATE DISK RECORD |
| 10 OCUSTMASTD 02 82 |
| O SSN B 9 |
| O NAME B 35 |
| O ADDR B 71 |
| O ZIP B 80 |
| O PHONE# B 90 |
| O* ADD DISK RECORD |
| O DADD 02 80 |
| O SSN B 9 |
| O NAME B 35 |
| O ADDR B 71 |
| O ZIP B 80 |
| O PHONE# B 90 |
| O* DELETE DISK RECORD |
| O DDEL 01 81N42 |
| O SSN B 9 |
| O NAME B 35 |
| O ADDR B 71 |
| O ZIP B 80 |
| O PHONE# B 90 |
| O* END OF SOURCE STATEMENTS |
___________________________________________________________________________________
Figure 5-1. RPG Program (continued)
FORM21 (shown in Figure 4-2) allows the user to enter a social security number, choose to add a new
record, delete an existing record, or update an existing record.
____________________________________________________________
| |
| CUSTOMER INFORMATION FORM |
| |
| Please enter Social Security Number|
| |
| 306-46-7778 |
| |
| |
| RECORD ALREADY EXISTS |
| |
| |
| Press CMD 1 TO ADD NEW RECORD |
| CMD 2 TO DELETE EXISTING RECORD |
| CMD 3 TO UPDATE EXISTING RECORD |
| CMD 7 TO END JOB |
| |