RAMESH KRISHNA REDDY
mainframe discussion forum - cobol, db2,cics,jcl,file-aid,changeman,... interview questions, quizs
 
HOME



XPEDITER

 
 Testing tool that simplifies the task of identifying problems,  
applying solutions, and analyzing changes
 
This Document is intend to teach  how we can debug a program in Xpediter. 
If  you got any problems while trying this, contact me.  At srcsinc@yahoo.com

Software     : XPEDITER
VERSION      : 7.0
PROGRAM TYPE : BMP  (BATCH PROGRAM)


Before going to debug a program, Let us assume following things

Step1 :  Write a Simple Cobol Program.
Step2 :   Stage it in CHANGE MAN , make sure its status is ACTIVE
          (While compiling select the XPEDITER option to 'Y') 

          If You does not have CHANGE MAN  
          Include following steps in the compilation JCL, for getting the DDIO files,
          Add these steps before link edit steps.
           
          //XOPTIONS   DD  DISP=SHR,DSN=XT.XT64B1.XOPTIONS             
          //CWPDDIO    DD  DISP=SHR,DSN=FLGFGR1.COBOL.DDIO             
          //CWPPRMO  DD  *                                           
                  COBOL(OUTPUT(PRINT,DDIO))                                  
                  PROCESSOR(OUTPUT(NOPRINT,NODDIO),TEXT(NONE))               
                  LANGUAGE(VSCOBOL)                                          
                  DDIO(OUTPUT(NOLIST,NOXREF,FIND,NODMAP,NOOFFSET,COMPRESS))  
          //*
		  

Step3:   Write an  JCL which runs the COBOL Program.


Assumptions :   
                           PROGRAM NAME              :  STRING1
                           CHANGE MAN PACKAGE NAME   :  ABC1009999
                           LOAD MODULE               :  SSSK.ER000000.ABC1.#009999.BLM





Now we can debug the program in XPEDITER

Enter  'XP'  on command line  in ISPF panel.

Then, the following screen will be displayed


 
----------------------  XPEDITER/TSO 7.0  - PRIMARY MENU  ----------------------
OPTION  ===>                                                                  
                                                                               
         0  DEFAULTS       -   Specify defaults                                   
         1  PREPARE        -   Prepare programs for debugging                     
         2  TSO            -   Debug programs interactively under TSO             
         3  BATCH          -   Debug programs interactively under batch           
         4  STORED PROC    -   Debug DB2 Stored Procedures interactively          
         5  UTILITIES      -  Perform utility functions                          
         F  FADB2          -   Invoke File-AID for DB2                            
         FA FILE-AID       -   Invoke File-AID for MVS                            
         C  CODE COVERAGE -  Code Coverage NOT INSTALLED                        
                                                                               
         B  BULLETIN      - Display summary of changes for this release        
         T  TUTORIAL      - Display information about XPEDITER/TSO             
         X  EXIT          - Exit primary menu                                  
                                                                               
 Profile ===> DEFAULT   <<     
In order to compile our program we need to change STEP1 : Profile ===> DEFAULT to Profile ===> BMP STEP2 : goto OPTION => TYPE 2 ENTER The following screen will be displayed
------------------------  XPEDITER/TSO -  PROFILE (0.4)  ---- Enter Description
 COMMAND ===>                                                  SCROLL ===> PAGE
                                                                                
 LINE COMMANDS:  S (Select)    D (Delete)    C (Copy)    R (Rename)    U (Use)  
 PRIMARY COMMANDS:  MERGE (copy other users profiles)                           
 PROFILE ID:                                                                    
   Profile ===> BMP   >  BATCH PROGRAM                                      <
                                                                                
 CMD  PROFILE   NEW NAME      DESCRIPTION                                       
 -------------------------------------------------------------------------------
_   DEFAULT            > *** NO DESCRIPTION ***                             <
 ******************************* Bottom of data ******************************** 
  
