Announcement letters for XA and ESA

2020-12-12 Thread Seymour J Metz
I'm trying to fill in some details in the wiki article on S/370, and I'd like 
links for announcement letters of GI manuals for the initial releases of

 BTAM/SP
 DFP (XA)
 DFP (ESA)
 GAM/SP
 MVS/SP V2
 MVS/SP V3
 TSO/E (XA)
 TSO/E (ESA)



--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Silly question - can one force IDCAMS PRINT to show printable lower case characters?

2020-12-12 Thread Seymour J Metz
CCSID would determine which characters were treated as valid. I would not 
expect IDCAMS to second guess the user's InfoPrint parameters.

Ideally there should be a common print validation service and every utility 
would have a parameter to pass it.

As long as the utilities attempt to redact "unprintable" data, they should 
allow the user to control that redaction, regardless of how many other places 
have a CCSID option. Especially a CCSID parameter documented as being 
applicable only to tape.

How is DASD an excuse for translating characters that the user considers valid 
to periods? I don't care if it's legacy DASD, SYSOUT or Unix path, the user 
should be able to control the translation.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
Sent: Saturday, December 12, 2020 7:24 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Silly question - can one force IDCAMS PRINT to show printable 
lower case characters?

On Sat, 12 Dec 2020 23:40:52 +, Seymour J Metz wrote:

>I might believe lost in the world of 3211; the 3211 is older than IDCAMS. 
>Shirley it's time to add a CCSID operand.
>
What would CCSID do?  What implementation do you envision?
Would it interface to InfoPrint?  Shouldn't every utility have one?
But that's redundant; it should be an option on DD SYSOUT.
DD, EXEC, and JOB already have a CCSID option.  Is that enough?

And if SYSPRINT is DASD, it should just pass the data unfiltered.

BitSavers reinforces my conjecture.  Something you don't want in a production 
job:

http://secure-web.cisco.com/1WhhAX4GjxhomdW3zmNfgT472Yr6nQhRZO040EgqFcFvPBMsDPxogfvqMO12NQs36E2Lf8gEmkDkccMSTqwEn22FDxfabOAdb9sSzzpmB-xLwJnTd8s0I4b9wVTIf0YIGlbUnRiAzzGGuj70uPltjgBdpcAQD3hM1RWi8kVLFAnzpfZI1-qtzSoC0tniJheFaqIvC82btQ5mIONuQYT_xpuDWMvGGdUjRSGL9FImMDx_75jgCFL2ZMBBktTpOE9u1wCgOPfs_9yaGHJ-C-WuKzYLleg8tqOQOg-XcMKs15NG3euVyj0GQw2OiD2ueoIZWJ7M0XyKZpOPrBTvXbLGr9WXF93UHmZ3y5NjnJZpxcjkFG8_3iC6cs8Jn3Ud4f-CCsiRjoKzqaHZ7tXHzsMIikG1gcxJ0BUwzivOPmilFUZ7RuB7rHgBZdogbSOd9bt9X/http%3A%2F%2Fwww.bitsavers.org%2Fpdf%2Fibm%2F1403%2FGA24-3073-8_1403_printer.pdf

Data Check (Sense Bit 4)
Data check indicates that a code in a data record sent to the printer does not 
match a code in the Universal Character
Set (UCS) feature storage. Printing does not occur in the
print position to which the unmatching code applies. The entire line (except 
for the data check position) OIr only a portion of the line may be printed. 
Therefore, the last
printed line may contain erroneous data and/or an incomplete record. Data check 
usually indicates that the UCS storage
was improperly loaded or that a data record code (other than blank or null) 
does not compare to any code in the UCS storage.
Provide an operator message and exit from this error- recovery procedure. The 
operator should then:
1. Accept the record and indicate that the application
program is to proceed without further retry of the
command, or
2. Restart the application program from a logical
point.
If the error persists, a call should be made to a service
representative.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Silly question - can one force IDCAMS PRINT to show printable lower case characters?

2020-12-12 Thread Paul Gilmartin
On Sat, 12 Dec 2020 23:40:52 +, Seymour J Metz wrote:

>I might believe lost in the world of 3211; the 3211 is older than IDCAMS. 
>Shirley it's time to add a CCSID operand.
> 
What would CCSID do?  What implementation do you envision?
Would it interface to InfoPrint?  Shouldn't every utility have one?
But that's redundant; it should be an option on DD SYSOUT.
DD, EXEC, and JOB already have a CCSID option.  Is that enough?

