how to see connection of FIRGMMFS pgm to online pgm FIRGM000

veena_nagesh2002 · Posted: Fri Sep 26, 2008 3:36 pm

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

Sandy Zimmer · Posted: Fri Sep 26, 2008 8:43 pm

Is FIRGMMFS a message format or an executing program?

veena_nagesh2002 · Posted: Mon Sep 29, 2008 11:21 am

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)

Sandy Zimmer · Posted: Mon Sep 29, 2008 4:53 pm

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.