Use CHANGE Clause of the USE Parameter
Since the report contents are sorted by program name, the program name should appear in the left-most column. The following code rearranges the columns and column headings so that they appear as in the following report output.
-
-
CHANGE '0060' TO '0001' AND $MOVE PROGRAM TO COLUMN 1
'0068' TO '0010' AND $MOVE VER TO COLUMN 10
'0069' TO '0010' AND
'0075' TO '0018' AND $MOVE USAGE TO COLUMN 18
'0095' TO '0038' AND $MOVE TIMES TO COLUMN 38
'0027' TO '0048' AND $MOVE RECORD TO COLUMN 48
'0102' TO '0085' AND $MOVE DATE COMPILED TO COLUMN 85
'0111' TO '0095' AND $MOVE DATE CREATED TO COLUMN 95
'0112' TO '0095'
REPORT NO. 28 DATA DICTIONARY REPORTER mm/dd/yy PAGE 1 DREPORT 028 IDMS RECORD ACTIVITY REPORT ********************************************************************************************************************************* EMPSCHM VERSION 100 SUBSCHEMA EMPSS01 ---- D A T E ---- PROGRAM VER USAGE TIMES RECORD COMPILED CREATED ********************************************************************************************************************************* D3 1 BIND 1 OFFICE mm/dd/yy mm/dd/yy D3 1 BIND 1 EMPLOYEE mm/dd/yy mm/dd/yy D3 1 BIND 1 DEPARTMENT mm/dd/yy mm/dd/yy D3 1 FIND 1 EMPLOYEE mm/dd/yy mm/dd/yy D3 1 MODIFY 1 EMPLOYEE mm/dd/yy mm/dd/yy D4 1 BIND 1 OFFICE mm/dd/yy mm/dd/yy D4 1 BIND 1 EMPLOYEE mm/dd/yy mm/dd/yy D4 1 BIND 1 DEPARTMENT mm/dd/yy mm/dd/yy D4 1 ERASE 1 EMPLOYEE mm/dd/yy mm/dd/yy D4 1 FIND 1 EMPLOYEE mm/dd/yy mm/dd/yy D6 1 BIND 1 OFFICE mm/dd/yy mm/dd/yy D6 1 BIND 1 EMPLOYEE mm/dd/yy mm/dd/yy
|
Copyright © 2013 CA.
All rights reserved.
|
|