Inquire after the program named PROGDLL, and if the program is disabled, return an error message.
| result | result := CICS inquireprogram program: 'PROGDLL'; exec. result status = CVDA_DISABLED ifTrue: [ ^Transcript cr; show: 'The requested program is disabled.'].