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 can i find my cursor in the 6th field as soon as i enter

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

New User


Joined: 15 Feb 2008
Posts: 11
Location: bangalore

PostPosted: Mon Feb 18, 2008 4:16 pm    Post subject: How can i find my cursor in the 6th field as soon as i enter
Reply with quote

hi,

i have few questions regarding cics screens.
1,if i have 10 fields in the cics screen how can i find my cursor in the 6th field as soon as i enter into the screen?
2,which EIB field will tell that whether we are entering into the screen for the first time or not?if it is not
the EIB field what other will tell that?

please clarify.
Back to top
View user's profile Send private message

dbzTHEdinosauer

Global Moderator


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

PostPosted: Mon Feb 18, 2008 4:25 pm    Post subject:
Reply with quote

1. there is a format for setting a cursor position. ck the manual.

2. there is no eib field that will tell you this, you have to keep track of that yourself. most people use the dfhcommarea or a queue item to keep-track of processing performed for a user/terminal.
Back to top
View user's profile Send private message
star_dhruv2000

New User


Joined: 03 Nov 2006
Posts: 87
Location: Plymouth, MN USA

PostPosted: Tue Feb 19, 2008 11:10 am    Post subject:
Reply with quote

Hi,

You may use following to check CURSOR position:


Code:
DIVIDE EIBCPOSN BY 80 GIVING WS-ROW REMAINDER IN WS-COL.
ADD  1         TO WS-ROW.
ADD  1         TO WS-COL.


Now, WS-ROW contains the ROW number and WS-COL contains the Column number of the cursor. You can manipulate it as per your requirement.

80 is maximum column number of screen. You may change it in accordance to your screen size.

Generally people use EIBCALEN for checking whether its first time or not. It's value is 0 if first time. It represents the length of COMMAREA. Thus once you processing is complete move some data to commarea to change EIBCALEN.


Cheers! icon_smile.gif
Back to top
View user's profile Send private message
kappera.bindu

New User


Joined: 15 Feb 2008
Posts: 11
Location: bangalore

PostPosted: Tue Feb 19, 2008 2:02 pm    Post subject: hi star_dhruv2000
Reply with quote

hi,

i need to modify the map code to have the cursor position in the 6th field as soon as i enter.
is there any way to do that?
answer for second question is fine.thank you.
Back to top
View user's profile Send private message
agkshirsagar

Active Member


Joined: 27 Feb 2007
Posts: 686
Location: Earth

PostPosted: Tue Feb 19, 2008 2:06 pm    Post subject:
Reply with quote

There is 'IC' parameter in the DFHMDF to serve your purpose.
Back to top
View user's profile Send private message
kappera.bindu

New User


Joined: 15 Feb 2008
Posts: 11
Location: bangalore

PostPosted: Tue Feb 19, 2008 3:08 pm    Post subject: hi agkshirsagar
Reply with quote

hi,
thanks for answer.
i got it now.
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 Testing rerad cursor for status with ... John F Dutcher DB2 8 Fri May 19, 2017 9:35 pm
No new posts find RACF group for access to spooled... jzhardy JCL & VSAM 1 Mon May 08, 2017 11:46 am
No new posts READ A PACKED "NEGATIVE" FI... jdesouza CA Products 3 Tue May 02, 2017 11:43 pm
No new posts To find out size allocated to a seque... ashek15 JCL & VSAM 15 Thu Apr 27, 2017 9:42 am
No new posts Alter &DATENS field in HEADER1 Angad DFSORT/ICETOOL 4 Mon Apr 24, 2017 11:49 am


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