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

2- 212
4 00014IINPUT AA 01 1 CA
5 00015I OR 02 1 CS
(2) Undel completed.
>
>D 5/10
5 00015I OR 02 1 CS
6 00016I OR 03 1 CM
7 00017I OR 04 1 CD
8 00018I OR 05
9 00019I 3 72OPRND1
10 00020I 9 132OPRND2 99
(3) Delete completed.
In the next example, a file named RPGDOC--used previously in the JOIN example--is JOINed to the work
file beginning at line 5 (1). The UNDEL command is then tried and rejected by RISE. This occurs because
line 5, which was deleted in the first example, has been used again through the JOIN command. A
message appears explaining why the UNDELete command cannot be executed (2). The lines containing
RPGDOC are then MOVEd to a new position, beginning at line 10.5 (3). When this is done, line 5 no longer
exists in the file, Now the UNDELete command, which was previously rejected, is executed by RISE (4).
>JOIN RPGDOC TO 5
5 H*
5.1 H* PROGRAM NAME:
5.2 H*
5.3 H* PROGRAMMER :
5.4 H* DATE WRITTEN:
5.5 H* PURPOSE :
5.6 H*
(1) Join completed.
(2) >UNDEL
5 00015I OR 02 1 CS
Can't Un-delete a line, the line number exists already.
>
(3) >MOVE 5/5.6 TO 10.5
10.5 H*
10.51 H* PROGRAM NAME:
10.52 H*
10.53 H* PROGRAMMER :
10.54 H* DATE WRITTEN:
10.55 H* PURPOSE :
10.56 H*
Move completed.
(4) >U
5 00015I OR 02 1 CS
6 00016I OR 03 1 CM
7 00017I OR 04 1 CD
8 00018I OR 05
9 00019I 3 72OPRND1
10 00020I 9 1320PRND2 99
Undel completed.
>
VERIFY
VERIFY compiles a work file, lists a compilation, or prepares a USL file into a program file.
Form
R[PG]