Example of Local Service to ASSEMBLE Files

Table 1 shows an example of a control structure containing a temporary patch over a local source update. Although this works, it is not recommended. Whenever source code is available, you should use source updates instead of patches.

Table 1. Control Structure Containing Temporary Patch Over Local Source Update
File Name File Type Contents
XASYS CNTRL
L1 AUXLCL1 TX$
P1 AUXP1
TEXT AUXVM
HCPXYZ AUXLCL1
TEMP02 TX$ PROB1
LCFIX5 TX$ APAR2
HCPXYZ TEMP02
./ * VER  24 4780,C204
./ * REP  24 4700
HCPXYZ LCFIX5
./ ADD 12340000
XYZLOOP  TM   FLAG,X'01'    CHECK COMPLETE
BO   DONE          EXIT LOOP
HCPXYZ TXTL1
ESD
TXT
RLD
END