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 Profile Log in to check your private messages Log in
 
how to see connection of FIRGMMFS pgm to online pgm FIRGM000

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
View previous topic :: :: View next topic  
Author Message
veena_nagesh2002
Warnings : 1

Active User


Joined: 07 May 2005
Posts: 110
Location: hyderabad

PostPosted: Fri Sep 26, 2008 3:36 pm    Post subject: how to see connection of FIRGMMFS pgm to online pgm FIRGM000
Reply with quote

FIRGMMFS is the online screen program which will pass input messages to FIRGM000 pgm, which inturns performs certain operation and returns to output messages to online screen pgm FIRGMMFS. I would like to know how the connection is established and where we need to verify these connections
Back to top
View user's profile Send private message

Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Fri Sep 26, 2008 8:43 pm    Post subject:
Reply with quote

Is FIRGMMFS a message format or an executing program?
Back to top
View user's profile Send private message
veena_nagesh2002
Warnings : 1

Active User


Joined: 07 May 2005
Posts: 110
Location: hyderabad

PostPosted: Mon Sep 29, 2008 11:21 am    Post subject:
Reply with quote

I didn't get what exactly you are asking, but for your understanding i am pasting part of FIRGMMFS code

PAGE1 DPAGE CURSOR=((03,17))
* LINE-01 *************************************************************
TRANCODE DFLD POS=(01,02),LTH=08,ATTR=(MOD)
DFLD 'ROUTE AWAITING GROUP MAINT 0596', @
POS=(01,11),ATTR=(NUM,PROT)
SECURTY1 DFLD POS=(01,43),LTH=19,ATTR=(MOD,PROT,NUM,NODISP)
SECURTY2 DFLD POS=(01,63),LTH=18,ATTR=(MOD,PROT)
* LINE-24 *************************************************************
SYSMSG DFLD POS=(24,02),LTH=79,ATTR=(NUM,PROT,HI)
* LINE-02 *************************************************************
IDLIT DFLD POS=(02,02),LTH=14,ATTR=(NUM,PROT)
JULDTE DFLD POS=(02,17),LTH=03,ATTR=(MOD,NUM)
LOADNUM DFLD POS=(02,21),LTH=06,ATTR=(MOD,ALPHA)
UNQID DFLD POS=(02,28),LTH=02,ATTR=(MOD,NUM)
DFLD 'CENTER :', @
POS=(02,36),ATTR=(MOD,NUM,PROT)
CNTR DFLD POS=(02,49),LTH=04,ATTR=(MOD,NUM,PROT)
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Mon Sep 29, 2008 4:53 pm    Post subject:
Reply with quote

This is MFS - message format service - it formats the screen. It communicates with your DC program. The logic for the application is in your DC program.
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 -> IMS DB/DC All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm
No new posts Execute TSO ACF commands from COBOL-I... supreethi.srid TSO/ISPF 0 Tue Feb 21, 2017 5:19 pm
No new posts 24x7 online logs using DSN1LOGP (simi... SRICOBSAS DB2 3 Thu Aug 18, 2016 11:52 am
No new posts Updating online Db2 table kishpra DB2 3 Fri Aug 12, 2016 2:44 pm
No new posts Online Assembler Program Starting point Aditya.Srivastava PL/I & Assembler 4 Fri Jul 08, 2016 6:48 pm

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