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

Question in Panel regarding input constraints


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

New User


Joined: 07 Nov 2008
Posts: 13
Location: US

PostPosted: Mon Nov 10, 2008 12:08 pm
Reply with quote

I have a panel that gets a input of a variable with 7 characters. The constraint is:
The input should be exactly 7 Digits only.

I have given the command as below:
)PROC
VER(&VAR1,RANGE,0000000,9999999)
VER(&VAR1,NB)
This makes sure that only numeric can be entered and it must not be blank.
Apart from Length command, do we have any other option to check in the panel program itself to check for count of 7 digits like the Range option given in the above example.

Thanks.
Back to top
View user's profile Send private message
vikash singh

New User


Joined: 12 May 2007
Posts: 15
Location: noida

PostPosted: Mon Nov 10, 2008 12:28 pm
Reply with quote

Use following code:
VER(&VAR1,PICT,'NNNNNNN')
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Mon Nov 10, 2008 12:47 pm
Reply with quote

when You look at a manual to find out about PANELS, what manual do You use icon_eek.gif
not certainly the tso REXX reference

why not post to the correct forum?and use the correct terms?

There are no such things like Rexx panels,

panels are an ISPF object,
dialogs, which disply panels can be written in Rexx...

moved where it belongs
Back to top
View user's profile Send private message
Pedro

Global Moderator


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

PostPosted: Mon Nov 10, 2008 9:55 pm
Reply with quote

Quote:
Apart from Length command

What is wrong with the length command? That is, you can invoke rexx from the panel. I think you can use the length function of rexx.
Back to top
View user's profile Send private message
vramya

New User


Joined: 07 Nov 2008
Posts: 13
Location: US

PostPosted: Mon Nov 10, 2008 10:07 pm
Reply with quote

Thanks Vikash. It worked.

There is no disadvantage I came across using length command.
But I have more than 10 varaibles in my program.
I have to use length function for all the variables and display appropriate message.
If I have a command like PICT as mentioned in the previous post, I can directly use them in the declaration itself.

Enrico,
Thanks for moving the post appropriately. I have started working on REXX for the past 1 week and I will take care of these things from my next post.
Back to top
View user's profile Send private message
vikash singh

New User


Joined: 12 May 2007
Posts: 15
Location: noida

PostPosted: Tue Nov 11, 2008 11:59 am
Reply with quote

icon_biggrin.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 -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts TRIM everything from input, output co... DFSORT/ICETOOL 1
No new posts Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
No new posts Execute secondary panel of sdsf with ... CLIST & REXX 1
No new posts force tablespace using LISTDEF input DB2 1
No new posts Two input files & writing counter... DFSORT/ICETOOL 12
Search our Forums:

Back to Top