The processor step has IF/THEN/ELSE coded as follows:
//SYSUT1 DD *
// IF (&C1PRGRP EQ 'ENTCOBK') THEN
DSN SYSTEM(&DB2SYS)
BIND PACKAGE(&DBNAME1) MEM(&MEMBER) ACT(&ACT) VAL(&VAL) -
EXPLAIN(&EXPLAIN) FLAG(&FLAG) CURRENTDATA(&CRNTDATA) -
RELEASE(&REL) OWNER(&OWNERID) QUALIFIER(&DBNAME1)
BIND PACKAGE(&DBNAME2) MEM(&MEMBER) ACT(&ACT) VAL(&VAL) -
EXPLAIN(&EXPLAIN) FLAG(&FLAG) CURRENTDATA(&CRNTDATA) -
RELEASE(&REL) OWNER(&OWNERID) QUALIFIER(&DBNAME2)
BIND PACKAGE(&DBNAME3) MEM(&MEMBER) ACT(&ACT) VAL(&VAL) -
EXPLAIN(&EXPLAIN) FLAG(&FLAG) CURRENTDATA(&CRNTDATA) -
RELEASE(&REL) OWNER(&OWNERID) QUALIFIER(&DBNAME3)
// ELSE
DSN SYSTEM(&DB2SYS)
BIND PACKAGE(&DBNAME1) MEM(&MEMBER) ACT(&ACT) VAL(&VAL) -
EXPLAIN(&EXPLAIN) FLAG(&FLAG) CURRENTDATA(&CRNTDATA) -
RELEASE(&REL) OWNER(&OWNERID) QUALIFIER(&DBNAME1)
BIND PACKAGE(&DBNAME2) MEM(&MEMBER) ACT(&ACT) VAL(&VAL) -
EXPLAIN(&EXPLAIN) FLAG(&FLAG) CURRENTDATA(&CRNTDATA) -
RELEASE(&REL) OWNER(&OWNERID) QUALIFIER(&DBNAME2)
// ENDIF
//*
The "IF" statement must be wrapped around the full //SYSUT1 dd statement. Remember - the entire SYSLIB concatenation must be in the If/then/else.
To resolve the problem code the processor step as follows:
// IF (&C1PRGRP EQ 'ENTCOBK') THEN
//SYSUT1 DD *
DSN SYSTEM(&DB2SYS)
BIND PACKAGE(&DBNAME1) MEM(&MEMBER) ACT(&ACT) VAL(&VAL) -
EXPLAIN(&EXPLAIN) FLAG(&FLAG) CURRENTDATA(&CRNTDATA) -
RELEASE(&REL) OWNER(&OWNERID) QUALIFIER(&DBNAME1)
BIND PACKAGE(&DBNAME2) MEM(&MEMBER) ACT(&ACT) VAL(&VAL) -
EXPLAIN(&EXPLAIN) FLAG(&FLAG) CURRENTDATA(&CRNTDATA) -
RELEASE(&REL) OWNER(&OWNERID) QUALIFIER(&DBNAME2)
BIND PACKAGE(&DBNAME3) MEM(&MEMBER) ACT(&ACT) VAL(&VAL) -
EXPLAIN(&EXPLAIN) FLAG(&FLAG) CURRENTDATA(&CRNTDATA) -
RELEASE(&REL) OWNER(&OWNERID) QUALIFIER(&DBNAME3)
// ELSE
//SYSUT1 DD *
DSN SYSTEM(&DB2SYS)
BIND PACKAGE(&DBNAME1) MEM(&MEMBER) ACT(&ACT) VAL(&VAL) -
EXPLAIN(&EXPLAIN) FLAG(&FLAG) CURRENTDATA(&CRNTDATA) -
RELEASE(&REL) OWNER(&OWNERID) QUALIFIER(&DBNAME1)
BIND PACKAGE(&DBNAME2) MEM(&MEMBER) ACT(&ACT) VAL(&VAL) -
EXPLAIN(&EXPLAIN) FLAG(&FLAG) CURRENTDATA(&CRNTDATA) -
RELEASE(&REL) OWNER(&OWNERID) QUALIFIER(&DBNAME2)
// ENDIF
//*