SET PROGRAM

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