Problem with call > No active module found



Support for OS/VS COBOL, VS COBOL II, COBOL for OS/390 & VM and Enterprise COBOL for z/OS

Problem with call > No active module found

Postby Dashimir » Wed Dec 26, 2012 7:42 pm

I am a brasiliam intern who earn 350 dolars month so i am probably too stupid for this forum anyway here is the thing :

In advance i apreciate any help, then i will try to understand.

My monitor treated me last time as someone even more stupid than I am and he was wrong with the pack off thing so i dont wanna ask him form help.


first i get this ppl sayd it is nothing but ...
11.43.18 JOB01685 $HASP375 JDBI0100 ESTIMATED LINES EXCEEDED
11.43.18 JOB01685 $HASP375 JDBI0100 ESTIMATE EXCEEDED BY 6,000 L
...

then i get this

USER COMPLETION CODE=4039 REASON CODE=00000000
TIME=11.43.17 SEQ=27638 CPU=0000 ASID=0064
PSW AT TIME OF ERROR 078D1000 87A1455A ILC 2 INTC 0D
NO ACTIVE MODULE FOUND
NAME=UNKNOWN
DATA AT PSW 07A14554 - 00181610 0A0D58D0 D00498EC

I dont know how to post everything but you could teach-me =D
Dashimir
 
Posts: 42
Joined: Wed Dec 26, 2012 7:27 pm
Has thanked: 2 times
Been thanked: 0 time

Re: Problem with call > No active module found

Postby Akatsukami » Wed Dec 26, 2012 8:24 pm

Dashimir wrote:I am a brasiliam intern who earn 350 dolars month so i am probably too stupid for this forum anyway here is the thing :

In advance i apreciate any help, then i will try to understand.

My monitor treated me last time as someone even more stupid than I am and he was wrong with the pack off thing so i dont wanna ask him form help.


first i get this ppl sayd it is nothing but ...
11.43.18 JOB01685  $HASP375 JDBI0100 ESTIMATED  LINES EXCEEDED                 
11.43.18 JOB01685  $HASP375 JDBI0100 ESTIMATE EXCEEDED BY               6,000  L

...

then i get this

   USER COMPLETION CODE=4039 REASON CODE=00000000             
  TIME=11.43.17  SEQ=27638  CPU=0000  ASID=0064               
  PSW AT TIME OF ERROR  078D1000   87A1455A  ILC 2  INTC 0D   
    NO ACTIVE MODULE FOUND                                   
    NAME=UNKNOWN                                             
    DATA AT PSW  07A14554 - 00181610  0A0D58D0  D00498EC     


I dont know how to post everything but you could teach-me =D

This is insufficient information to diagnose the problem; a U4039 abend merely indicates that Language Environment (LE) found an unhandled condition of a certain severity. Using your shop's system management product (probably SDSF, but it might otherwise be IOF, (E)JES, or somehing else), display the sysouts of the failing job. Copy the JESMSGLG and post it here (in Code tags; quote this post to see what I mean).
"You have sat too long for any good you have been doing lately ... Depart, I say; and let us have done with you. In the name of God, go!" -- what I say to a junior programmer at least once a day

These users thanked the author Akatsukami for the post:
Dashimir (Wed Dec 26, 2012 8:28 pm)
User avatar
Akatsukami
Global moderator
 
Posts: 1058
Joined: Sat Oct 16, 2010 2:31 am
Location: Bloomington, IL
Has thanked: 6 times
Been thanked: 51 times

Re: Problem with call > No active module found

