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
 

 

Passing messages to CICS screen from a backgroung program

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

New User


Joined: 26 May 2009
Posts: 2
Location: Kansas, USA

PostPosted: Mon Jun 22, 2009 9:51 pm    Post subject: Passing messages to CICS screen from a backgroung program
Reply with quote

Our application runs on CICS and it has many screens, Every user is assigned with printer id when that user is set up on this application. Users can issue a printout(screen print) from any screen on the application. When the user issues a screen print, program will write the data to a TDQ which has a ATI on it and display “Screen print issues” on the user screen. In the back ground, ATI on the TDQ will trigger a generic program which handles prints. This program will find the printer id and the printer mapping using the user id and issue a printout to the correct printer.

For those users who do not have the printer id setup on the application, the default printer id will be assumed. When these users issue printouts, they will be printed on the printer assigned to default id. For such users we want to change this process and display some message (Say”printer id not defined, please contact helpdesk”) on the user screen. As I said there are may screens in our applications making this change to all the programs will be labourious(about 185 pgms). On the other hand, I am looking for a way where I can handle this from the generic print routine(back ground program). If I can do some thing in this program to send back the message to user, it will be simple one program change. When I tried looking at the possibility, I am not having the details of terminal id of the user who wrote the data into TDQ. All the data that is passed to generic program is user id, screen name and a screen data.

Can any one suggest a optimal solution for this please. Thanks for your help!!!
Back to top
View user's profile Send private message

dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Mon Jun 22, 2009 10:09 pm    Post subject:
Reply with quote

are you saying that every module that receives a screen, checks for this 'screen print request', and then formats and outputs an image to the TDQ?
Back to top
View user's profile Send private message
Vinj

New User


Joined: 26 May 2009
Posts: 2
Location: Kansas, USA

PostPosted: Mon Jun 22, 2009 10:23 pm    Post subject:
Reply with quote

Hi Dick Brenholtz,

Yes Every module checks for print request and if requested, it writes the user id, map name, mapset name, symbolic map and length to TDQ. The ATI on the TDQ triggers the print program which will read all the information from TDQ, formats the symbolic map using the map and mapset and then prints on the printer that is mapped to user id using the SPOOL WRITE.

Thanks,
Praveen.
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 475

PostPosted: Tue Jun 23, 2009 4:27 am    Post subject:
Reply with quote

Vinj,



Quote:
using the SPOOL WRITE



In my experience, "exec cics spoolwrite"
sends print to CICS SYSOUT.

Are you sure you understand what your print application is doing ?
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 Date and time format in CICS Chandru3183 CICS 2 Sat Mar 18, 2017 12:46 pm
No new posts Asynchronous CICS Processing Question moezbud CICS 0 Mon Mar 06, 2017 6:13 pm
No new posts CICS Question RE: Browse, Readnext an... moezbud CICS 7 Sun Mar 05, 2017 5:45 am
No new posts how to send just 10 rows in a CICS sc... Megha Gupta CICS 5 Thu Feb 23, 2017 6:57 pm
No new posts SQL query not working in Cobol program. CuriousMainframer COBOL Programming 14 Wed Feb 22, 2017 5:56 pm


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