IBM 3741 Data Station Reference Manual page 120

114
Editing Example
The following examples show two possible ways of editing an input record.
Data Record
Item Quantity Price
I /
~
~~~
MOT0R}6}6001001257
Printer Format Program
7A4X3B6X'$$,$$$.99'2X3INET2CQ
o~0e 0
G,')
~0
o
7 A - means load the print buffer with seven characters from the record
(MOTORlzSlzS) •
E)
4X - means load print buffer with four blanks.
@
38 - means load print buffer with three characters from the record and suppress
leading zeros (001).
o
6X - means load print buffer with six blanks.
o
'$ $ , $ $ $ • 99 '-
edit word to punctuate price field when loaded to print buffer.
o
2X - means load print buffer with two blanks.
o
31NET - the 31 means load the print buffer with three constant characters NET.
9
2C - means perform carriage return anq two line feeds.
~ Q - end of printer format program.
Print Line
MOTORlzSlzSlzSlzSlzSlzSlzSlzS1lzSlzSlzSlzSlzSlzSlzSlzSlzS $12 • 57lzSlzSNET