Download Print this page

HP 3000 Manual page 210

Mpe/ix computer systems, rpg/xl utilities
Hide thumbs Also See for 3000:

Advertisement

4
5
(2)
Undel completed.
>
>D 5/10
5
6
7
8
9
10
(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
5.1
5.2
5.3
5.4
5.5
5.6
(1)
Join completed.
(2)
>UNDEL
5
Can't Un-delete a line, the line number exists already.
>
(3)
>MOVE 5/5.6 TO 10.5
10.5
10.51
10.52
10.53
10.54
10.55
10.56
Move completed.
(4)
>U
5
6
7
8
9
10
Undel completed.
>
VERIFY
VERIFY compiles a work file, lists a compilation, or prepares a USL file into a program file.
Form
2- 212
00014IINPUT
00015I
OR
00015I
OR
00016I
OR
00017I
OR
00018I
OR
00019I
00020I
H*
H*
PROGRAM NAME:
H*
H*
PROGRAMMER
H*
DATE WRITTEN:
H*
PURPOSE
H*
00015I
OR
H*
H*
PROGRAM NAME:
H*
H*
PROGRAMMER
H*
DATE WRITTEN:
H*
PURPOSE
H*
00015I
OR
00016I
OR
00017I
OR
00018I
OR
00019I
00020I
R[PG]
AA
01
1
CA
02
1
CS
02
1
CS
03
1
CM
04
1
CD
05
3
72OPRND1
9 132OPRND2
:
:
02
1
CS
:
:
02
1
CS
03
1
CM
04
1
CD
05
3 72OPRND1
9 1320PRND2
99
99

Advertisement

loading