Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Testing CICS program as stand alone

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
Dsingh29

Active User


Joined: 16 Dec 2008
Posts: 132
Location: IBM

PostPosted: Wed Jul 27, 2011 4:18 pm    Post subject: Testing CICS program as stand alone
Reply with quote

Hi All,

We are coding for a project, where my screen is being called from some other screen.

I have completed coding for my screen but the calling screen is not yet completed (which is being coded by someone else). I want to start with testing of my code now rather then waiting for calling screen to be completed.

Can you please provide me some ways to test my code as a stand alone program, without much change in code?

Can populating linkage section through a JCL, be an option?

I have tried to search the forum for standalone testing of cics program, but could not find much. icon_redface.gif

Many thanks in advance.
Back to top
View user's profile Send private message

Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2502
Location: Atlanta, Georgia, USA

PostPosted: Wed Jul 27, 2011 4:36 pm    Post subject: Reply to: Testing CICS program as stand alone
Reply with quote

Could you LINK to your program, via CECI, passing a commarea (if required)?

When the program terminates, you must use a plain-jane EXEC CICS RETURN.

Or, define a temporary transid to your program and use CEDF or a 3rd-Party Debugger?

HTH....

Bill
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Wed Jul 27, 2011 4:39 pm    Post subject: Reply to: Testing CICS program as stand alone
Reply with quote

Well, it is an excellent opportunity for "desk checking".

No, you won't be able to do it directly from JCL. You will at least need a "stub" to do the establishment of correct linkage to your program.

Once you have a "stub", if you have a debugger, you can amend the values in the stub to simulate different situations.
Back to top
View user's profile Send private message
Dsingh29

Active User


Joined: 16 Dec 2008
Posts: 132
Location: IBM

PostPosted: Wed Jul 27, 2011 4:59 pm    Post subject:
Reply with quote

Hi Bill, Thanks for your reply.

Yes, I am able to link through CECI and got the response as NORMAL.

Code:

 LINK PROGRAM(XXXXXXX) CO('999999999') TRANS(TTTT)                             
 STATUS:  COMMAND EXECUTION COMPLETE                         NAME=             
  EXEC CICS  LInk Program( 'XXXXXXX ' )                                       
   < COmmarea( '999999999' ) < Length( +00009 ) > < Datalength() > >           
   < SYSid() >                                                                 
   < SYNconreturn >                                                           
   < Transid( 'TTTT' ) >                                                       
   < INPUTMSG() < INPUTMSGLen() > >                                           
   < CHannel() >                                                               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
  RESPONSE: NORMAL                EIBRESP=+0000000000 EIBRESP2=+0000000000     


But the program is not invoked/ran.
Can you please advice how to proceed further. Please let me know if you more information.
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2502
Location: Atlanta, Georgia, USA

PostPosted: Wed Jul 27, 2011 5:27 pm    Post subject: Reply to: Testing CICS program as stand alone
Reply with quote

Dave - Well, you're past step 01 (didn't abend) icon_wink.gif

But, I think you're going to have to get Tech Support to define your program to a temporary transid (PCT entry) of their choosing and then you can begin step 02, debugging with CEDF, IBM DebugTool and/or a 3rd-Party Debugger.

Is your commarea a minimum of 9-Bytes and is your program validating EIBCALEN? Are all '9's a valid commarea value?

Also, you don't need the transid option on the LINK....

Bill
Back to top
View user's profile Send private message
Dsingh29

Active User


Joined: 16 Dec 2008
Posts: 132
Location: IBM

PostPosted: Thu Jul 28, 2011 5:06 pm    Post subject:
Reply with quote

Hi Bill,

We dont have any third party debugger tool, we use CEDF only.

my commarea takes account number and after pressing enter should populate the screen from db. Yes, my program is validating EIBCALEN.

I have used all 9's just to show values here. icon_razz.gif

Regarding, entry to PCT, I will get back after doing research at my end.

Thanks a lot for your time and help.

Ciao.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Testing rerad cursor for status with ... John F Dutcher DB2 8 Fri May 19, 2017 9:35 pm
No new posts IMS T-Pipe queue counts in a COBOL Pr... Siva NKK Kothamasu IMS DB/DC 0 Tue May 09, 2017 6:31 pm
No new posts Need help in REXX CALL program Raje1002 CLIST & REXX 5 Wed Apr 19, 2017 11:18 pm
No new posts CICS Transaction Timeout Hooman24 CICS 2 Sun Apr 16, 2017 2:16 pm
No new posts Date and time format in CICS Chandru3183 CICS 2 Sat Mar 18, 2017 12:46 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us