Data field · 1 statements in 1 programTRTYPEI

0W · 1R · 0?

COTRTLIC

read

MOVE TRTYPEI OF CTRTLIAI TO WS-IN-TYPE-CD

1100-RECEIVE-SCREEN

Defined: 02 TRTYPEI PIC X(2)
WORKING-STORAGE · in CTRTLIAI · offset 179, 2 bytes
COTRTLI.cpy:66 via COTRTLIC.cbl:433
Program: COTRTLIC