|
Escape Sequences Last updated: February 15, 1999 Summit Spectrum 28.13 |
Report highlights These files are not needed for printing QueryCalc reports. This is a collection of 5 files. The first 4 files contain escape sequences that have been tested and used to print Spectrum output to HP LaserJet printers. The fifth file is a text file that explains how the escape sequences are constructed. Following is an example of using the escape sequences to print an income statement:
` General Ledger Statement of Income Report
?HMGLSTI0
^~Enter Report Date (MMDDYY) _6 DATE {123188} [RPTDTE]
~~Enter Rpt Title _10 CHAR INCOME,EXPENSES,OPERATIONS,COMPARE {INCOME} [RPTHED]
~|Enter Net Gain/Income GL Account _10 CHAR {960200.00} [NETACT]
~|Enter GL Account for % Calc _10 CHAR {100000.00} [PERACT]
~~Enter Compare Info_36 CHAR {MONTH 04-95 WITH MONTH 03-95} [COMTLT]
~|Enter Option to Print GL Account Numbers _3 CHAR YES,NO {YES} [PRTOPT]
~|Enter Hold-File Search Date _9 CHAR EFFECTIVE,ENTRY {ENTRY } [HFDT]
~~ENTER NUMBER OF COPIES _1 INT {1} [COPIES]
~|ENTER PRIMARY SORT OPTION _6 CHAR BRANCH,REGION,NONE {NONE} [SORTO]
~|ENTER SELECT OPTION _6 CHAR BRANCH,REGION,NONE {NONE} [SELECTO]
~|ENTER SELECTIONS _4 LINES {END} [SELECTS]
!JOB TMGLSTI1,[MGRUSER].[ACCNT][PWD],[DATAGRP][JOBPRI]
!COMMENT ***********************************
!COMMENT *** BUILD A BLANK REPORT FILE ***
!COMMENT ***********************************
!PURGE RRINSTMT
!BUILD RRINSTMT;DEV=DISC;DISC=30000,32,1;REC=-136,20,F,ASCII;CCTL
!COMMENT *************************************
!COMMENT *** COPY IN ESCAPE SEQUENCE FOR ***
!COMMENT *** LJ LANDSCAPE CONDENSED ***
!COMMENT *************************************
!FILE WORK=RRINSTMT,OLD;ACC=APPEND
!FCOPY FROM=ESCSPECT.DATA.CU1;TO=*WORK;CCTL
!COMMENT *************************************
!COMMENT *** PRODUCE AN INCOME STATEMENT ***
!COMMENT *************************************
!FILE FTN10=RRINSTMT,OLD;ACC=APPEND;CCTL
!RUN PGLSTMIN.[PGMSGROUP];LIB=P
[RPTDTE]
[RPTHED] [COMTLT]
[NETACT]
[PERACT]
[PRTOPT]
[HFDT]
[SORTO]
[SELECTO]
[SELECTS]
!COMMENT *************************************
!COMMENT *** COPY IN ESCAPE SEQUENCE FOR ***
!COMMENT *** LJ RESET ***
!COMMENT *************************************
!FCOPY FROM=LLJRESET.DATA.CU1;TO=*WORK
!COMMENT *****************************************************
!COMMENT *** COPY WORKFILE TO ACCOUNTING's LASER PRINTER ***
!COMMENT *****************************************************
!FILE LASER;DEV=316,,[COPIES];REC=-136,20,F,ASCII;CCTL
!FCOPY FROM=RRINSTMT;TO=*LASER;CCTL
!PURGE RRINSTMT
!TELLOP ****************************************
!TELLOP *** TMGLSTI1 HAS FINISHED FOR CU1 ***
!TELLOP ****************************************
!SET STDLIST=DELETE
!EOJ
Files included
Databases accessed
Special Requirements Laser printer. These escape sequences assume a laser printer is being used. |
QC Reports QueryCalc