Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
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 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: 6970
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 RACF- How to find the Last access of ... rahul shanmuganatan All Other Mainframe Topics 6 Thu Jun 21, 2018 3:19 pm
This topic is locked: you cannot edit posts or make replies. Rexx code to find greater then symobl... Bharath Vikraman CLIST & REXX 8 Tue May 29, 2018 9:40 am
No new posts How to include a particular field val... sakrat DFSORT/ICETOOL 8 Fri Apr 06, 2018 8:27 pm
No new posts Extract the records with a PD field's... sudhakar84 DFSORT/ICETOOL 11 Mon Apr 02, 2018 7:26 pm
No new posts Searching a table for the field name? socker_dad COBOL Programming 8 Sat Mar 31, 2018 2:57 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us