Re: Ability to pass symbolic variable back from REXX to JCL?

>> Follow-on question - I have looked through JCL Ref Guide & Init & Tuning >> Guide and can't seem to find what I am looking for. I am looking for >> exhaustive built-in symbols list (such as &SYSUID) that can be used in batch >> jobs. I'm not talking about the system symbols (such &SMFID) wh

Re: Minor Announcement

Thank you all for your kind words and wishes. Much appreciated. Kolusu -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Minor Announcement

Hi All, Today is my last day as a developer with team DFSORT. I am still with IBM and will be moving to a new role in DevOps effective August 19th, 2024. So, answering DFSORT related questions will not be as quick as I did earlier. I *may* continue to answer questions, but it depends on my

Re: 3270 programming

>> Can you please send me -07? David, All the versions of the manual are on Bitsavers GA23-0059-07 (1992-06 IBM 3270 Information Display System Data Stream Programmer's Reference) https://bitsavers.org/pdf/ibm/3270/GA23-0059-07_3270_Data_Stream_Programmers_Reference_199206.pdf GA23-0059-4 (19

Re: LISTDSI Bad return value z/OS 3.1

>> (That seems to have been an off-list communication; Idon't see it in the >> archives.) Paul, Yes, it is indeed an offline communication. I just showed the behavior is SAME across different releases as Steve mentioned that he did not have access to 2.4 system anymore. So, from my example,

Re: DFSORT - Something I can't see.

> thanks a lot it obviously (now :D) worked. I would have preferred an error. Max, I am guessing your shop has VLSHRT as the default. Here is a topic that describes the effects of VLSHRT https://www.mail-archive.com/ibm-main@listserv.ua.edu/msg92247.html Thanks, Kolusu DFSORT Development IBM

Re: DFSORT - Something I can't see.

> Input is a VBA dataset. Massimo, Since the input is VBA, the short records may be the difference. Please add OPTION VLSCMP to the SYSIN and re-run the job. Thanks, Kolusu DFSORT Development IBM Corporation -- For IBM-MAIN

Re: Reading VSAM LDS data records

>> I can't go into much detail about what I am seeking, but wanted to ask this >> great group how to read these LDS files. Don, If your shop has File Manager, then you can use it to copy the contents of LDS //STEP0100 EXEC PGM=FILEMGR //SYSPRINT DD SYSOUT=* //DDIN DD DISP=SHR,DSN=Your.input

Re: DFSORT / SORT and value/necessity of FILSZ parameter

>> We use OPTION COPY. Eric, Option COPY does NOT require FILSZ parameter. It is required when SORTing data which helps in calculating the workspace required. DFSORT issues an informational message ICE118I when it couldn't determine the file size. https://www.ibm.com/docs/en/zos/2.5.0?top

Re: DFSORT / SORT and value/necessity of FILSZ parameter

>> We run sort splits on large tape datasets, with over a hundred million >> records. They get split into 3 separate datasets, depending on the data. These jobs do not use FILSZ. Eric, Does the job SORT the data before split , or is it just splitting with a COPY operation to separate datasets ?

Re: Inquiry on Powerful Sorting and Query Tools for Linux Platform

>> This product is a very good DFSORT look alike for Unix/Windows. Offers >> excellent performance and compatibility with existing DFSORT control >> statements Kirk, Looking at the examples listed here, it seems to have a different syntax compared to the sort products on z/OS https://www.ah

Re: Problem when transfereing PDS members using ftp.

> When he looked at the destination he say that the last update time was 3 > hours less than it should have been. Gadi, Check this https://www.ibm.com/support/pages/time-tags-incorrect-ftp-generated-ispf-statistics Thanks, Kolusu DFSORT Development IBM Corporation

Re: Tech Library -- Where is it hidden now

> You can find all the releases here https://www.ibm.com/docs/en/zos - just > drill down for the release you want from 2.1 to 3.1 Lionel, Thanks. I am aware of the main publications link for all the releases, however Gil mentioned that about MONTHLY refresh of the "2.5 Adobe Indexed PDF/PDX Co

Re: Tech Library -- Where is it hidden now

>> But it was better at 2.5 when there was apparently a monthly refresh of the >> "2.5 Adobe Indexed PDF/PDX Collection", with the files date stamped and >> including the .pdx keyword index. Gil, Do you have the link to 2.5 that shows the monthly refresh ? May be we can get a similar link to 3

Re: Tech Library -- Where is it hidden now

> Thanks. Is there a way to sort (your specialty) or filter that list by date? Gil, Your wish granted. Check the attachment PS : I did use DFSORT. 😊 Thanks, Kolusu DFSORT Development IBM Corporation -- For IBM-MAIN subscri

Re: Tech Library -- Where is it hidden now

>> I use: >> o IBM got 3.1 right the first time; there's little need for updates? Gil, In the URL that you use , If you click on the " All Publications" link on top of the page , it will result in this url a

Re: python calling COBOL [was: RE: z/OS 3.1 Enhancements & Support News]

>> test on our z/OS V2.5 system, but apparently the essential LE module >> CEL4RO31 does not exist on our system (or at least I nave not yet found it). Peter, CEL4RO31 is supported in V2R4 and higher . Do you have hlq.SCEERUN2 in your SYSLIB ? Thanks, Kolusu --

Re: Another Sort Question

>> Maybe you can try this: Ituriel, That would be an extra pass of data which is not necessary. You can adjust it to read just 1 record and issue the RC=12, but the question arises as to why the other product doesn't work as designed. Thanks, Kolusu DFSORT Development IBM Corporation ---

Re: Another Sort Question

>> I do indeed see the WER* messages in the log. Cameron, Thanks for confirming that it is the other product that does NOT behave the way it supposed to work. DFSORT does honor the NULLOFL parm and ends the job with RC=4. You probably need to open a case with the vendor. Thanks, Kolusu DFSOR

Re: Another Sort Question

ainframe Discussion List On Behalf Of Sri Hari Kolusu Sent: Tuesday, July 9, 2024 9:31 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Another Sort Question >> Basically, I wanted to raise RC=4 when the output file from the SORT >> is empty. Cameron, NULLOFL should work.

Re: Another Sort Question

>> Basically, I wanted to raise RC=4 when the output file from the SORT is >> empty. Cameron, NULLOFL should work. Can you run this job? //STEP0100 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //LOG31IN DD * //LOG31OUT DD SYSOUT=* //TOOLIN DD * SELECT FROM(LOG31IN) -

Re: IEC143I 213-50,IGG0191B, ...

>>50 - OPEN detected an error return code from an SMS service while processing >>a PDSE. Binyamin, IMHO the error 213-50 is most likely to occur when the PDSE has Pending delete members. You can run PGM=IEBPDSE to verify the PDSE in question. Thanks, Kolusu --

Re: reading tso netstat for counting duplicates

>> What would be the best process.. I need to strip the port from the field >> IP..PORTthen count the number of times the IP shows up in the output Lizette, DFSORT can strip the needed field and count the duplicates quite easily. Please show me a sample input along with the DCB properties

Re: SMF 194

>> I'm trying to decode SMF 194, but had no success finding its layout. Ituriel, You can pick the layout based on your version. https://www.ibm.com/support/pages/ts7700-statistical-data-format Thanks, Kolusu -- For IBM-MAIN su

Re: DFSORT Question regarding SORTOUT Library Member Statistics

> I don't think that option is on the template workbench. Michael, I don't use workbench, but I am assuming that it does let you EDIT the template. If it does , then just add/Modify the stats parm in the template. Thanks, Kolusu

Re: DFSORT Question regarding SORTOUT Library Member Statistics

>> It is a sore point with me that the File Manager template workbench doesn't >> generate ISPF statistics on the templates it creates. It will /maintain/ >> statistics if they already exist, but it won't create them. Michael, Did you try to use the option STATS=FORCE ? The ISPF statistics th

Re: DFSORT Question regarding SORTOUT Library Member Statistics

>> Or just Enter/SAVE/F3 a couple of hundred times. 😊 Cameroon, You can use ISPF to Set the statistics. Look at the option 5 in UTILITIES. Menu Options View Utilities Compilers Help EN sss DSLIST - Data Sets M e 5 1. Library e C

Re: DFSORT Question regarding SORTOUT Library Member Statistics

>> I want to know if I can include an option, or processing clause to ensure >> that Library statistics are generated for each new member as I create them. At the moment, I have a couple of hundred new Library Members that have no member statistics at all (who last changed, when created when last

Re: SDSF and z/OS V2.5

Lizette, Check this presentation by Rob Scott https://public.dhe.ibm.com/eserver/zseries/zos/racf/pdf/nyrug_2023_10_11_SDSF_Security_How_does_it_work_on_zOS_V2R5.pdf Thanks, Kolusu -- For IBM-MAIN subscribe / signoff / archive

Re: AT-TLS Configuration assistant

>> I think it is label for z/OS V1R12. Is it available anywhere for download? Lennie, May be chapter 12 in the red book https://www.redbooks.ibm.com/redbooks/pdfs/sg247899.pdf Thanks, Kolusu -- For IBM-MAIN subscribe / signoff

Re: DSNTEP2 problem

>> DSNE117E NOT ABLE TO LOCATE DSNTEP2 IN DSNAME DB2.DBV.SDSNSAMP Thomas, Looks like you are pointing to the samp lib. The LOAD module DSNTEP2 is NOT in the SDSNSAMP library. Here is my sample DSNTEP2 (pay attention to LIB statement) //SYSTSIN DD * DSN SYSTEM(DB2P) RUN PROGRAM(DSNTEP2)

Re: DSNTEP2 problem

>> IKJ56712I INVALID KEYWORD, PLAN(DSNTEP1) Thomas, You have an invalid PLAN name. Check with your DBA for the right plan name or if you have authority then check the SYSIBM.SYSPLAN catalog table. Thanks, Kolusu --

Re: Getting list of SMS class entries

Billy, 1. Run DCOLLECT 2. Use that as INPUT to DFSORT and filter it based on your requirements. Kolusu -Original Message- From: IBM Mainframe Discussion List On Behalf Of Billy Ashton Sent: Tuesday, June 4, 2024 12:09 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [EXTERNAL] Getting list

Re: Syntax error using Unix cp command with "-W" parameters

Peter, Try with single quotes before SPACE parm cp -W "seqparms='SPACE=(CYL,(5,5)),RECFM=VB,LRECL=259,BLKSIZE=0'" $HOME/testfile.txt "//'TSOUSER.NEWFILE'" Thanks, -- For IBM-MAIN subscribe / signoff / archive access instruct

Re: DFSORT Fixed Records to CSV - Trim Extraneous Blanks?

>>> Is this doable in DFSORT? If so, can help point me to some examples / >>> suggested reading / command statements? Steve, Yes DFSORT can do it quite easily. Since you haven't provided any details about LRECL/RECFM here is sample that I came up on the fly. Run this job and check the outp

Re: DFSort query

Ron, You have been a member on this forum for a long time and yet you post questions which lack basic data. What is the LRECL and RECFM of the input file? >> LAST_CHANGE_TS 20 bytes The sample data you posted shows the timestamp as 26 bytes which would change the position of the sequence numb

Re: DFSORT newline

>> So how may the programmer match a newline character? Paul, As Mike mentioned, Data on z/OS data is governed by the LRECL. So, there is no newline character. If you are planning to parse out transferred binary data, then depending on where the file originated, you can use the equivalent Hex

Re: Execute Rexx from Cobol

Lasse, Try the example listed here. https://www.ibm.com/docs/en/zos/2.4.0?topic=service-cobol Thanks, Kolusu -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the mes

Re: DFSORT Guide feedback?

>> How did you find that? I tried to no avail with Google keywords: Gil, I earlier provided you a link to the same in the other topic. https://www.mail-archive.com/ibm-main@listserv.ua.edu/msg137624.html Also, in the PDF documentation it is divided as chapters and the web documentation does

Re: DFSORT Guide feedback?

>> I surmise that I must do this on a web page containint the relevant topic. >> I was unable to find ap page describing Table 109. Can someone help me? Or >> must I submit meta-feedback, "Unable to find web page"? The table 109 you refer is referring to the EBCDIC table listed here. https:

Re: EBCDIC/ASCII - FTP

Gil, Appendix D in the Application programming guide shows the EBCDIC and ASCII collating sequences. ALTSEQ, CHALT, and LOCALE can be used to select alternate collating sequences for character data. https://www.ibm.com/docs/en/zos/3.1.0?topic=guide-ebcdic-ascii-collating-sequences Thanks, Ko

Re: IEABRC anomaly

>> It turns out that IEABRC does not convert NOP to JNOP. Is that a bug or a >> feature? Shmuel, Check this topic https://bit.listserv.ibm-main.narkive.com/H8UrGudQ/a-little-ieabrc-heads-up Thanks, Kolusu -- For IBM-MAIN sub

Re: EBCDIC/ASCII - FTP

>> What UNTERSE tool is available on Windows? Linux? Gil, WWunterse from Watson walker. Announcement here https://community.ibm.com/community/user/ibmz-and-linuxone/discussion/free-product-to-unterse-smf-and-vb-data-on-distributed-platforms Direct download link https://www.ap4zlabs.com/wwunt

Re: EBCDIC/ASCII - FTP

>> On zOS, its EBCDIC file, is there any solution first convert to ASCII then >> Terse send? BM, You can use DFSORT TRAN=ETOA function which translates characters from EBCDIC to ASCII using the default standard TCP/IP service EBCDIC-to-ASCII translation table. For example, with TRAN=ETOA, the

Re: Hex error code interpreter?

Phil, You can use the command TSO EXEC 'SYS1.SBPXEXEC(BPXMTEXT)' 'your 8 digit hex code' or $ bpxmtext hexcode from shell to get the description of the errnox . TSO EXEC 'SYS1.SBPXEXEC(BPXMTEXT)' '0594003D' results in BPXFVLKP 09/23/23 JRDirNotFound: A directory in the pathname was not found A

Re: DFSort Report question

>> What I would like to do is change LEGACY/KDFAES to PASSPHRASE if possible. Lionel, You just want to change the ON value and not the header. Assuming you have a COPY/SORT step to filter the data, you can change the values there. I am showing for position 21, but you can change to that 616 i

Re: DFSort Report question

>> The ON value could be "LEGACY", "KDFAES", "PASSWORD" or "NOPHRASE". Lionel, How do you determine which header value need to be used? I am guessing that it is going to depend on a value in the file. If So we can dynamically change it. Thanks, Kolusu DFSORT Development IBM Corporation ---

Re: Regular Expressions: DFSORT, ISPF: "$","^"

Paul, DFSORT does indeed support "^" and "&" for the begin and end. https://www.ibm.com/docs/en/zos/2.4.0?topic=statement-regular-expressions If scroll down a bit in the above link, we do the examples. ^ibm Matches records beginning with "ibm" ibm$ Matches records ending with "ibm" ^ibm

Re: Anyone exploiting ZEDC?

>> We initially enabled Extended Format/COMPACT ZP, for all DSORG PS datasets, >> but are quickly finding that DFSORT, SAS, ISPF recovery datasets all have >> issues. Dave, Can you elaborate more on the issue that you have with DFSORT as ZEDC is supported by DFSORT. You can send an offline ma

Re: EXPDT added to newly allocated dataset

Mark, Check if the dataset got associated with a management class and expiration date defined in the management class for the data set. Thanks, Kolusu -- For IBM-MAIN subscribe / signoff / archive access instructions, send emai

Re: DFSORT SUBDAYS function

>> The date begins in column 1 and is 10 characters long. I know I want to use >> the SUBDAYS function. I am looking at the DFSORT Programmer Guide. But I >> learn best by example. Richard, Your input date has separators and DFSORT date arithmetic functions works on date without separators. S

Re: FORTRAN G/H sources

>> is there someone who has kept fortran source from the MVT and MVS3 century, >> at least the IO modules that have been used (and distributed) for SNOBOL4 by >> University of Arizona ? Try this. https://www.jaymoseley.com/hercules/compilers/list_of.htm Thanks, Kolusu ---

Re: MountMon Expired

>> Anyone still familiar with Mountmon from IBMTools. I need to find the >> instructions for updating the EXPIRE date. Philip, You need to download the latest version of the tape tools to get the latest date. EXPIRE=31DEC2024 106022880 ; TOOLS stop running after this DATE !!! Check this top

Re: How can I determine MVS FQDSN from DD Name in Batch COBOL Program?

>> Is your SPOOL so constrained that you are concerned about running out of >> space if a job issues even a few million lines of sysout? >> The issue is that we have so many JOBs over so many decades doing this. Cameron, Did you know that you can use LINES parm to cancel/Dump/Warning for the jo

Re: DFsort error message

>> Is this a standalone sort or one from a cobol program or db2 process? Lizette, It is a JCL invoked SORT. Clue : ICEAM1 INVOCATION ENVIRONMENT IN EFFECT - ICEAM1 ENVIRONMENT SELECTED Thanks, Kolusu DFSORT Development IBM Corporation -

Re: DFsort error message

>> ICE185A 0 AN SE37 ABEND WAS ISSUED BY DFSORT, ANOTHER PROGRAM OR AN EXIT >> (PHASE Ron, Most likely your job abended due to lack of space on SORTOUT dataset. Check the JESMSGLG for a detailed explanation of the E37 abend also the dataset name. Fix the space on the dataset by adding more

Re: How can I determine MVS FQDSN from DD Name in Batch COBOL Program?

>> I did not really need the FQDSN. All I needed to know was whether or not >> SYSOUT was assign to SPOOL. Cameroon, Does this code handle Dynamically allocated Sysout dataset and XTIOT entries (i.e NON_VSAM_XTIOT=YES is set in SMS? Also, I was wondering what is the need to traverse the enti

Re: How can I determine MVS FQDSN from DD Name in Batch COBOL Program?

>> Why? Well I would like my COBOL program to allow COBOL Displays in >> Production ONLY when the User specified a FQDN. Cameron, Check this. https://www.mvsforums.com/helpboards/viewtopic.php?p=62866 Thanks, Kolusu -- For I

Re: FTP SBDATACONN - how to display?

>> I mean translation details. Radoslaw, Check this https://www.ibm.com/support/pages/overview-using-data-translation-zos-ftp https://www.ibm.com/docs/en/zos/2.5.0?topic=protocol-ftp-configuration-statements-in-ftpdata Thanks, Kolusu ---

Re: // SET with multiple substitutions?

>> I'd like to do something like // SET FOO=&BAR.&BAZ and have the values of >> both symbols inserted rather than just one. Is there a way to do that? Seymour, If you have BAR and BAZ symbols defined before the FOO , it will substitute. // SET BAR=PARM1 // SET BAZ=PARM2 // SET FOO=&BAR.&BAZ W

Re: Ideas for less-distruptive disruptions - Netmaster:Solve and CICS

>> I see a lot more research in my future. Tom, Here is something to get you started. https://www.ibm.com/docs/en/cics-ts/beta?topic=server-rexxcics-commands Thanks, Kolusu -- For IBM-MAIN subscribe / signoff / archive access

Re: DFSORT and IPL Date

>> What I am trying to achieve is simple. I want to select, using DCOLLECT TYPE >> D records, files that have been created after the last IPL and ten days >> before today: Jack, As I showed you earlier , you can use the SDSF REXX interface and get the IPLINFO and we can parse to create a symbo

Re: DFSORT and IPL Date

>> Is there a way to make SORT date comparisons referencing the IPL date? I >> have not been able to find anything on the manual. Jack, DFSORT does not have direct access to IPL info. It can access system symbols but there is no system symbol defined for LAST IPL date (AFAIK). So as others h

Re: Rexx numeric digits and scientific notation question

Charles, Can you display the form just before you display the multiplied value? say 'numeric form is : ' form() say 8947 * 864 Thanks, Kolusu -- For IBM-MAIN subscribe / signoff / archive access instructions, send email

Re: Line comments in DFSORT

>> And, using the example provided, we are able to add a comment to the first >> two lines but not the last line, since it does not have a hyphen? Cameron, That is true. But if you want you can add as many comment lines you want using * in column 1. //TOOLIN DD * * Enter ICETOOL operators he

Re: Line comments in DFSORT

>> Which shows me that line comments are a byproduct of the ICETOOL >> continuation logic, and not a core feature. From your earlier example, I >> thought that the # character had some significance, but now I see that it >> does not. Bob, Just a clarification here. TOOLIN is the ONLY DD where

Re: Line comments in DFSORT

>> It's unusual, having to add an un-necessary line split just to add a >> comment. I was expecting it to work more like IDCAMS, TSO or JCL. What is stopping you from doing coding like this? //TOOLIN DD * * Enter ICETOOL operators here * * COPY INPUTA TO OUTA COPY FROM(INPUTA) TO(OUTA) *

Re: Line comments in DFSORT

>> That is good news, but I cannot seem to replicate your results. Bob, If you noticed my example job keenly, I had the remarks/comments after the Continuation character (-).Btw TOOLIN statements are self-explanatory. You adding the remarks is kind of repeating the statements once again Ei

Re: Line comments in DFSORT

>> Alas, ICETOOL does not support the same kind of comments. Bob, Not sure what you meant by that. ICETOOL statements TOOLIN and XXXCNTL do support comments. Here is an example. //STEP0100 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //IN DD * ABC DEF //CTL1OUT DD SYS

Re: Line comments in DFSORT

>> I just did an experiment in DFSORT with JCL-style line comments after >> INCLUDE, SORT, and OUTREC, and they work! The DFSORT doc says that comments are only supported when entered with * on column 1. Bob, Of course, they work as you entered a REMARKS. Remark Field : This field can contain

Re: What am I doing wrong with BPXWUNIX sort?

Charles, Your example data /* REXX */ stdin.0=3 stdin.1="0001 Main Check" stdin.2="0002 OMVS (FTP Session)" stdin.3="0003 C Validation" cmd="sort -k 2" call bpxwunix cmd,stdin.,stdout.,stderr. say "stdout:" say "===" do i=1 to stdout.0 say stdout.i end say "stderr:" say "===" do i=1

Re: What am I doing wrong with BPXWUNIX sort?

Charles, Try a space after k. Something like this /* REXX */ stdin.0=5 stdin.1="KIJJ 3" stdin.2="KQWR 1" stdin.3="ADGF 2" stdin.4="OEPE 6" stdin.5="VNVV 5" cmd="sort -k 2" call bpxwunix cmd,stdin.,stdout.,stderr. say "stdout:" say "===" do i=1 to stdout.0 say stdout.i end say "stderr:"

Re: BASE64 Decode / EPOCH Conversion Code Samples

>>. Is anyone aware of where one might locate any sample assembler code, macros >>or APIs to perform the following: - Base64 Decoding (to EBCDIC)- EPOCH Conversion Thanks in advance for the assistance. Frank, Check this link for BASE64 decoding and encoding https://github.com/cicsdev/base64

Re: Can DFSORT assign custom Return Code values?

>> Another simple way to do this is a simple Rexx exec using MVSVAR to get the >> system symbol that you want . See >> https://www.ibm.com/docs/en/zos/2.5.0?topic=tef-mvsvar to see examples of >> how to do this. Doug, As I mentioned earlier you don't need REXX to get the MVS variables. DFSORT

Re: Can DFSORT assign custom Return Code values?

>> I was to be able to assign one of three different Return Code values (any >> value) that I can let check to determine if I am running in Development, >> Pre-Prod or Production, and then execute steps related to the specific >> environment. Not something I absolutely need since I could write a

Re: DFSMSHSM reports.

>> I tried that ISMF selection sequence and received this nice message: >> IKJ56500I COMMAND RMMISPF NOT FOUND. Claude, The RMMISPF REXX is found in library SYS1.SEDGEXE1. This is an RMM product library, but it is available even on systems where RMM is not licensed. You can modify your ISPF s

Re: DFSMSHSM reports.

>> When I look at the record layout from the DFSMSHSM Data Areas manual, I was >> amazed on the extensive amount of offsets in the DSR - Daily Statistics >> Record. Claude, Check out ISMF option G G Report Generation - Create Storage Management Reports On the next screen choose opti

Re: Nanosecond resolution timestamps for HLL's?

Michael, What version of z/OS are you running ? clock_gettime is available on z/OS V2R5 and higher Thanks, Kolusu -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with