SET PROGRAM 1 SET PROGRAM ( program_name ) 2 ,ENABLESTATUS( 2.1 ENABLED 2.1 DISABLED 2.2 ) 3? 3 ,CICS(applid)