And if SYSPRINT is DASD, it should just pass the data unfiltered.

BitSavers reinforces my conjecture.  Something you don't want in a production 
job:
www.bitsavers.org/pdf/ibm/1403/GA24-3073-8_1403_printer.pdf

Data Check (Sense Bit 4)
Data check indicates that a code in a data record sent to the printer does not 
match a code in the Universal Character
Set (UCS) feature storage. Printing does not occur in the
print position to which the unmatching code applies. The entire line (except 
for the data check position) OIr only a portion of the line may be printed. 
Therefore, the last
printed line may contain erroneous data and/or an incomplete record. Data check 
usually indicates that the UCS storage
was improperly loaded or that a data record code (other than blank or null) 
does not compare to any code in the UCS storage.
Provide an operator message and exit from this error- recovery procedure. The 
operator should then:
1. Accept the record and indicate that the application
program is to proceed without further retry of the
command, or
2. Restart the application program from a logical
point.
If the error persists, a call should be made to a service
representative.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Silly question - can one force IDCAMS PRINT to show printable lower case characters?

2020-12-12 Thread Seymour J Metz
I might believe lost in the world of 3211; the 3211 is older than IDCAMS. 
Shirley it's time to add a CCSID operand.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Attila Fogarasi [fogar...@gmail.com]
Sent: Saturday, December 12, 2020 4:54 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Silly question - can one force IDCAMS PRINT to show printable 
lower case characters?

Yes, you have to switch to a print train which has lower case (since IDCAMS
is lost in the world of 1403).
PARM GRAPHICS(CHAIN(SN))  as your first IDCAM statement will switch to
printing lower case instead of periods.

On Sun, Dec 13, 2020 at 8:35 AM Binyamin Dissen 
wrote:

> Silly question - can one force IDCAMS PRINT to show printable lower case
> characters?
>
> --
> Binyamin Dissen 
> http://secure-web.cisco.com/1VfS157sCRvu2bl4qZIKzzFnZFLt7o09B94XI3fnCStgsCjFgHKDrlCzyakB44Fj3xUaBy6ZW1y5BhhE4chmJYkEnWZaoGKa4mhwl1ODFrJP3cG-E6o5N4olM5vnuPJlBFVUPQvqfGaJFLi13hPUrYQR8n5Egmlj-C3rARILkWqnDqfb6ktGOXFvcQdpnR5gst0qSbn3YDyeLr9XqyDXlRKiU70cpSUR5xdKAXwWkI7RgKRZ7coAEKFM9t6iO2HECj1JTpwwmHOAoRU1Z1GkbgY1eKZfcmrbtrEViGp7IqM53TBF_rB82_ONKeb9f8HldSLay01oz_dB3w-aeYcPj1R4RwFI0wyzwPV2a3iegAJA3RTF29Conf9N0aF5VbEk7AYyMYzUorgezrUiXewZiwPp2D0nknzTgJCFKmjZZQIdLJjQ8ba0JIsN1zGlEPud5/http%3A%2F%2Fwww.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
>
> Should you use the mailblocks package and expect a response from me,
> you should preauthorize the dissensoftware.com domain.
>
> I very rarely bother responding to challenge/response systems,
> especially those from irresponsible companies.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Silly question - can one force IDCAMS PRINT to show printable lower case characters?

2020-12-12 Thread Paul Gilmartin
On Sat, 12 Dec 2020 23:34:50 +0200, Binyamin Dissen 
 wrote:

>Silly question - can one force IDCAMS PRINT to show printable lower case
>characters?
>
GRAPHICS (CHAIN(TN))/*COMMENT*/ -

Who woulda thunk it.

How come in this 21st Century this isn't the default?  I suppose a data
check caused an important cu$tomer's printer to miss a batch window.

Don't know about Hebrew.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Silly question - can one force IDCAMS PRINT to show printable lower case characters?

2020-12-12 Thread Attila Fogarasi
Yes, you have to switch to a print train which has lower case (since IDCAMS
is lost in the world of 1403).
PARM GRAPHICS(CHAIN(SN))  as your first IDCAM statement will switch to
printing lower case instead of periods.

On Sun, Dec 13, 2020 at 8:35 AM Binyamin Dissen 
wrote:

> Silly question - can one force IDCAMS PRINT to show printable lower case
> characters?
>
> --
> Binyamin Dissen 
> http://www.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
>
> Should you use the mailblocks package and expect a response from me,
> you should preauthorize the dissensoftware.com domain.
>
> I very rarely bother responding to challenge/response systems,
> especially those from irresponsible companies.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Silly question - can one force IDCAMS PRINT to show printable lower case characters?

2020-12-12 Thread Binyamin Dissen
Silly question - can one force IDCAMS PRINT to show printable lower case
characters? 

--
Binyamin Dissen 
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Z15 zedc compression and CONNECT DIRECT, MFT compression

2020-12-12 Thread Kenneth J. Kripke
First off, thank you to all that responded to this inquiry. 

Some additional information: 

On our systems that are still running on the z/14 processor, the triplets,
Offset, Length, and Count are all present in the SMF type 30 record.  

The products in question are using the unauthorized method of zEDC
compression and de-compression.  In order to get the use of the facility, it
was 

Necessary to add FPZ.ACCELERATOR.COMPRESSION Read access the specific
started tasks.  This was necessary in the pre z/15 days.  For SMF type 30
records created on non z/15 processors, 

All 3 fields are filled in with data.  With the compression now incorporated
in the z/15 hardware, we have seen only the Offset and length fields filled
in.  I need to point out that only the un-authorized tasks exhibit this 

Anomaly.  The reference material I have viewed is
https://www-01.ibm.com/servers/resourcelink/svc00100.nsf/pages/zOSV2R4sa2313
77/$file/ieac100_v2r4.pdf . 

It's not a big issue, just that how do we know if compression is really
taking place 

 

Sincerely; 

 

Kenneth J. Kripke 

 

 

 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Gwyn's Maxim (was: FSUM7197 pax ...)

2020-12-12 Thread Bob Bridges
Yeah, boy, I did that once.  I was compiling my COBOL code, and chafed yet 
again at how sloppy the JCL proc was.  I decided to make my own version, 
decently aligned and all the DD names in a conceptually logical order.  In the 
process I fixed a few things; for example, I allowed the JCL to delete, from 
the PDS shared by all the developers, the member that I no longer needed.

I ran it around noon.  There were, I would guess, not quite 50 of us in the 
department, so I wiped out about four hours' work for let's guess 30 or 40 
programmers.  I was not a popular newbie that day.

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* Of all tyrannies, a tyranny sincerely exercised for the good of its victims 
may be the most oppressive. It may be better to live under robber-barons than 
under omnipotent moral busybodies. The robber-baron's cruelty may at some point 
be satiated; but those who torment us for our own good will torment us without 
end, for they do so with the approval of their own conscience.  -CS Lewis */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Thursday, November 5, 2020 15:42

https://opensource.com/business/14/12/linux-philosophy

--- On Thu, 5 Nov 2020 06:46:15 -0800, Charles Mills wrote:
>What the heck were the UNIX designers thinking when they allowed the casual 
>creation of a filename of -x? There may be a legitimate reason why someone 
>would want to create a file named -x but if so, then *they* should be made to 
>jump through some small hoop and "escape" the name in some way. The innocent 
>victim who stumbles into this situation should not be the one made to jump 
>through hoops. Will UNIX allow the creation of a file named "rm *"? That could 
>have some interesting side effects.
>
Even worse, a file named "-rf *".

This resembles the plaint of a JCL novice who has just encountered, painfully, 
the astonishing behavior of:
//SYSUT1 DD DSN=(MEMBER),DISP=(OLD,DELETE)

That should be fixed for DYNALLOC, JCL, TSO, globally by making the TU for 
member mutex with the TU for delete.  Who volunteers to bell the RFE cat?

Probably there's a "dusty deck" somewhere whose inexcusably clever author 
relied on the behavior and whose heirs haven't access to the source.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: JCL EXEC name field?

2020-12-12 Thread John McKown
No URL for the manual, but I got the following on a z/OS 2.4 system:

1 J E S 2  J O B  L O G  --  S Y S T E M  ? ? ?
 --  N O D E  N 1
0
 10.09.36 JOB02763  SATURDAY,  12 DEC 2020 
 10.09.36 JOB02763  IRR010I  USERID !!   IS ASSIGNED TO THIS JOB.
 10.09.36 JOB02763  IEFC452I !!X - JOB NOT RUN - JCL ERROR  898
