HP3000-L Archives

January 2002, Week 5

HP3000-L@RAVEN.UTC.EDU
Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
Suprtool question... Multiple outputs using Multiple IF's
From:
"Born, Ken" <[log in to unmask]>
Reply To:
Born, Ken
Date:
Thu, 31 Jan 2002 15:32:15 -0600
Content-Type:
text/plain
Parts/Attachments:
text/plain (34 lines) 
Greetings,
I am working on a suprtool process to be able to generate output files based
on the data in a file.

!RUN SUPRTOOL.PUB.ROBELLE
 INPUT ITC.IWIN.ALERTS
 DEFINE CDC,1,3,CHAR
 DEFINE USER-ID,4,10,CHAR
 DEFINE USER-NAME,14,25,CHAR
 EXTRACT CDC
 EXTRACT "."
 EXTRACT USER-ID
 EXTRACT USER-NAME
 IF CDC == "ITC" AND USER-NAME == "A@"
   OUTPUT USERITCA,ASCII
Now, If the If statement is false, I want to do another test and output the
record
to USERITCB IF CDC == "ITC" AND USER-NAME == "B@"
 XEQ
 EXIT

I attemtped several things but it won't let me use multiple IF's.  I know I
could probably
copy the suprtool block again and replace the two lines with
IF CDC == "ITC" AND USER-NAME == "B@"
   OUTPUT USERITCB,ASCII

But, I don't want a JCL that needs to read the file input file 26 times.  I
was hoping for a cleaner way of doing it.
thanks. in advance...

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2