COMCCPL 
COMMON
CCPLIST ' TYPE OF CCP LISTING GENERATED        '=(*N=NO,NO,YES,PF,BOTH),
