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
 

 

How do you make your program pseudo-conversational?

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

New User


Joined: 29 Apr 2005
Posts: 38

PostPosted: Thu May 05, 2005 9:54 am    Post subject: How do you make your program pseudo-conversational?
Reply with quote

How do you make your program pseudo-conversational?

by using return command we can achive this?

can you please give me the answer for the same

thanks
vbhat
Back to top
View user's profile Send private message

vasanthanc

New User


Joined: 01 Apr 2005
Posts: 58

PostPosted: Thu May 05, 2005 12:11 pm    Post subject: Re: How do you make your program pseudo-conversational?
Reply with quote

CICS itself is pseudo conversational. CICS doesnt keep your program under execution all the time. It starts executing your program once you press any of the alert keys(enter / esc / function keys)

You also should write your program with the reactions for each alert key. For example, initially you will display input map and execution will stop. On Enter key you may validate the data entered and save if ok. On escape / PF3 exit. On some function key call some other program etc...
But evertime, on each alert key your program will do some thing and will come out of execution.

Because of this reason, you are not able to retain any values in variables in your program in CICS.

kindly let me know if anything wrong
Back to top
View user's profile Send private message
ankyhunk

Moderator


Joined: 05 May 2005
Posts: 98
Location: Navi Mumbai, India

PostPosted: Mon May 09, 2005 3:47 pm    Post subject:
Reply with quote

Quote:
You are not able to retain any values in variables in your program in CICS.


For a program to be pseudo-conversational it should also support re-entrancy. This means the control should return to the program again as stated above. While it is true that data cannot be sustained in working storage section in such programs but u can transfer data through DFHCOMMAREA (Linkage Section) and Temporary Storage Queues.
Back to top
View user's profile Send private message
Deepa.m
Warnings : 1

New User


Joined: 28 Apr 2005
Posts: 99

PostPosted: Thu May 19, 2005 5:32 pm    Post subject:
Reply with quote

By giving the tranid in the Return statement you can make it pseudoconversional thus making the control to enter the same program by specifying the tranid corresponding to that program.

EXEC CICS

RETURN
TRANSID('TN23')
COMMAREA(COMMAREA)
END-EXEC.
you should pass the commarea data too.
Back to top
View user's profile Send private message
jctgf
Currently Banned

Active User


Joined: 04 Nov 2006
Posts: 109

PostPosted: Thu Dec 21, 2006 4:30 am    Post subject: an example pls
Reply with quote

could some one pls provide a code example of a pseudo conversational program?

in a conversational program, after the send command i would place a receive command.

in a pseudo conversational one, which command would come after the send command?

thanks
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Thu Dec 21, 2006 4:45 am    Post subject: Re: an example pls
Reply with quote

jctgf wrote:
in a conversational program, after the send command i would place a receive command.
in a pseudo conversational one, which command would come after the send command?

In a pseudo conversational program, after the send command, you would save any information you might need and return to CICS with either a next trans id pointed to you or the upper left-hand corner of the map you sent, your tranid (with the MDT on).
You can save info by specifying a commarea in the return, putting in a tctua or stashing it in a TS queue.
Back to top
View user's profile Send private message
UmeySan

Active Member


Joined: 22 Aug 2006
Posts: 755
Location: Germany

PostPosted: Thu Dec 21, 2006 3:37 pm    Post subject:
Reply with quote

Hi !

After SEND-MAP, as Will told, save needed information in COMMAREA and
then RETURN to yourself. Then after the user filles out map and pressed ENTER, control comes back to your programm. So then you could issue
RECEIVE-MAP.

EXEC CICS RETURN
TRANSID('TranId')
COMMAREA(COMMAREA)
END-EXEC.

The correct difference between pseudo an non-pseudo conversational i pointed out on question befor in this CICS-Forum.

Regards, UmeySan
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 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 SQL query not working in Cobol program. CuriousMainframer COBOL Programming 14 Wed Feb 22, 2017 5:56 pm
No new posts Executing OO COBOL program invoking J... Virendra Shambharkar COBOL Programming 2 Tue Jan 10, 2017 6:37 pm
No new posts Need Suggestion on COBOL program vickey_dw COBOL Programming 5 Thu Jan 05, 2017 10:55 pm


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