Dialog DEPTHDR executes when it receives control from REPTEDIT. DEPTHDR writes department header lines to the report file.
The dialog definition for DEPTHDR is illustrated below:
The premap process and mapout operation are shown below.
Dialog DEPTHDR: Premap Process
!********************************************************************** !*DEPT-HDR-EDIT * !********************************************************************** MOVE '0' TO CTRL-CHAR. MOVE ' DEPARTMENT ID:' TO LEFT. MOVE CONCATENATE(DEPT-ID-0410,' ',DEPT-NAME-0410) TO CENTER. MOVE SPACES TO RIGHT. ADD 2 TO WK-LINE-NBR. WRITE TRANSACTION RETURN.
Dialog DEPTHDR: Mapout Operation
Internal field External field CTRL-CHAR......................>CTRL-CHAR LEFT...........................>LEFT CENTER.........................>CENTER RIGHT..........................>RIGHT
|
Copyright © 2013 CA.
All rights reserved.
|
|