COBOL Manual for TNS and TNS/R Programs

Procedure Division
HP COBOL Manual for TNS and TNS/R Programs—522555-006
43-22
Conditional IF
Conditional IF
INITIALIZE
replacement
IF
THEN
condition
statement-1
NEXT
ELSE statement-2
SENTENCE
NEXT SENTENCE
VST161.vsd
INITIALIZE
REPLACING
receiver
replacement
VST162.vsd
ALPHABETIC
ALPHANUMERIC
ALPHANUMERIC-EDITED
NUMERIC-EDITED
DATA
BY
NUMERIC
sender
literal
VST163.vsd