IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Navigation using PF keys


IBM Mainframe Forums -> IMS DB/DC
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
alamelu1984

New User


Joined: 20 Apr 2007
Posts: 40
Location: bangalore

PostPosted: Fri Aug 17, 2007 3:34 pm
Reply with quote

Hi all,

In my application,i have a main menu screen from which i can navigate to another customer screen..
This navigation i need to do using function keys.

For the MAIN SCREEN MFS PRGM the code i have used is this:

MAIN screen: (here on keying in pf1 ,i shud be able to navigate to the customer screen)

PRINT ON,NOGEN
CUSTMF FMT
DEV TYPE=3270,DSCA=X'00A0',
PFK=(PFKIN,
1='/FOR CUSIO')
DIV TYPE=INOUT

(where CUSIO is the modname of the CUSTOMER SCREEN program)


and also the MID area of the MAIN SCREEN prgm contains:

CUSTMI MSG TYPE=INPUT,SOR=(CUSTMF),NXT=CUSTM
SEG
MFLD PFKIN,LTH=10,FILL=NULL
MFLD 'MAINO ',LTH=10
MSGEND

(where MAINO is the name of the transaction assigned to this program)


Is this piece of code right?????


regards

aalu
Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Fri Aug 17, 2007 7:13 pm
Reply with quote

Quote:
Is this piece of code right?????

What happens when you execute?
Back to top
View user's profile Send private message
alamelu1984

New User


Joined: 20 Apr 2007
Posts: 40
Location: bangalore

PostPosted: Mon Aug 20, 2007 9:25 am
Reply with quote

when i try to execute it..
it says :

DFS121 09:24:05 PARAMETER TOO LONG
Back to top
View user's profile Send private message
girish_s

New User


Joined: 31 Jul 2007
Posts: 45
Location: india

PostPosted: Wed Aug 22, 2007 9:50 pm
Reply with quote

hi...
Quote:
PARAMETER TOO LONG

may be u should increase the pfkin length and give it a try... even i had got a similar sought of error...
Back to top
View user's profile Send private message
alamelu1984

New User


Joined: 20 Apr 2007
Posts: 40
Location: bangalore

PostPosted: Thu Aug 23, 2007 9:46 am
Reply with quote

thanx girish,

it worked...
icon_smile.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> IMS DB/DC

 


Similar Topics
Topic Forum Replies
No new posts Use input file with OMIT rcd keys? DFSORT/ICETOOL 15
No new posts Any JCL or VSAM Utility to get number... JCL & VSAM 1
No new posts Navigation program in CICS CICS 11
No new posts Join the keys via JCL DFSORT/ICETOOL 14
No new posts Process only last key record in a fil... DFSORT/ICETOOL 8
Search our Forums:

Back to Top