Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
Check alphanumeric(X) values in is numeric clause condition

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Mainframe COBOL
Author Message
sangar_blr

New User


Joined: 01 Apr 2005
Posts: 8

PostPosted: Fri Apr 01, 2005 2:15 pm    Post subject: Check alphanumeric(X) values in is numeric clause condition
Reply with quote

if u check alphanumeric(X) values in is numeric clause condition what will happen?

for example

1) ws-data pic x(4) value "123".
IF ws-data is numeric
display "sangar"
else
display "gan".
what is the display value?

2) ws-data pic x(4) value "1234".
IF ws-data is numeric
display "sangar"
else
display "gan".
what is the display value?
Back to top
View user's profile Send private message
References
sivatechdrive

Active User


Joined: 17 Oct 2004
Posts: 173
Location: hyderabad

PostPosted: Mon Apr 04, 2005 5:38 pm    Post subject:
Reply with quote

Hi Sangar

the IS numeric clause can be used with alphanumeric field

i suppose

the ist results in "gan". as 123 is passed & the last byte is padded with space

the 2nd result in "sangar"



thanks
siva
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1526

PostPosted: Tue Apr 05, 2005 6:21 am    Post subject:
Reply with quote

An A/N field will test positive for NUMERIC if it only contains the digits
0-9, that is, X'F0' thru X'F9'.

Any other values will result in a failed NUMERIC test.
Back to top
View user's profile Send private message
prasad_yadav20

New User


Joined: 12 Mar 2005
Posts: 13
Location: hyderabad

PostPosted: Tue Apr 05, 2005 6:00 pm    Post subject: if dataset deleted what abend we get
Reply with quote

hi.
if i deleted dataset phisically in 1st step of one proc ,if i want to access same dataset which i am delete in 2nd step then what abend i will get?
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Mainframe COBOL All times are GMT + 6 Hours
Page 1 of 1