#include <stdio.h>                                                              
#include <stdlib.h>                                                             
#include <string.h>                                                             
#include <QCMDEXC.h>                                                            
#include <signal.h>                                                             
                                                                                
#define TRUE         0                                                          
#define FALSE       -1                                                          
                                                                                
void main(void){                                                                
   char Cmd[512];                                                               
   int  CmdLen;                                                                 
   char FILE[] = {"MYFILE"};                                                    
   char TOLIB[] = {"QGPL"};                                                     
  volatile _INTRPT_Hndlr_Parms_T ca;                                            
#define  CHKOBJ   "CHKOBJ  OBJ(%s/%s) OBJTYPE(*FILE)   "                        
                                                                                
    #pragma exception_handler(MONMSG, ca, 0, _C2_MH_ESCAPE, \                   
                                       _CTLA_HANDLE)                            
   CmdLen = sprintf(Cmd, CHKOBJ, TOLIB, FILE);                                  
   QCMDEXC(Cmd, CmdLen);/* CHKOBJ MYLIB/MYFILE *FILE */                         
    printf("fuond file = %s/%s\n", TOLIB, FILE);                                
    getchar();                                                                  
MONMSG:                                                                         
    #pragma disable_handler                                                     
    printf("not found %s/%s\n", TOLIB, FILE);                                   
    getchar();                                                                  
}