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

Move the cursor to the next field


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
bhim_s

New User


Joined: 19 Sep 2006
Posts: 46
Location: Australia

PostPosted: Wed Jan 14, 2009 1:08 pm
Reply with quote

I have created the following panel ..

Code:


)ATTR                                                                 
# TYPE(TEXT) INTENS(LOW) SKIP(ON) COLOR(WHITE)                       
$ TYPE(TEXT) INTENS(LOW) SKIP(ON) COLOR(YELLOW)                       
@ TYPE(TEXT) INTENS(LOW) SKIP(ON) COLOR(WHITE)                       
! TYPE(INPUT) PAD(' ') CAPS(ON) JUST(LEFT) COLOR(WHITE) HILITE(USCORE)
)BODY                                                                 
$*********************************************************************
$*             THIS PANEL IS A TEST PANEL       
$*********************************************************************
$             NOTE - PLEASE ENTER ALL FIELDS IN UPPER CASE           
# PLEASE ENTER YOUR TSO ZID                     @==>!Z      +         
# PLEASE ENTER PR NUMBER                        @==>!Z    +           
# PLEASE ENTER INITIAL OF REQUESTOR             @==>!Z +             
    #                          ACTIVE@==>!Z+ #PURGE @==>!Z+                 
    %+ PRESS% F3+TO EXIT.                      PRESS% ENTER%+TO CONTINUE.   
    %=======================================================================
    )INIT                                                                   
      .ZVARS = '(USERID      +                                             
                 PRNUM    +                                                 
                 INIIAL   +                                                 
    .CURSOR = USERID     
)PROC                     
  &PFVAR = .PFKEY         
    VER (&USERID,NB)     
    VER (&PRNUM,NB)       
    VER (&INIIAL,NB)     
 )END             



I have the requirement to move the cursor to the next field automatically once the first field is complete. Like once userid is filled with 8 chars the cursor should move to field PRNUM. Currently if i type more than 8 chars in userid field it goes to non editing field. I have searched the forum but din't find the solution for it. Any example regarding this would be great help.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Wed Jan 14, 2009 1:13 pm
Reply with quote

Take a look at THIS recent thread.
Back to top
View user's profile Send private message
bhim_s

New User


Joined: 19 Sep 2006
Posts: 46
Location: Australia

PostPosted: Wed Jan 14, 2009 1:24 pm
Reply with quote

expat wrote:
Take a look at THIS recent thread.


Already checked this but didn't help icon_sad.gif
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Wed Jan 14, 2009 1:31 pm
Reply with quote

in the ispf manuals search for the auto skip attribute and use it to
define the filler fields...

as a general consideration
ISPF application are not power typing applications
the autoskip feature, for the end user is usually more an inconvenience than a productivity boost
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Wed Jan 14, 2009 1:44 pm
Reply with quote

follow on...
no need to ask the user to use the caps key
the attribute for the input fields makes ispf translate automagically to upper case the input
or it can be done inside the application
Back to top
View user's profile Send private message
bhim_s

New User


Joined: 19 Sep 2006
Posts: 46
Location: Australia

PostPosted: Wed Jan 14, 2009 7:00 pm
Reply with quote

As per ISPF Manual ..

SKIP(ON|OFF)
The SKIP keyword defines the autoskip attribute of the field. It is valid only for text or output (protected) fields (OFF is the default).

ON
Specifies that the cursor automatically skips the field. When a character is entered into the last character location of the preceding unprotected data field, ISPF positions the cursor at the first character location of the next unprotected field.

OFF
Specifies that the cursor does not automatically skip the field when the condition described for SKIP(ON) occurs.

When you are running in GUI mode, the SKIP keyword is ignored.


I am already using SKIP(ON) for the text fields but still then result is not as per expectation. Instead of moving to the next text field cursor stuck at protected field.
Back to top
View user's profile Send private message
bhim_s

New User


Joined: 19 Sep 2006
Posts: 46
Location: Australia

PostPosted: Wed Jan 14, 2009 8:45 pm
Reply with quote

Thanks all for you reply. I have got the solution

instead of

Code:
# PLEASE ENTER YOUR TSO ZID                     @==>!Z      +


It should be

Code:
# PLEASE ENTER YOUR TSO ZID                     @==>!Z      +@
[/code]
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


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

PostPosted: Wed Jan 14, 2009 9:49 pm
Reply with quote

Bhim_s

thx for getting back with the solution.
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley

PostPosted: Wed Jan 14, 2009 10:31 pm
Reply with quote

You do not need two attributes together. Assuming @ has the SKIP attribute, then this should work:
Code:

# PLEASE ENTER YOUR TSO ZID                     @==>!Z      @
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 -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts COBOL - Move S9(11)v9(7) COMP-3 to -(... COBOL Programming 5
No new posts Join 2 files according to one key field. JCL & VSAM 3
No new posts How to move the first field of each r... DFSORT/ICETOOL 5
No new posts S0C7 - Field getting overlayed COBOL Programming 2
Search our Forums:

Back to Top