0-- JES2 JOB STATISTICS --
03 CARDS READ
0   18 SYSOUT PRINT RECORDS
00 SYSOUT PUNCH RECORDS
01 SYSOUT SPOOL KBYTES
0 0.00 MINUTES EXECUTION TIME
1 //!!X  JOB CLASS=K,MSGCLASS=H,NOTIFY=
   JOB02763
  //*ISPF EDIT OF !!.PDS.JCL(IEFBR14)
  IEFC653I SUBSTITUTION JCL - CLASS=K,MSGCLASS=H,NOTIFY=!!
2 //000.STEP EXEC PGM=IEFBR14
  STMT NO. MESSAGE
 2 IEFC662I INVALID LABEL


But then I did thie:

1 J E S 2  J O B  L O G  --  S Y S T E M  ?
 --  N O D E  N 1
0
 10.13.29 JOB02764  SATURDAY,  12 DEC 2020 
 10.13.29 JOB02764  IRR010I  USERID !!   IS ASSIGNED TO THIS JOB.
 10.14.03 JOB02764  ICH70001I !!   LAST ACCESS AT 10:07:43 ON SATURDAY,
DECEMBER 12, 2020
 10.14.03 JOB02764  $HASP373 !!Y  STARTED - INIT 1- CLASS A
 - SYS CBT
 10.14.03 JOB02764  -  TIMINGS
(MINUTES)-  -PAGING C
 10.14.03 JOB02764  -STEPNAME PROCSTEPRC   EXCP   CONN   TCB
SRB  CLOCK  SERV  WORKLOAD  PAGE  SWAP
 10.14.03 JOB02764  -STEP 00  6  0  0.03
 0.000.0   179  SYSTEM   0 0
 10.14.03 JOB02764  -!!Y  ENDED.  NAME- TOTAL TCB
CPU TIME= 0.03 TOTAL ELAPSED TIME=   0.0 SUBSY
 10.14.03 JOB02764  $HASP395 !!Y  ENDED - RC=
0-- JES2 JOB STATISTICS --
-  12 DEC 2020 JOB EXECUTION DATE
-3 CARDS READ
-   39 SYSOUT PRINT RECORDS
-0 SYSOUT PUNCH RECORDS
-5 SYSOUT SPOOL KBYTES
- 0.00 MINUTES EXECUTION TIME
1 //!!Y  JOB CLASS=K,MSGCLASS=H,NOTIFY=
   JOB02764
  //*ISPF EDIT OF !!.PDS.JCL(IEFBR14)
  IEFC653I SUBSTITUTION JCL - CLASS=K,MSGCLASS=H,NOTIFY=!!
2 //X00.STEP EXEC PGM=IEFBR14
 ICH70001I !!   LAST ACCESS AT 10:07:43 ON SATURDAY, DECEMBER 12, 2020
 IEFA111I !!Y IS USING THE FOLLOWING JOB RELATED SETTINGS:
  SWA=BELOW,TIOT SIZE=32K,DSENQSHR=DISALLOW,GDGBIAS=JOB
 IEF142I !!Y STEP - STEP WAS EXECUTED - COND CODE 
 IEF373I STEP/STEP/START 2020347.1014
 IEF032I STEP/STEP/STOP  2020347.1014
 CPU: 0 HR  00 MIN  00.00 SECSRB: 0 HR  00 MIN  00.00
SEC
 VIRT: 4K  SYS:   232K  EXT:0K  SYS:12308K
 ATB- REAL:  1044K  SLOTS: 0K
  VIRT- ALLOC:  11M SHRD:   0M
 IEF375I  JOB/!!Y /START 2020347.1014
 IEF033I  JOB/!!Y /STOP  2020347.1014
 CPU: 0 HR  00 MIN  00.00 SECSRB: 0 HR  00 MIN  00.00
SEC



On Fri, Dec 11, 2020 at 7:16 PM Charles Mills  wrote:

> I saw that just today and was astounded!
>
> Charles
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Paul Gilmartin
> Sent: Friday, December 11, 2020 4:11 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: JCL EXEC name field?
>
> In  the JCL Ref.:
>
>  Chapter 16. EXEC statement
> ...
> Name field
> ...
> • The stepname may be preceded by up to 8 alphanumeric or national
> characters
>and then separated by a period. If the stepname is coded in this
> way,
>the characters up to and including the period are ignored.
>
> WTF?
>
> A way of coding a very short comment?  Is "." OK?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: JCL EXEC name field?