ENTER Profile will be added to the list. Come back to the XPEDITER Main List ------ ???? What is the use of this Step? You are creating your own setting to run an BMP program. All settings will be stored in BMP profiles. Like this you can create your own profiles to run different types of programs. ------ ?????
Again goto the Main Screen of Xpediter. TYPE 2 ENTER It will show following screen. (If your xpediter setup is over this next screen will be displayed)
Profile: DEFAULT ------  XPEDITER/TSO - ENVIRONMENTS MENU  --------------------
 OPTION  ===>                                                                  
                                                                                
     XPEDITER/TSO                                                               
           1  STANDARD  - Test a program with no special environment services   
           2  DIALOG    - Test programs that make ISPF dialog manager calls     
           3  IMS       - Test a program that makes IMS/DB calls                
           4  BTS       - Test programs using BTS                               
                                                                                
                                                                                
                                                                                
                                                                                
      XPEDITER/IMS                                                              
           8  MPP       - Test programs in an IMS message region                
           9  BMP/IFP   - Test a program in a BMP or Fast Path region           
 
TYPE 1 OR 3 (select 1 if you want to run a simple program) (select 3 if you want to run a program which will going to access IMS/DB) ENTER The following screen will be displayed
Profile: SIMPLE -------  XPEDITER/TSO - STANDARD (2.1)  -----------------------
 COMMAND ===>                                                                  
                                                                                
 COMMANDS:  SEtup (Display Setup Menu)                                          
            PROFile (Display Profile Selection)                                 
 TEST SELECTION CRITERIA:                                                       
                                                                                
                Program ===>                                                    
            Entry Point ===>                                                    
            Load Module ===>                                                    
                                                                                
         Initial Script ===>                                                    
            Post Script ===>                                                    
                                                                                
            PARM String ===>                                                    
                                                                                
                                                                                
   File List/JCL Member ===>                                                    
                                                                                
                                                                                
    Is This a DB2 Test? ===> NO    Plan ===>            System ===>             
 
TYPE 'SE' on command line ENTER The following screen will be displayed
Profile: BMP   --------  XPEDITER/TSO - SETUP MENU  --------------------------
 OPTION  ===>                                                                  
                                                                                
           E  EXTENDED     - Extended Setup Menu                                
           0  ENVIRONMENT  - Execution environments menu                        
           1  LOADLIBS     - Application load module libraries                  
           2  DDIO         - DDIO files                                         
           3  INCLUDES     - Test script libraries                              
           4  LOG          - Session log dataset disposition                    
           5  SCRIPT       - Test script dataset disposition                    
           6  DSNLOAD      - DB2 system names and DSNLOAD libraries             
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
           A  ALL          - Display all of the above in succession (except 0)  
                                                                                
            Press ENTER to process  or  enter END command to terminate          

 
Using this screen you need to tell XPEDITER , Where is your load library is? What libraries you are using in your program? Type 1 ENTER The following screen will be displyed
Profile: BMP --------  XPEDITER/TSO - LOAD MODULE LIBRARIES  ------------------
 COMMAND ===>                                                                  
 COMMANDS:  DOWN (for additional User Libraries)                                
 User Libraries:      --->>> Include ALL libraries your program requires <<<--- 
          (Even if the library is in LINKLST, ie. COBOL or LE runtime libraries)
       (1) ===> 'SYS2.LE370Z.PGMLIB'                                             
       (2) ===> ''
       (3) ===> 
       (4) ===>                                              
       (5) ===>                                         
       (6) ===>                                                                 
       (7) ===>                                                                 
       (8) ===>                                                                 
 Installation Libraries: (This list contains overrides to installed defaults)   
       (9) ===>                                                 
      (10) ===>                                                  
      (11) ===>                                                                 
      (12) ===>                                                                 
      (13) ===>                                                                 
      (14) ===>                                                                 
      (15) ===>                                                                 
      (16) ===>
 
