IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Compiling cobol program WITH DEBUGGING MODE


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Ragav86

New User


Joined: 27 Jan 2010
Posts: 37
Location: chennai

PostPosted: Wed Sep 15, 2010 3:02 pm
Reply with quote

Hi ,
i tried to compile the cobol program with debugging mode program executed successfully but the debugging option is not working. please guide me whether i need to give any compiler options or should i need to change the syntaxes.


Code:

//A999999A JOB COBOL,'SAMPLE   ',                                     
//         MSGCLASS=X,NOTIFY=&SYSUID,CLASS=A                     
//STEP1    EXEC IGYWCLG,PARM='LIST'                             
//COBOL.SYSIN DD *                                               
        IDENTIFICATION DIVISION.                                 
        PROGRAM-ID. SAMPLE.                                     
        ENVIRONMENT DIVISION.                                   
        CONFIGURATION SECTION.                                   
        SOURCE-COMPUTER IBM-370 WITH DEBUGGING MODE.             
        OBJECT-COMPUTER.  IBM-370.                               
        DATA DIVISION.                                           
        WORKING-STORAGE SECTION.                                 
         01 X PIC X.                                             
        PROCEDURE DIVISION.                                     
        DECLARATIVES.                                           
        DEBUG SECTION.                                           
                   USE FOR DEBUGGING ON ALL PROCEDURES.         
        COBOL-II-DEBUG-PARA.                                     
                    DISPLAY 'ENTERING... ' DEBUG-NAME.           
        END DECLARATIVES.                                       
        PGM SECTION.                                             
             DISPLAY 'HI'                                       
             PERFORM 1000-PARA.                                 
             STOP RUN.                                           
        1000-PARA.                                               
             DISPLAY 'THIS IS THE COBOL DEBUGGING PROGRAM'.     
             PERFORM 110-PARA.                                   
        110-PARA.                                               
             DISPLAY 'DEBUGGED'.                                 
/*                                                               
//GO.SYSOUT   DD SYSOUT=*                                       
[/code]
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8697
Location: Dubuque, Iowa, USA

PostPosted: Wed Sep 15, 2010 4:26 pm
Reply with quote

What, exactly, do you think the WITH DEBUGGING MODE phrase does?

There is a link to manuals at the top of the page. Click on it, find the COBOL Language Reference manual and read up on the phrase. I think you will find it does nothing like what you apparently believe it does.
Back to top
View user's profile Send private message
Gary McDowell

Active User


Joined: 15 Oct 2012
Posts: 139
Location: USA

PostPosted: Mon Mar 11, 2013 7:55 pm
Reply with quote

It just looks like you need to put the letter 'D' in column 7 of your DISPLAY line for "WITH DEBUGGING MODE".
Code:
        110-PARA.
       D    DISPLAY 'DEBUGGED'.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts HILITE on Browse mode? TSO/ISPF 2
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts Using API Gateway from CICS program CICS 0
No new posts COBOL -Linkage Section-Case Sensitive COBOL Programming 1
No new posts COBOL ZOS Web Enablement Toolkit HTTP... COBOL Programming 0
Search our Forums:

Back to Top