IBM Mainframe Forum

by **LasseH** » Tue Oct 28, 2014 8:54 pm

Where to put TRAN=LTOU (if that will do the work)
Don't like lower case in JCL if I can avoid it.

Doing a parse to extract a number in a row, the text is partly lower case.

the PARSE looks like this:

Select all

//*--------------------------------------------------------
//* STEPNAME: S020
//* STEPINFO: EXTRACT AMOUNT OF RECORDS IN GBALOG
//*--------------------------------------------------------
//S020 EXEC PGM=SORT
//SORTIN DD *
*** Total of read records: 000000000000321
*** Records processed : 000000000000313
//SYMNAMES DD *
RELREC,C'*** TOTAL OF READ RECORDS: '
THETEXT,01,28,CH
//TOOLMSG DD SYSOUT=*
//SORTOUT DD DISP=(NEW,PASS),
// LRECL=015,RECFM=FB,
// SPACE=(TRK,(01,01),RLSE),
// DSN=&&GBACNT
//DFSMSG DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
OPTION COPY
INREC PARSE=(%=(ENDAT=RELREC),
%00=(STARTAFT=BLANKS,FIXLEN=15)),
BUILD=(%00)
INCLUDE COND=(THETEXT,EQ,RELREC)
//*

//Lasse

by **BillyBoyo** » Tue Oct 28, 2014 11:22 pm

The manual tells you where TRAN=LTOU can go, and there is no way around that. INREC will process after INCLUDE COND. No way around that. With your sample, "*** R" will get the hit you want. Is that true for your entire file? You can put SYSIN to a dataset for your testing (I'm assuming it is on a PDSE for Production). Or do the reformatting and use OUTFIL after you've done the lower-casing. INCLUDE COND the "** R" and then INCLUDE= the lower-cased stuff.

Well done for SYMNAMES. But you'll need to type that in mixed-case anyway :-)

That can go on another dataset...

by **NicC** » Wed Oct 29, 2014 4:18 am

Don't like lower case in JCL if I can avoid it.

It is compulsory for JCL to be in upper case. The interpreter 'barfs' if it find JCL in lower case. (Unless something has changed recently.)

by **LasseH** » Wed Oct 29, 2014 1:20 pm

Thanks, will use mixedcase in "searchargument" (Symnames)
//Lasse

IBM Mainframe Forum

Include (NOT case sensitive)

Include (NOT case sensitive)

Re: Include (NOT case sensitive)

Re: Include (NOT case sensitive)

Re: Include (NOT case sensitive)