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

2- 193
(4) >L1/5
1 00011H
SIMCAL
2 00013FOUTPUT O F 72 DISK
3.5 00012FINPUT IP F 72 DISK
4 00014IINPUT AA 01 1 CA
5 00015I OR 02 1 CS
In the next example, the record pointer is moved to the last line in the file when LIST LAST is entered (1).
A command is then given to MOVE a range of lines beginning ten lines before the current record pointer
and ending with the last line in the file to line 100 (2). The results appear on the screen (3). An attempt to
move an empty line range brings up an error message (4). Another error is committed when a MOVE
command is entered with only a portion of the line range specified (5). Finally, a third error is caused by a
MOVE command used with an illegal destination value (6).
(1) >L LAST
38 00048O*END OF POGRAM
(2) >MOVE *-10/LAST TO 100
100 00038O RESULT 60 " , 0 . -"
101 00039O D 1 1P
102 00040O OR N1P
103 00041O 10 "ENTER DATA"
104 00042O 25 "IN THE FORMAT:"
105 00043O D 11 1P
106 00044O OR N1P
107 00045O 13 "C NNNDD NNNDD"
108 00046O D 05
109 00047O 15 "INVALID REQUEST"
(3) 110 00048O*END OF PROGRAM
Move completed.
(4) >MOVE 50/70 TO FIRST BY .11
Error 81: Range is empty.
(5) >MOVE FIRST
Error 149: TO location missing.
(6) >MOVE FIRST TO .1155
^
Error 74: A maximum of 3 digits is allowed right of decimal.
>
PRINT
PRINT enables you to print a complete work file or portion of the file, or a compilation listing of a file, on
the line printer.
Form
P[RINT] lb[/le] [R[PGLIST]]
Parameter Explanation
lb First, or single, line you wish to have printed.
le Last line of a range you want printed offline.
RPGLIST Print the last RPG compilation listing produced by the RISE VERIFY command.
Purpose
The PRINT command prints a line, a line range, or a complete file on the line printer in a special format