Hi, All,
This is almost embarrassing to ask, but how in blazes does one code the
equivalent of a TM instruction in COBOL? Here's what we have:
In the data division:
05 MAP-FIELD-ATTRIBUTE PIC X.
...
In an IBM-supplied copybook:
02 DFHBMFLG PIC X.
88 DFHERASE VALUES ARE <X'80'>,<X'82'>
In the procedure division, we code:
IF MAP-FIELD-ATTRIBUTE = DFHERASE
and the compiler says:
Condition-name "DFHERASE" was found inside the scope of an
abbreviated condition
The statement was discarded.
All we want is the equivalent of
TM MAP-FIELD-ATTRIBUTE,X'80'
How is that done in COBOL?? Can it even be done in COBOL??
TIA,
-jc-
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
