× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Hi all,

I'm trying to compile a seemingly simple COBOL pgm and get the following
error at the end of the processing of the "Working Storage" section.

Any clues as to what this is an how to remedy the situation?

Thanks.

 5722SS1 V5R2M0 020719                           Job Log
DEV01    03/10/14 15:39:53          Page    1
  Job name . . . . . . . . . . :   UNITBAL         User  . . . . . . :
MIELDAN      Number . . . . . . . . . . . :   596041     
  Job description  . . . . . . :   QBATCH          Library . . . . . :
MFAPRDAIOJ                                               
MSGID      TYPE                    SEV  DATE      TIME             FROM PGM
LIBRARY     INST     TO PGM      LIBRARY     INST 
CPF1124    Information             00   03/10/14  15:39:51.256528  QWTPIIPP
QSYS        05D4     *EXT                    *N   
                                     Message . . . . :   Job
596041/MIELDAN/UNITBAL started on 03/10/14 at 15:39:51               
                                       in subsystem QBATCH in QSYS. Job
entered system on 03/10/14 at 15:39:51.                   
CPI1125    Information             00   03/10/14  15:39:51.258688  QWTPCRJA
QSYS        0108     *EXT                    *N   
                                     Message . . . . :   Job
596041/MIELDAN/UNITBAL submitted.                                    
                                     Cause . . . . . :   Job
596041/MIELDAN/UNITBAL submitted to job queue                        
                                       QBATCHAIC in QGPL from job
596023/MIELDAN/QPADEV0216. Job                                  
                                       596041/MIELDAN/UNITBAL was started
using the Submit Job (SBMJOB) command                   
                                       with the following job attributes:
JOBPTY(5) OUTPTY(5) PRTTXT()                            
                                       RTGDTA(QCMDB) SYSLIBL(QTODSYS    QSYS
QSYS2      QHLPSYS    QUSRSYS                  
                                       TAATOOL) CURLIB(MFAPRDAIOJ)
INLLIBL(MFAPRDAIDB MFAPRDAIAD MFAPRDAITB                       
                                       MFAPRDAIOJ MFACOMMON  UDPGMLIB
QTEMP      PH607FRW   MFASYSWIDE QGPL)                    
                                       LOG(4 00 *SECLVL) LOGCLPGM(*NO)
INQMSGRPY(*RQD) OUTQ(QGPL/GENICOM2)                        
                                       PRTDEV(GENICOM3) HOLD(*NO)
DATE(*SYSVAL) SWS(00000000) MSGQ(QUSRSYS/MIELDAN)               
                                       CCSID(65535) SRTSEQ(*N/*HEX)
LANGID(ENU) CNTRYID(US) JOBMSGQMX(32)                         
                                       JOBMSGQFL(*PRTWRAP) ALWMLTTHD(*NO)
INLASPGRP(*NONE) SPLFACN(*KEEP).                        
*NONE      Request                      03/10/14  15:39:51.262472  QWTSCSBJ
*N       QCMD        QSYS        0178 
                                     Message . . . . :  -CRTCBLPGM
PGM(USERDEV/UNITBAL) SRCFILE(USERDEV/QLBLSRC)                
                                       SRCMBR(UNITBAL)   REPLACE(*NO)

MCH0601    Escape                  40   03/10/14  15:39:52.221992  QLBDDSV
QLBL        0648     QLBDDSV     QLBL        0648 
                                     Message . . . . :   Space offset
X'0009A421' or teraspace offset                             
                                       X'0000000000000000' is outside
current limit for object UNITBAL   MIELDAN                  
                                       596041.

                                     Cause . . . . . :   You tried to
operate outside the specified space, tried to               
                                       operate on an unallocated page in
teraspace, or tried to set the space                     
                                       pointer outside the specified space.
The object referred to is UNITBAL                     
                                       MIELDAN   596041. The offset
specified is X'0009A421' for most spaces, but                 
                                       X'0000000000000000' for teraspace.
The space class is X'03'. The secondary                 
                                       associated space number is X'0000'.
The activation group mark is                           
                                       X'00000001'. The heap space
identifier is X'00000000'. The pointer to the                  
                                       start of the implicit process space
used for the allocation is                             
                                       X'8000000000000000CE09A40B81001000'.
The space class designates the type of                
                                       space as follows: 00-primary
associated space (includes space objects)                     
                                       01-secondary associated space
02-implicit process space for automatic                      
 

> BUY. HOLD. AND PROSPER.
> 
> Daniel Mielke
> Business Systems Analyst
> AIC Limited
> 1-888-710-4242 (4614)
> dmielke@xxxxxxx
> www.aic.com
> 
> 

As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.