Postby Dashimir » Wed Dec 26, 2012 8:31 pm

 
$HASP373 JDBI0100 STARTED - INIT 9    - CLASS F - SYS DES1       
-                                      -----TIMINGS (MINS.)------
-STEPNAME PROCSTEP    RC   EXCP   CONN       TCB       SRB  CLOCK
-STEP001              00      9     16       .00       .00     .0
$HASP375 JDBI0100 ESTIMATED  LINES EXCEEDED                     
$HASP375 JDBI0100 ESTIMATE EXCEEDED BY               6,000  LINES
$HASP375 JDBI0100 ESTIMATE EXCEEDED BY              12,000  LINES
$HASP375 JDBI0100 ESTIMATE EXCEEDED BY              18,000  LINES
$HASP375 JDBI0100 ESTIMATE EXCEEDED BY              24,000  LINES
$HASP375 JDBI0100 ESTIMATE EXCEEDED BY              30,000  LINES
$HASP375 JDBI0100 ESTIMATE EXCEEDED BY              36,000  LINES
$HASP375 JDBI0100 ESTIMATE EXCEEDED BY              42,000  LINES
$HASP375 JDBI0100 ESTIMATE EXCEEDED BY              48,000  LINES
$HASP375 JDBI0100 ESTIMATE EXCEEDED BY              54,000  LINES
$HASP375 JDBI0100 ESTIMATE EXCEEDED BY              60,000  LINES
$HASP375 JDBI0100 ESTIMATE EXCEEDED BY              66,000  LINES
$HASP375 JDBI0100 ESTIMATE EXCEEDED BY              72,000  LINES
$HASP375 JDBI0100 ESTIMATE EXCEEDED BY              78,000  LINES
$HASP375 JDBI0100 ESTIMATE EXCEEDED BY              84,000  LINES     
IEA995I SYMPTOM DUMP OUTPUT  577                                     
  USER COMPLETION CODE=4039 REASON CODE=00000000                     
 TIME=11.43.17  SEQ=27638  CPU=0000  ASID=0064                       
 PSW AT TIME OF ERROR  078D1000   87A1455A  ILC 2  INTC 0D           
   NO ACTIVE MODULE FOUND                                             
   NAME=UNKNOWN                                                       
   DATA AT PSW  07A14554 - 00181610  0A0D58D0  D00498EC               
   AR/GR 0: 008B1258/00000000_84000000   1: 00000000/00000000_84000FC7
         2: 00000000/00000000_000821D8   3: 00000000/00000000_00000002
         4: 00000000/00000000_07A08C48   5: 00000000/00000000_07A1455A
         6: 00000000/00000000_0007A340   7: 00000000/00000000_1705F448
         8: 00000000/00000000_000821D8   9: 00000000/00000000_00081D6C
         A: 00000000/00000000_000828DF   B: 00000000/00000000_87A14480
         C: 00000000/00000000_0007BBD8   D: 00000000/00000000_000849D8
         E: 00000000/00000000_87A07D18   F: 00000000/7FFAE100_00000000
 END OF SYMPTOM DUMP                                                 

 
Dashimir
 
Posts: 42
Joined: Wed Dec 26, 2012 7:27 pm
Has thanked: 2 times
Been thanked: 0 time

Re: Problem with call > No active module found

Postby Akatsukami » Wed Dec 26, 2012 9:04 pm

Hmmm... :geek:

Is there an IEF450I message subsequent to the symptom dump? (There'd better be!)

Does the JCL of the failing step include a CEEDUMP DD card? If not, add one and rr-run the job. Do a find in the CEEDUMP for "Original Condition" and post the next dozen lines.
"You have sat too long for any good you have been doing lately ... Depart, I say; and let us have done with you. In the name of God, go!" -- what I say to a junior programmer at least once a day
User avatar
Akatsukami
Global moderator
 
Posts: 1058
Joined: Sat Oct 16, 2010 2:31 am
Location: Bloomington, IL
Has thanked: 6 times
Been thanked: 51 times

Re: Problem with call > No active module found

Postby steve-myers » Wed Dec 26, 2012 9:23 pm

The "NO ACTIVE MODULE FOUND" message in this context does not usually indicate a problem. The symptom dump analysis attempts to locate the load module that initiated the ABEND. Unfortunately, it's pretty stupid about this analysis. It seems to fail more often than it succeeds. If it does succeed it calculates the offset in the module and prints the offset. It's a nice help when it does work, but it's confusing when it does not work.

In any event, the root problem here seems to be that your program appears to be in an I/O loop printing output. You can usually figure this one out by yourself by reviewing the output it did print and relating it to the output you expected.
steve-myers
Global moderator
 
Posts: 2105
Joined: Thu Jun 03, 2010 6:21 pm
Has thanked: 4 times
Been thanked: 243 times

Re: Problem with call > No active module found

Postby Dashimir » Thu Dec 27, 2012 5:07 pm

       Original Condition:                                                       
        IGZ0035S There was an unsuccessful OPEN or CLOSE of file RETORNO in program ES0111T at relative location X'0B6C'.  Neither
FILE STATUS nor an ERROR declarative were specified. The status code was 35.   
      Location:                                                                 
        Program Unit: CEEHSGLT Entry: CEEHSGLT Statement:  Offset: +00000060   
                                                                               
    Storage dump near condition, beginning at location: 07A16590               
      +000000 07A16590  F010D20B D0801000 5830C2B8 58F0301C  0DEFD20B D098B0C0 4130D098 5030D08C  |0.K.......B..0....K..q.....q&...|
                                                                               
  Parameters, Registers, and Variables for Active Routines:                     
    CEEHDSP (DSA address 000818E0):                                             
      UPSTACK DSA                                                               
 

 



The output file is empty.
Dashimir
 
Posts: 42
Joined: Wed Dec 26, 2012 7:27 pm
Has thanked: 2 times
Been thanked: 0 time

Re: Problem with call > No active module found

Postby enrico-sorichetti » Thu Dec 27, 2012 5:14 pm

Original Condition:
IGZ0035S There was an unsuccessful OPEN or CLOSE of file RETORNO in program ES0111T at relative location X'0B6C'.


what does the above message hint to You ???
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 2994
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 164 times

Re: Problem with call > No active module found

Postby BillyBoyo » Thu Dec 27, 2012 5:36 pm

Then also look at what the 35 means (a quick google will do it), include that in your JCL, and see.

You should do your own file status checking in your program, then you get to understand better what goes wrong, and can DISPLAY explicit messages to help anyone understand what is going on.
BillyBoyo
Global moderator
 
Posts: 3804
Joined: Tue Jan 25, 2011 12:02 am
Has thanked: 22 times
Been thanked: 265 times

Re: Problem with call > No active module found

Postby Dashimir » Thu Dec 27, 2012 5:41 pm

 SELECT ARQUIVO-ENTRADA ASSIGN TO RETORNO.

    FILE SECTION.                                     
FD ARQUIVO-ENTRADA                                 
    RECORD 150                                     
    RECORDING MODE IS F                           
    LABEL     RECORD   IS  OMITTED.               
                                                   
01 REG-ENTRADA.                                   
   05 COD-REGISTRO                      PIC X(01).
   05 ENTRADA                           PIC X(149).

 R-0100-00-INICIALIZAR.       
*------------------------------
                               
     OPEN INPUT ARQUIVO-ENTRADA
         OUTPUT ARQUIVO-SAIDA.
                               
 R-0100-SAIDA.  EXIT.   

 R-0000-00-PRINCIPAL         SECTION.                         
*------------------------------------                         
                                                               
     PERFORM R-0100-00-INICIALIZAR                             
                                                               
     PERFORM R-0200-00-DETALHES UNTIL COD-REGISTRO EQUAL 'Z' OR
             FIM-REGISTRO = 1                                 
     PERFORM R-9999-00-FINALIZAR.                             
                                                               
 R-0000-SAIDA.  EXIT.                                         
       
 



i thinked i was doing something wrong with call comand or where i placed the caled program. I will try to fix this unsuccessful OPEN or CLOS
Dashimir
 
Posts: 42
Joined: Wed Dec 26, 2012 7:27 pm
Has thanked: 2 times
Been thanked: 0 time

Re: Problem with call > No active module found

Postby BillyBoyo » Thu Dec 27, 2012 6:00 pm

You do not have a DD statement for RETORNO in your JCL. Using the file-status will not change that, it will just help, greatly, to make it more obvious next time.
BillyBoyo
Global moderator
 
Posts: 3804
Joined: Tue Jan 25, 2011 12:02 am
Has thanked: 22 times
Been thanked: 265 times

Next

Return to IBM Cobol

 


  • Related topics
    Replies
    Views
    Last post