If you've got TSO Pipelines installed, you can run the file through a pipe like this:
"PIPE < '"your.dataset.name"' | XLATE UPPER | > 'your.dataset.name"'" Which will do the trick in a tiny amount of time. On 02/03/06, Bob H <[EMAIL PROTECTED]> wrote: > Hi Folks, > > I had a guy ask me for a way convert a flat file from mixed to uppercase > only, in place, in batch. > > I'm probably overthinking this request but I came up with a batch job that > calls an edit macro. > > And although the macro works in ISPF EDIT just fine, it doesn't work in > batch. > > Any ideas for an easier way? And why this thing doesn't cut it? > > JCL: > //S1 EXEC PGM=IKJEFT01 > //ISPLOG DD SYSOUT=*,DCB=(RECFM=VB,LRECL=125) > //ISPPROF DD DISP=SHR,DSN=TTSMV14.PROF > //ISPPLIB DD DISP=SHR,DSN=ISP.SISPPENU > //ISPTLIB DD DISP=SHR,DSN=ISP.SISPTENU > //ISPSLIB DD DISP=SHR,DSN=ISP.SISPSLIB > //ISPMLIB DD DISP=SHR,DSN=ISP.SISPMENU > //SYSEXEC DD DISP=SHR,DSN=TTSMV14.REXX > //SYSPROC DD DISP=SHR,DSN=TTSMV14.REXX > //SYSPRINT DD SYSOUT=* > //SYSTSPRT DD SYSOUT=* > //SYSOUT DD SYSOUT=* > //SYSTSIN DD DDNAME=SYSIN > //SYSIN DD * > PROFILE PREFIX(TTSMV14) > ISPSTART CMD(%EDITREXX TTSMV14.TEST MAKEUC) > //* > > MACRO: > ISREDIT MACRO > ISREDIT CAPS ON > ISREDIT CHANGE P'<' P'>' ALL > ISREDIT SAVE > ISREDIT END > > OUTPUT: > 12:10 Start of ISPF Log - - - - Session # 61 -------------------- > 12:10 TSO - Command - - %EDITREXX TTSMV14.TEST MAKEUC > 12:10 TSO - Command - - %MAKEUC > 12:10 Edit - Save - TTSMV14.TEST - data set saved. > 12:10 End of ISPF Log - - - - - Session # 61 -------------------- > > But the file is still lower case. > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO > Search the archives at http://bama.ua.edu/archives/ibm-main.html > -- Cheers, Kenny ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
