Uso APKACIF - Error S0c4

Todo lo relacionado con el sistema operativo, y sus productos asociados.
Responder
Cvisser

Uso APKACIF - Error S0c4

Mensaje por Cvisser » 07 Nov 2012, 17:49

Gente,
Buenos días / Tardes /Noches segun corresponda.

Estoy ejecutando el utilitario APKACIF para obtener en un archivo, la salida de un formulario.
El problema es que me esta dando S0C4 y los parámetros que estoy colocando, creo que están correctos.

¿Alguno hizo pruebas con este utilitario y ha sufrido este error? Si es así, les pido que me indiquen como lo solucionaron.

Les adjunto el JCL que estoy ejecutando.

Desde ya, muchas gracias.

Código: Seleccionar todo

//APKSMAIN EXEC PGM=APKACIF,REGION=64M                             
//STEPLIB  DD DISP=SHR,DSN=APK.SAPKMOD1                            
//INPUT DD  DISP=SHR,DSN=XXXX.KN.DI.BALANCE                        
//OUTPUT DD DSN=XXXX.KN.DI.ACIF.OUTPUT,DISP=(NEW,CATLG),           
//            DCB=(LRECL=32756,BLKSIZE=32760,RECFM=VBA,DSORG=PS),  
//            SPACE=(TRK,(1,1)),UNIT=SYSDA                         
//RESOBJ DD DSN=XXXX.KN.DI.ACIF.RSCS,DISP=(NEW,CATLG),             
//            DCB=(LRECL=32756,BLKSIZE=32760,RECFM=VBA,DSORG=PS),  
//            SPACE=(TRK,(1,1)),UNIT=SYSDA                         
//INDEX  DD DSN=XXXX.KN.DI.ACIF.INDEX,DISP=(NEW,CATLG),            
//            DCB=(LRECL=32756,BLKSIZE=32760,RECFM=VBA,DSORG=PS),  
//            SPACE=(TRK,(1,1)),UNIT=SYSDA                         
//SYSIN DD *                                                       
 /* 1-UP,80 LINES NORM DUP, PORT, FRONT/BACK OFFSET */             
 INPUTDD  = INPUT        /* INPUT FILE DDNAME         */           
 OUTPUTDD = OUTPUT       /* OUTPUT FILE DDNAME        */           
 RESOBJDD = RESLIB       /* RESOURCE FILE DDNAME      */         
 RESTYPE  = PSEG,OVLY,OBJCON,FDEF                                
 CPGID = 500             /* CODE PAGE IDENTIFIER     */          
 FDEFLIB = XXXXX.YYYY.FDEFLIB                              
 PDEFLIB = XXXXX.YYYY.PDEFLIB                              
 FONTLIB = SYS1.FONTLIB,SYS1.FONTLIBB                            
 OVLYLIB = XXXXX.YYYY.OVERLIB                              
 PSEGLIB = XXXXX.YYYY.PSEGLIB                              
 FORMDEF = XX994A       /* FORMDEF NAME              */          
 PAGEDEF = XX994A                                                
 RESFILE = SEQ          /* RESOURCE FILE TYPE PDS/SEQ*/          
 INDEXOBJ = NONE         /* NO GENERA ARCHIVO DE INDEX APARTE */ 
 UNIQUEBNGS=NO           /* NO GENERA PRINCIPIO DE GRUPO */      
//                                                               

jaisaper
Usuario avanzado
Usuario avanzado
Mensajes: 42
Registrado: 11 Nov 2010, 09:12
País: España
Ciudad: Pamplona
Ocupación: Técnico en Sistemas

Re: Uso APKACIF - Error S0c4

Mensaje por jaisaper » 12 Nov 2012, 03:54

Yo lo he empleado bastante, pero no he tenido ABEND 0C4. La única cosa que no me cuadra, aparte de tamaño de ficheros, es que los ficheros deberían ser VBM, no VBA.
Otro problema es que este mal bloqueado, si tienes mas de un registro por línea falla y lo mismo si lo has subido desde PC o similares si lo ha partido mal. Circula por ahí, pero no recuerdo donde, una utilidad para partir correctamente los registros AFPDS.

Responder