Here, we need to give IMS Libraries we are using, You can find them in RUN JCL ENTER TYPE '2' ON SETUP MENTU ENTER
Profile: BMP ------------  XPEDITER/TSO - DDIO FILES  -------------------------
 COMMAND ===>                                                                  
                                                                                
                                                                                
 User Libraries:                                                                
                                                                                
       (1) ===> 'SSSK.ER000000.ABCX.#009999.DDIO'                               
       (2) ===>                                                                 
       (3) ===>                                                                 
       (4) ===>                                                                 
       (5) ===>                                                                 
       (6) ===>                                                                 
                                                                                
                                                                                
 Installation Libraries: (Changes made to this list override installed default  
                                                                                
       (7) ===>                                                                 
       (8) ===>                                                                 
       (9) ===>                                                                 
          
ENTER
COME BACK TO XPEDITER MAIN MENU ALL STANDARD SETTINGS ARE OVER. THE FOLLOWING STEPS YOU NEED TO DO EVERY TIME YOU WANT TO DEBUG A PROGRAM.
----------------------  XPEDITER/TSO 7.0  - PRIMARY MENU  ----------------------
 OPTION  ===>   1                                                               
                                                                                
          0  DEFAULTS      - Specify defaults                                   
          1  PREPARE       - Prepare programs for debugging                     
          2  TSO           - Debug programs interactively under TSO             
          3  BATCH         - Debug programs interactively under batch           
          4  STORED PROC   - Debug DB2 Stored Procedures interactively          
          5  UTILITIES     - Perform utility functions                          
          F  FADB2         - Invoke File-AID for DB2                            
          FA FILE-AID      - Invoke File-AID for MVS                            
          C  CODE COVERAGE - Code Coverage NOT INSTALLED                        
                                                                                
          B  BULLETIN      - Display summary of changes for this release        
          T  TUTORIAL      - Display information about XPEDITER/TSO             
          X  EXIT          - Exit primary menu                                  
                                                                                
    Profile ===> BMP      - IMS BATCH PROGRAM                                   
 
TYPE 1 ENTER The following screen will be displayed
------------------  XPEDITER/TSO - PROGRAAM PREPARATION MENU  ------------------ 
 OPTION  ===>                                                                  
                                                             
         1  CONVERT COMPILE JCL  - Convert compile JCL for XPEDITER 
         2  COMPILE FACILITY     - Compile programs for XPEDITER
         3  BIND FACILITY        - Bind application plans for File-AID DB2
         4  EDIT ALLOCATION LIST - Edit or Create file allocation lists
		 
TYPE 4 ENTER Following screen will be displayed
-----------------------  XPEDITER/TSO - EEDIT FILE LIST  -----------------------
 COMMAND ===>                                                                  
                                                                                
 Specify File Allocation List Below:                                            
                                                                                
 ISPF Library:                                                                  
                                                                                
    Project ===>                                                                
    Group   ===>                                                                
    Type    ===>                                                                
    Member  ===>                 (Blank for member selection list)              
                                                                                
 Other Partitioned or Sequential Dataset:                                       
     Dataset Name  ===>  '< EXISTING PDS >(xped1)'    
    Volume Serial  ===>          (If not cataloged)                             
                                                                                
 Copy from JCL, CLIST, or Other File Allocation List                            
     Dataset Name  ===> '< RUN JCL >'                  
       Copy Option ===> PROMPT   (Replace, Append, Prompt, or Cancel copy)      
  Automatic Expand ===> YES      (Yes/No)                                       
    Step Selection ===>          (Program name for automatic step selection)    
                                                                                
            Press ENTER to Process  or  Enter END Command to Terminate          
			 
ENTER It will prompt you with your run jcl. Select all SYSIN/SYSOUT/INPUT FILES USED IN PROGRAM/OUTPUT FILES
USED IN PROGRAM by putting 'S' infront of that line and Press ENTER. TYPE END on command line ENTER TYPE END on commend line ENTER
------------------------  XPEDITER/TSO -  SELECT DDNAME  ----------- Row 1 Of 6
 COMMAND ===>                                                  SCROLL ===> CSR
                                                                                
 LINE COMMAND: S  (Select)  PRIMARY COMMANDS: END  (Process selected statements)
               BR (Browse dataset)            CAN  (Quit without processing)    
               ED (Edit dataset)              Edit (Edit JCL using ISPF Editor) 
                                              EXP  (Expand JCL procedures)      
                                                                                
             Select the DDNAMEs to be copied to the allocate screen             
                                                                                
 SEL   JCL Data Set:  'XXXXX8.DFC2.XXXXXX.XXX.XXX.SOURCE(RUNJCL)'              
 -------------------------------------------------------------------------------
 ''''' //ESLE04  JOB (ERTWER,XXXXX),'RUNJCL',CLASS=Z,MSGCLASS=A,
 ''''' //                        NOTIFY=&SYSUID
 ''''' //STEP1    EXEC PGM=STRING1
 ''''' //STEPLIB  DD DSN= SSSK.ER000000.ABC1.#009999.BLM,DISP=SHR
 ''S'' //SYSIN    DD *
 ''S'' //SYSOUT   DD SYSOUT=*
 ******************************* Bottom of data ********************************
  
COME BACK TO XPEDITER MAIN SCREEN. TYPE 2 ENTER
Profile: BMP ----------  XPEDITER/TSO - STANDARD (2.1)  ----------------------- 
 COMMAND ===>                                                                  
                                                                                
 COMMANDS:  SEtup (Display Setup Menu)                                          
            PROFile (Display Profile Selection)                                 
 TEST SELECTION CRITERIA:                                                       
                                                                                
                Program ===> STRING1                                            
            Entry Point ===>                                                    
            Load Module ===>                                                    
                                                                                
         Initial Script ===>                                                    
            Post Script ===>                                                    
                                                                                
            PARM String ===>                                                    
                                                                                
                                                                                
   File List/JCL Member ===> 'XXXX2.XXXX98.xxxxxx.SOURCE(XPED1)'
                                                                                
                                                                                
    Is This a DB2 Test? ===> NO    Plan ===>            System ===>             
 
ENTER YOU WILL BE PROMPTED WITH YOUR PROGRAM --------------- COMMANDS --------------- 1. PRESS F9 to debug your programs ( = GO 1) 2. PRESS F12 to execute all statement up to break point (= GO) 3. Break Points B (before execution) / A (After execution) put 'B' on line where you want to stop execution. Ex. 00B046 READ INFILE INTO WORK-REC PRESS ENTER, line will displayed in following way 000046 B READ INFILE INTO WORK-REC now, If you press F12 , all statements executed and control will stop at this line 4. KEEP / K If you want to see a variable value while excuting, use KEEP syntax - KEEP < VARIABLE NAME > It shows the variable name and changing value while you debugging in the top part of screen 5. PEEK < VARIABLE NAME > P (PEEK) < VARIABLE NAME > and press Enter. The screen automatically scrolls to the DATA DIVISION statement where the VARIABLE defined, inserts a P in column 9, and displays the occurrence and value of that variable 6. SKIP To skip execution of a particular line Serial No. 3, 4, 5, 6 command are line commands we can use them on line ex. 00S089 MOVE WS-SYS-VAR TO WS-ANM-VAR. Following are command line commands. means you need to use them at command line. 7. GOTO It is used to pass control to particular line/paragraph syntax : GOTO < LINE NUMBER > GOTO < PARA NAME > 8. WHEN WHEN is used to pause the execution of the program at certain point when the set condition arises EX. WHEN WS-SYS-VAR = 4587384 Xpediter stops the execution whenever it satisfies the condition. 9. QUIT to come out of Debugging session. You can post queries on XPEDITER FORUM Please send improvement suggestions on this document to srcsinc@yahoo.com
- RAMESH KRISHNA REDDY



 If you feel this material is useful to you and want to improve this site further.... 
 

 1. Sharing your knowledge by sending materials/questions which you developed 
    to srcsinc@yahoo.com 



	






Home  Home Home | Donations | Entertainment | Contactme | Privacy