MIDRANGE dot COM Mailing List Archive



Home » MIDRANGE-L » October 2012

RE: Obtaining a value from within a string using CL



fixed

Scan Variable - TAA (SCNVAR)


Rtn var for scan result (RESULT) - Help

The result field to be returned. It must be defined as
LEN(3 0). If the scan is not successful, the value will be
zero. If the scan is successful, the value will be the
first position where the pattern matches.



Type choices, press Enter.

Rtn var for scan result (3 0) Number
String to be scanned . . . . . .





...
String length to be scanned . . Number
Start position in string . . . . 1 Number

Pattern to scan for . . . . . .





...
Pattern length to be used . . . Number
Translate lower to upper case . *NO *YES, *NO
Trim off blanks at pattern end *NO *YES, *NO
Wild char (blank for none) . . . Character value

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Alan Shore
Sent: Wednesday, October 03, 2012 1:00 PM
To: Midrange Systems Technical Discussion
Subject: RE: Obtaining a value from within a string using CL

Thanks for your reply Joel
Yes, we have TAATOOLS but I don't see the command SCNVAR

Alan Shore
Programmer/Analyst, Direct Response
E:AShore@xxxxxxxx
P:(631) 200-5019
C:(631) 880-8640
"If you're going through Hell, keep going" - Winston Churchill


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Stone, Joel
Sent: Wednesday, October 03, 2012 1:55 PM
To: 'Midrange Systems Technical Discussion'
Subject: RE: Obtaining a value from within a string using CL

Do you have TAATOOLS?

Jim Sloan has a real nice command to do this that I have used.

SCNVAR works great for this.


Example:

TAATOOL/SCNVAR RESULT(&RESULT) STRING(&EMADDR) +
STRINGLEN(80) PATTERN(@) +
PATTERNLEN(1) TRANSLATE(*YES)

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Alan Shore
Sent: Wednesday, October 03, 2012 11:49 AM
To: midrange-l@xxxxxxxxxxxx
Subject: Obtaining a value from within a string using CL

Hi everyone
And before I forget (as I normally do) we are on V5r4.
Within CL, is there a way to obtain a string from the following examples.

1. /weborders/PP91055370.txt
From the above, I am looking for the value PP91055370

2. /ifsdir/PP91055370,tx
From the above, I am looking for the value PP91055370

3. /ifsdir2/PP9.txt

From the above I am looking for PP9

In other words, the values between (but NOT including) the second '/' and '.txt'
As always, any and all responses are MUCH appreciated.


Alan Shore
Programmer/Analyst, Direct Response
E:AShore@xxxxxxxx
P:(631) 200-5019
C:(631) 880-8640
"If you're going through Hell, keep going" - Winston Churchill


Disclaimer: This message contains confidential information and is intended only for the individual named. If you are not the named addressee you should not disseminate, distribute or copy this e-mail. Please notify the sender immediately by e-mail if you have received this e-mail by mistake and delete this e-mail from your system. E-mail transmission cannot be guaranteed to be secure or error-free as information could be intercepted, corrupted, lost, destroyed, arrive late or incomplete, or contain viruses. The sender therefore does not accept liability for any errors or omissions in the contents of this message, which arise as a result of e-mail transmission. If verification is required please request a hard-copy version. Any views or opinions presented are solely those of the author and do not necessarily represent those of the company.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.


________________________________________________________________________
This inbound email has been scanned for all viruses by the MessageLabs SkyScan
service.
________________________________________________________________________

______________________________________________________________________
This outbound email has been scanned for all viruses by the MessageLabs Skyscan service.
For more information please visit http://www.symanteccloud.com
______________________________________________________________________





Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2014 by MIDRANGE dot COM and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available here. If you have questions about this, please contact