SET PROGRAM 1 SET PROGRAM(program_name) 2 ,ENABLESTATUS( 2.1 ENABLE 2.1 DISABLE 2.2 ) 3? 3 ,CICS(applid)