SPAN {
font-family: "Courier New";
font-size: 10pt;
color: #000000;
background: #FFFFFF;
}
.L1S52 {
color: #0000FF;
}
PROCESSBEFOREOUTPUT.
MODULESTATUS_100.
CALLSUBSCREEN:AREA1INCLUDINGSY-REPIDNUMBER1,
AREA2INCLUDINGSY-REPIDNUMBER2.
PROCESSAFTERINPUT.
MODULECANCELATEXIT-COMMAND.
MODULESAVE_OK.
CALLSUBSCREEN:AREA1,
AREA2.
MODULEUSER_COMMAND_100.