View previous topic :: View next topic |
Author |
Message |
mainhead Beginner
Joined: 07 Feb 2006 Posts: 26 Topics: 11
|
Posted: Tue Feb 07, 2006 5:51 am Post subject: Lower case Validate |
|
|
Hi ,
I want to validate a file such that if any lowercase present in input file it should not come into output file . Please give any information about to validate this .
Thanks, |
|
Back to top |
|
 |
ofer71 Intermediate
Joined: 12 Feb 2003 Posts: 358 Topics: 4 Location: Israel
|
Posted: Tue Feb 07, 2006 6:30 am Post subject: |
|
|
If you can use REXX, then it's pretty easy:
Code: |
ADDRESS TSO "EXECIO * DISKR FILEIN (STEM IN. FINIS"
DO I = 1 TO IN.0
IF DATATYPE(IN.I,"L") THEN
ITERATE I
END I
EXIT
|
For COBOL, here is an example I found in Google groups.
O.
________
halfbaked
Last edited by ofer71 on Sat Feb 05, 2011 11:31 am; edited 1 time in total |
|
Back to top |
|
 |
mainhead Beginner
Joined: 07 Feb 2006 Posts: 26 Topics: 11
|
Posted: Tue Feb 07, 2006 7:54 am Post subject: Lower case Validate |
|
|
Thanks for your information .
Iam using cobol
Please could you help up with this
I have input file which iam copying to ANOTHER file which is output
Input record length of 80 for example
----+----1----+----2----+----3----+----4----+-
02362,A1B, ,P,J,200545,000000,000000000,000100
and i want only to check 7 - 9 fields to check it whether its upper case or lower case , if lower case not to copy .
Can you give information regarding this or i can use jcl to overcome
Thanks |
|
Back to top |
|
 |
Bithead Advanced

Joined: 03 Jan 2003 Posts: 550 Topics: 23 Location: Michigan, USA
|
Posted: Tue Feb 07, 2006 9:18 am Post subject: |
|
|
Try this:
if function upper-case (field-7-9) = field-7-9
... copy the record....
end-if. |
|
Back to top |
|
 |
mainhead Beginner
Joined: 07 Feb 2006 Posts: 26 Topics: 11
|
Posted: Thu Feb 09, 2006 1:59 am Post subject: Lower case validate |
|
|
Thanks bit head ,its really helped me and sorry to come again . is it possible to remove the data thru Jcl by sort utility ??. could you please give any information on this . |
|
Back to top |
|
 |
|
|