IBM Mainframe Forum

DSNT408I SQLCODE = -104, ERROR:  ILLEGAL SYMBOL "/". SOME SYMBOLS THAT MIG
         BE LEGAL ARE: <ERR_STMT> <WNG_STMT> GET SQL SAVEPOINT HOLD FREE 
         ASSOCIATE                                                       
DSNT418I SQLSTATE   = 42601 SQLSTATE RETURN CODE                         
DSNT415I SQLERRP    = DSNHPARS SQL PROCEDURE DETECTING ERROR             
DSNT416I SQLERRD    = 3 0  0  -1  1  502 SQL DIAGNOSTIC INFORMATION       
DSNT416I SQLERRD    = X'00000003'  X'00000000'  X'00000000'  X'FFFFFFFF' 
         X'00000001'  X'000001F6' SQL DIAGNOSTIC INFORMATION             

DSNT408I SQLCODE = -104, ERROR:  ILLEGAL SYMBOL "/". SOME SYMBOLS THAT MIGHT
         BE LEGAL ARE: <ERR_STMT> <WNG_STMT> GET SQL SAVEPOINT HOLD FREE     
         ASSOCIATE                                                           
DSNT418I SQLSTATE   = 42601 SQLSTATE RETURN CODE                             
DSNT415I SQLERRP    = DSNHPARS SQL PROCEDURE DETECTING ERROR                 
DSNT416I SQLERRD    = 3 0  0  -1  1  502 SQL DIAGNOSTIC INFORMATION         
DSNT416I SQLERRD    = X'00000003'  X'00000000'  X'00000000'  X'FFFFFFFF'     
         X'00000001'  X'000001F6' SQL DIAGNOSTIC INFORMATION

//LOAD EXEC DSNUPROC,SYSTEM=DB1S,                 
//             LIB='DB2.V9R1.SDSNLOAD',           
//             UID=''                             
//DSNUPROC.SYSREC  DD DISP=SHR,                   
//                 DSN=SHE00XX.AUDIT.LOG   
       
//DSNUPROC.SYSUT1  DD DSN=SHE00XX.SYSUT1,         
//                 DISP=(MOD,DELETE,CATLG),       
//                 SPACE=(TRK,(10,5),RLSE),       
//                 UNIT=SYSDA       
             
//DSNUPROC.SORTOUT DD DSN=SHE00XX.SORTOUT,       
//                 DISP=(MOD,DELETE,CATLG),       
//                 SPACE=(TRK,(10,5),RLSE),       
//                 UNIT=SYSDA     
                       
//DSNUPROC.SYSIN DD *                             
  LOAD DATA INDDN SYSREC LOG YES REPLACE         
  INTO TABLE SHE00XX.AUDLOG                 
  WHEN EVENT_TYPE = 'JOBINIT'               
  (                                         
  EVENT_TYPE     POSITION (9:16)    CHAR(8),
  EVENT_QUAL     POSITION (18:25)   CHAR(8),
  TIME_WRITTEN   POSITION (27:35)   TIME,   
  DATE_WRITTEN   POSITION (36:46)   DATE,   
  SYSTEM_SMFID   POSITION (48:51)   CHAR(4),
  EVT_USER_ID    POSITION (67:74)   CHAR(8),
  EVT_GRP_ID     POSITION (76:81)   CHAR(8),
  JOB_NAME       POSITION (1:8)     CHAR(8) 
  )                                         
/*