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
 
Skip a field without protecting it?

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

New User


Joined: 20 Mar 2007
Posts: 1
Location: Pittsburgh

PostPosted: Thu Oct 25, 2007 7:49 pm    Post subject: Skip a field without protecting it?
Reply with quote

Do you know if there is a way to make the cursor skip over a field but NOT protect the field? From what I recall ASKIP protects the field and skips over it. Our users want to be able to enter data into the field but only in rare occassions. So they want the cursor to tab right past the field. Then, on the rare occasion that they want to enter something there, they can position their cursor on the field and enter data.

Thanks!
Back to top
View user's profile Send private message

Earl

Active User


Joined: 17 Jun 2007
Posts: 148
Location: oklahoma

PostPosted: Thu Oct 25, 2007 9:12 pm    Post subject:
Reply with quote

they will need to perform a manual TAB keystroke, if they don't
want to enter data.


I suppose you could initially define the field as ASKIP, then on rare
occassions, give them a PF or PA key to hit, that would then unprotect
the field and position cursor to it..
Back to top
View user's profile Send private message
Negi

New User


Joined: 25 Oct 2007
Posts: 5
Location: kolkata

PostPosted: Mon Oct 29, 2007 2:44 pm    Post subject:
Reply with quote

could we use dynamic cursor positioning for this??

so for rare occasions the cobol code will itself place the cursor into the asserted field??
Back to top
View user's profile Send private message
Earl

Active User


Joined: 17 Jun 2007
Posts: 148
Location: oklahoma

PostPosted: Mon Oct 29, 2007 7:36 pm    Post subject:
Reply with quote

yes,

move 'A' to the fldnmeA unprotect the field
move -1 to the fldnmeF position cursor

exec cics send map('xxxx') mapset('xxxx')
dataonly cursor end-exec.
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 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
No new posts Logic to skip Maximum time-stamp and ... vickey_dw DB2 2 Thu Feb 01, 2018 11:15 pm
No new posts Query to skip Max time-stamp and fetc... vickey_dw DB2 8 Sun Jan 28, 2018 1:09 am

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