2020-12-12 Thread Charles Mills
Sure 'nuff.

2 //NOTARY.SOJACK   EXEC PGM=IEFBR14   
IEF142I  SOJACK - STEP WAS EXECUTED - COND CODE    
IEF373I STEP/SOJACK  /START 2020347.1012   
IEF032I STEP/SOJACK  /STOP  2020347.1012  

And no, 00 fails

   2 //00.SOJACK   EXEC PGM=IEFBR14  
STMT NO. MESSAGE 
   2 IEFC662I INVALID LABEL  

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Friday, December 11, 2020 4:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: JCL EXEC name field?

In  the JCL Ref.:

 Chapter 16. EXEC statement
...
Name field
...
• The stepname may be preceded by up to 8 alphanumeric or national 
characters
   and then separated by a period. If the stepname is coded in this way,
   the characters up to and including the period are ignored.

WTF?

A way of coding a very short comment?  Is "." OK?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Auto Reply on SDSF Console

2020-12-12 Thread saurabh khandelwal
Dear All,

Thank you for your response.Problem has been resolved by using below code

If Strip(comp_vol) =  TOvolume Then
Do
  "MVS R "MsgID",NO"
End

Really sorry for delay in response as i was not well so couldnt able to
reply you on time.

Thank you once again.

On Sat, Dec 12, 2020 at 8:19 AM Brian Westerman <
brian_wester...@syzygyinc.com> wrote:

> Using SyzMPF/z you would only need to code 3 lines in the script for
> message IEF455D:
>
> IF WORD 02 = SP5145 | SP5146 | SP5147 | SP5149
>   Reply ,NO
> ENDIF
>
>
> We count the words of a message starting with zero as the messageid and
> (in this case) the message itself is:
> IEF455D MOUNT ser ON dev FOR jobname stepname OR REPLY ‘NO’
>   w0  w1 w2  w3 w4   w5  w6  w7  w8  w9w10
>
> So the word you want to check for is word 2 (the ser in the above).  The
> "" is automagically filled in with the outstanding replyID presented in
> the IEF455D message.
>
> Not only are Syzygy automation products MUCH less expensive than any of
> the other automation vendors, it's also a lot easier to use.
>
> Brian
>
> On Mon, 30 Nov 2020 11:15:20 +0300, saurabh khandelwal <
> sourabhkhandelwal...@gmail.com> wrote:
>
> >Dear Group ,
> >
> >
> >
> >We have requirement to automate below manual reply comes in console every
> >time, when we don’t find volume in our system and the standard reply to
> >these message is  *Reply id, NO.*
> >
> >
> >10.14.03 JOB09020 *29 *IEF455D* MOUNT *SP5145* ON 0FAA FOR CASPLPRO SARBCH
> >OR REPLY 'NO'l
> >
> >In this above message, whenever we get message id *IEF455D *on SDSF
> console
> >and on 4th place in this line, we get volume name* SP5145 or SP5146 ,
> >SP5147, SP5149 *then immediately using automation we should reply
> >
> >With* reply id, no.*
> >
> >
> >
> >In order to do this, we created
> >
> >
> >
> >IF MSGID = 'IEF455D'
> >THEN
> >
> >EXEC(CMD('AUTREXX')) NETLOG(Y) SYSLOG(Y);
> >
> >
> >
> >
> >
> >Then into *'AUTREXX'* REXX side,
> >
> >
> >
> >
> >
> >
> >
> >/* REXX  */
> >
> >trace r
> >
> >'PIPE SAFE * | STEM MSG.'
> >
> >TOvolume = Word( Msg,4 )
> >
> >MsgID = Word( Msg,1 )
> >
> >MsgID1 = substr(MsgID,2,2)
> >
> >
> >
> >volume =  'SP5145 ' ,
> >
> >   'SP5146 ' ,
> >
> >'SP5147 '
> >
> >
> >
> >Do i =  1 to Words(volume)
> >
> >comp_vol = Word(volume,i)
> >
> > If Strip(comp_vol) =  TOvolume Then
> >
> >
> >
> >But unable to complete this logic in to REXX. Can you please help in
> >building this REXX, which can help in replying on console once the above
> >mentioned criteria matches.
> >
> >
> >
> >*Regards*
> >
> >*Saurabh*
> >
> >--
> >For IBM-MAIN subscribe / signoff / archive access instructions,
> >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN