SET PROGRAM

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