Download RPG/400 User's Guide
Transcript
Examples of Using Auto Report *.. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ..* IFilenameSqNORiPos1NCCPos2NCCPos3NCC................................* ISALES AA 01 I....................................PFromTo++DField+L1M1FrPlMnZr...* I 1 7 ITEMNO ──┐ I 8 9 BRANCH │ I 10 10 REGION │ I 11 25 DESC │ .A/ I 26 270SOLDQY │ I 28 342SOLDVA │ I 35 360ONHAND │ I 37 432VALUE ──┘ I* *.. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ..* OName++++DFBASbSaN01N02N03Excnam....................................* OPRINT H *AUTO O................N01N02N03Field+YBEnd+PConstant/editword+++++++++...* O 'SALES REPORT ' O 'FOR ANY CO.' O D 01 *AUTO O REGION 'REGION' O BRANCH 'BRANCH' O ITEMNO 'ITEM' O DESC 'DESCRIPTION' O SOLDQY 'SALES' O SOLDVA A 'AMOUNT' O ONHAND 'ON-HAND' O VALUE A 'VALUE' O* Chapter 12. Auto Report Feature 315