Re: shopz UJ01255
Instead of ordering "Recommended", order everything, and then only apply the Recommended. CONTENT (ALL) Its entirely possible the PTF you are interested in, never made it to "recommended". _ Dave Jousma AVP | Director, Technology Engineering Fifth Third Bank | 1830 East Paris Ave, SE | MD RSCB2H | Grand Rapids, MI 49546 616.653.8429 | fax: 616.653.2717 -Original Message- From: IBM Mainframe Discussion List On Behalf Of R Hey Sent: Thursday, September 24, 2020 8:46 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: shopz UJ01255 **CAUTION EXTERNAL EMAIL** **DO NOT open attachments or click on links from unknown senders or unexpected emails** Hi, I did an order RECEIVE ORDER(CONTENT(RECOMMENDED)... in shopZ for zos2.3 in May & Sep. I got many PTF up to RSU2008, but was missing UJ01255. I found that out of this list: UJ00088 F909 UJ00655 F911 UJ01172 F912 UJ00961 F001 UJ01255 F001 UJ01547 F003 UJ01809 F003 UJ02346 F003 UJ02146 F003 UJ01872 F004 UJ02215 F004 UJ02516 F005 UJ02578 F006 UJ02979 F007 UJ03210 F008 UJ03366 F008 I was missing these: UJ01255 NOT FOUND UJ01872 NOT FOUND UJ02215 NOT FOUND UJ02578 NOT FOUND UJ02979 NOT FOUND UJ03210 NOT FOUND UJ03366 NOT FOUND Has this been the case for anybody else? Thanks, Rez -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN **CAUTION EXTERNAL EMAIL** **DO NOT open attachments or click on links from unknown senders or unexpected emails** This e-mail transmission contains information that is confidential and may be privileged. It is intended only for the addressee(s) named above. If you receive this e-mail in error, please do not read, copy or disseminate it in any manner. If you are not the intended recipient, any disclosure, copying, distribution or use of the contents of this information is prohibited. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please erase it from your computer system. Your assistance in correcting this error is appreciated. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: shopz UJ01255
Classification: Limited I went through a similar discussion last year (? this year? Time flies..), and I now do RECEIVE ALL - just means you have all available fixes, whether you then go on to APPLY them of course, is entirely up to you, but I found it was better to have them than now. It's also worth noting that RECEIVE ORDER will bring in updated SOURCEIDs, so if you already have the fix, and it did subsequently make into an RSU, it will then get that sourceid applied to it. Andy Styles z/Series System Programmer -Original Message- From: IBM Mainframe Discussion List On Behalf Of Jousma, David Sent: 25 September 2020 11:23 To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: shopz UJ01255 -- This email has reached the Bank via an external source -- Instead of ordering "Recommended", order everything, and then only apply the Recommended. CONTENT (ALL) Its entirely possible the PTF you are interested in, never made it to "recommended". _ Dave Jousma AVP | Director, Technology Engineering Fifth Third Bank | 1830 East Paris Ave, SE | MD RSCB2H | Grand Rapids, MI 49546 616.653.8429 | fax: 616.653.2717 -Original Message- From: IBM Mainframe Discussion List On Behalf Of R Hey Sent: Thursday, September 24, 2020 8:46 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: shopz UJ01255 **CAUTION EXTERNAL EMAIL** **DO NOT open attachments or click on links from unknown senders or unexpected emails** Hi, I did an order RECEIVE ORDER(CONTENT(RECOMMENDED)... in shopZ for zos2.3 in May & Sep. I got many PTF up to RSU2008, but was missing UJ01255. I found that out of this list: UJ00088 F909 UJ00655 F911 UJ01172 F912 UJ00961 F001 UJ01255 F001 UJ01547 F003 UJ01809 F003 UJ02346 F003 UJ02146 F003 UJ01872 F004 UJ02215 F004 UJ02516 F005 UJ02578 F006 UJ02979 F007 UJ03210 F008 UJ03366 F008 I was missing these: UJ01255 NOT FOUND UJ01872 NOT FOUND UJ02215 NOT FOUND UJ02578 NOT FOUND UJ02979 NOT FOUND UJ03210 NOT FOUND UJ03366 NOT FOUND Has this been the case for anybody else? Thanks, Rez -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN **CAUTION EXTERNAL EMAIL** **DO NOT open attachments or click on links from unknown senders or unexpected emails** This e-mail transmission contains information that is confidential and may be privileged. It is intended only for the addressee(s) named above. If you receive this e-mail in error, please do not read, copy or disseminate it in any manner. If you are not the intended recipient, any disclosure, copying, distribution or use of the contents of this information is prohibited. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please erase it from your computer system. Your assistance in correcting this error is appreciated. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN Lloyds Banking Group plc. Registered Office: The Mound, Edinburgh EH1 1YZ. Registered in Scotland no. SC95000. Telephone: 0131 225 4555. Lloyds Bank plc. Registered Office: 25 Gresham Street, London EC2V 7HN. Registered in England and Wales no. 2065. Telephone 0207626 1500. Bank of Scotland plc. Registered Office: The Mound, Edinburgh EH1 1YZ. Registered in Scotland no. SC327000. Telephone: 03457 801 801. Lloyds Bank Corporate Markets plc. Registered office: 25 Gresham Street, London EC2V 7HN. Registered in England and Wales no. 10399850. Scottish Widows Schroder Personal Wealth Limited. Registered Office: 25 Gresham Street, London EC2V 7HN. Registered in England and Wales no. 11722983. Lloyds Bank plc, Bank of Scotland plc and Lloyds Bank Corporate Markets plc are authorised by the Prudential Regulation Authority and regulated by the Financial Conduct Authority and Prudential Regulation Authority. Scottish Widows Schroder Personal Wealth Limited is authorised and regulated by the Financial Conduct Authority. Lloyds Bank Corporate Markets Wertpapierhandelsbank GmbH is a wholly-owned subsidiary of Lloyds Bank Corporate Markets plc. Lloyds Bank Corporate Markets Wertpapierhandelsbank GmbH has its registered office at Thurn-und-Taxis Platz 6, 60313 Frankfurt, Germany. The company is registered with the Amtsgericht Frankfurt am Main, HRB 111650. Lloyds Bank Corporate Markets Wertpapierhandelsbank GmbH is supervised by the Bundesanstalt für Finanzdienstleistungsaufsicht. Halifax is a division of Bank of Scotl
DFSort to pull the latest record date
Hello We are using DFSORT utility to extract the latest record for a store/item/po and below is the sample file item_nbr| Store_nbr|Po_nbr|item_date|mode| 00604|9137|1100276393|2017-12-26|7|DSD | 00604|9137|1100278550|2018-01-09|6|DSD | Here we need to pull the 2'nd record to the Output as this is the latest date . Could someone please let me know how to achieve the same Regards Ron T -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: shopz UJ01255
This is not state of the art solution, but... You can prepare another order and explicitly request all the missing PTFs in this order. Finally you will have two (three..) orders which you can RECEIVE into CSI. While it is convenient to have all needed PTF within single order it is not required. BTW: Things may become more complicated for older PTFs, but this is definitely NOT the case. -- Radoslaw Skorupka Lodz, Poland W dniu 25.09.2020 o 02:45, R Hey pisze: Hi, I did an order RECEIVE ORDER(CONTENT(RECOMMENDED)... in shopZ for zos2.3 in May & Sep. I got many PTF up to RSU2008, but was missing UJ01255. I found that out of this list: UJ00088 F909 UJ00655 F911 UJ01172 F912 UJ00961 F001 UJ01255 F001 UJ01547 F003 UJ01809 F003 UJ02346 F003 UJ02146 F003 UJ01872 F004 UJ02215 F004 UJ02516 F005 UJ02578 F006 UJ02979 F007 UJ03210 F008 UJ03366 F008 I was missing these: UJ01255 NOT FOUND UJ01872 NOT FOUND UJ02215 NOT FOUND UJ02578 NOT FOUND UJ02979 NOT FOUND UJ03210 NOT FOUND UJ03366 NOT FOUND Has this been the case for anybody else? Thanks, Rez -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN . == Jeśli nie jesteś adresatem tej wiadomości: - powiadom nas o tym w mailu zwrotnym (dziękujemy!), - usuń trwale tę wiadomość (i wszystkie kopie, które wydrukowałeś lub zapisałeś na dysku). Wiadomość ta może zawierać chronione prawem informacje, które może wykorzystać tylko adresat.Przypominamy, że każdy, kto rozpowszechnia (kopiuje, rozprowadza) tę wiadomość lub podejmuje podobne działania, narusza prawo i może podlegać karze. mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. Sąd Rejonowy dla m. st. Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, KRS 025237, NIP: 526-021-50-88. Kapitał zakładowy (opłacony w całości) według stanu na 01.01.2020 r. wynosi 169.401.468 złotych. If you are not the addressee of this message: - let us know by replying to this e-mail (thank you!), - delete this message permanently (including all the copies which you have printed out or saved). This message may contain legally protected information, which may be used exclusively by the addressee.Please be reminded that anyone who disseminates (copies, distributes) this message or takes any similar action, violates the law and may be penalised. mBank S.A. with its registered office in Warsaw, ul. Senatorska 18, 00-950 Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. District Court for the Capital City of Warsaw, 12th Commercial Division of the National Court Register, KRS 025237, NIP: 526-021-50-88. Fully paid-up share capital amounting to PLN 169.401.468 as at 1 January 2020. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSort to pull the latest record date
[Default] On 25 Sep 2020 09:54:45 -0700, in bit.listserv.ibm-main ron5...@gmail.com (Ron Thomas) wrote: >Hello > >We are using DFSORT utility to extract the latest record for a store/item/po >and below is the sample file > >item_nbr| Store_nbr|Po_nbr|item_date|mode| >00604|9137|1100276393|2017-12-26|7|DSD | >00604|9137|1100278550|2018-01-09|6|DSD | > >Here we need to pull the 2'nd record to the Output as this is the latest date >. > >Could someone please let me know how to achieve the same Given the obscurity of the control statements (quick tell me what field is 1,4,CH) why not write the thing in a language that has access to the descriptions of the fields being used? We are not in the era of 22K DOS360 partitions, 100K MVT regions or 4 megabyte MVS regions anymore. PL1 and COBOL both generate fairly efficient code and when the tool becomes more than one off wonder, someone else can pick up the program and have a fighting chance of understanding what was being done. Clark Morris > >Regards >Ron T > >-- >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: Default logon procedure
W dniu 25.09.2020 o 02:59, Neale Ferguson pisze: How do I set the default logon procedure for a TSO user? Currently on the login screen the Procedure field is empty and I’d like to set it to ISPFPROC. Using search on the IBM Knowledge site results in a heap of stuff and I am having trouble with sorting the wheat from the chaff. There is no hardcoded default for that. Vanilla new user will have the emtpy field in the TSO segment, but it can be populated during user definition. Otherwise the user has to provide the value in the Procedure field. But only for first logon - this value will be recorded in TSO segment. Of course the procedure has to be created in the PROCLIB. To be honest, ServerPac installs the procedure named IKJACCNT, which can be understood as a default, but this is only some name. My advice: create "rescue" procedure, with small set of libraries and DO NOT TOUCH IT. It will be your rescue when someone screw up other procedures. -- Radoslaw Skorupka Lodz, Poland == Jeśli nie jesteś adresatem tej wiadomości: - powiadom nas o tym w mailu zwrotnym (dziękujemy!), - usuń trwale tę wiadomość (i wszystkie kopie, które wydrukowałeś lub zapisałeś na dysku). Wiadomość ta może zawierać chronione prawem informacje, które może wykorzystać tylko adresat.Przypominamy, że każdy, kto rozpowszechnia (kopiuje, rozprowadza) tę wiadomość lub podejmuje podobne działania, narusza prawo i może podlegać karze. mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. Sąd Rejonowy dla m. st. Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, KRS 025237, NIP: 526-021-50-88. Kapitał zakładowy (opłacony w całości) według stanu na 01.01.2020 r. wynosi 169.401.468 złotych. If you are not the addressee of this message: - let us know by replying to this e-mail (thank you!), - delete this message permanently (including all the copies which you have printed out or saved). This message may contain legally protected information, which may be used exclusively by the addressee.Please be reminded that anyone who disseminates (copies, distributes) this message or takes any similar action, violates the law and may be penalised. mBank S.A. with its registered office in Warsaw, ul. Senatorska 18, 00-950 Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. District Court for the Capital City of Warsaw, 12th Commercial Division of the National Court Register, KRS 025237, NIP: 526-021-50-88. Fully paid-up share capital amounting to PLN 169.401.468 as at 1 January 2020. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSort to pull the latest record date
> Here we need to pull the 2'nd record to the Output as this is the > latest date . Ron, Use the following DFSORT/ICETOOL JCL which will give you the desired results //STEP0100 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //IN DD * +1+2+3+4+5+6 00604|9137|1100276393|2017-12-26|7|DSD | 00604|9137|1100278550|2018-01-09|6|DSD | 00605|9138|1100276393|2020-06-26|7|DSD | 00605|9138|1100278550|2018-01-09|6|DSD | //OUT DD SYSOUT=* //TOOLIN DD * SELECT FROM(IN) TO(OUT) ON(01,14,CH) FIRST USING(CTL1) //CTL1CNTL DD * SORT FIELDS=(01,14,CH,A, $ ITEM_NBR + STORE_NBR 26,10,UFF,D) $ ITEM_DATE /* Thanks, Kolusu DFSORT Development IBM Corporation -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSort to pull the latest record date
Why not load the data into a DB and use SQL or similar language? If you have SAS - Max Min - functions If you can load to EXCEL - use its functions Not all functions on the mainframe can do everything. You should look at what makes sense. And if the tool you are comfortable in using, does not have the function, I would say to find one that does. Hope that helps Lizette -Original Message- From: IBM Mainframe Discussion List On Behalf Of Ron Thomas Sent: Friday, September 25, 2020 9:55 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: DFSort to pull the latest record date Hello We are using DFSORT utility to extract the latest record for a store/item/po and below is the sample file item_nbr| Store_nbr|Po_nbr|item_date|mode| 00604|9137|1100276393|2017-12-26|7|DSD | 00604|9137|1100278550|2018-01-09|6|DSD | Here we need to pull the 2'nd record to the Output as this is the latest date . Could someone please let me know how to achieve the same Regards Ron T -- 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: DFSort to pull the latest record date
> Given the obscurity of the control statements (quick tell me what > field is 1,4,CH) why not write the thing in a language Clark, I have to respectfully disagree with you. The control statements for DFSORT are not obscure and they are on the same level as following the coding/syntax rules for a programming language. For example COBOL, you would follow all the rules governing it. So why not do the same for DFSORT? >> PL1 and COBOL both generate fairly efficient code and when > the tool becomes more than one off wonder, someone else can pick up > the program and have a fighting chance of understanding what was being > done. Aren't the programs depending on the input file attributes? For example a COBOL program written to handle a FB 80 byte file will NOT work with FB 100 byte file. You need to write another program to handle it. With DFSORT there is absolutely no change in the control cards for different LRECL as long as the key fields are the same. DFSORT has come a long way from being just a sort product. It can do a lot. Thanks, Kolusu DFSORT Development IBM Corporation -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Caution: "Hacked" email caused the distribution of a potentially harmful attachment
Wayne Bickerdike wrote: >My "spoof" email was apparently genuine. The >person who sent it has no idea >how much he got wrong with the request. Eh? Can you elaborate? First sentence makes no sense. It was spoofed or it wasn't?! -- zMan -- "I've got a mainframe and I'm not afraid to use it" -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSort to pull the latest record date
>>If you can load to EXCEL - use its functions Not all functions on the mainframe can do everything. You should look at what makes sense. And if the tool you are comfortable in using, does not have the function, I would say to find one that does. Lizette, EXCEL is limited to 1 million records. And it would take a lot of time to load it and then sort it and then eliminate the duplicates. >>Not all functions on the mainframe can do everything. You should look at what makes sense. And if the tool you are comfortable in using, does not have the function, I would say to find one that does. If the file is on mainframe, a Program/Utility should be able to handle it. Thanks, Kolusu -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSort to pull the latest record date
Thanks a lot Kolusu for the help.. it worked like a charm!! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSort to pull the latest record date
Totally agree Just trying to provide alternatives that might make sense. I know I love SAS and I tend to do everything in SAS. But my co workers do not use it. So then I either have to super document the process so they can support it Or find alternatives to do the work that they would be able to support. Today, most users know a little bit about SQL. So a Data base functions starts to make more sense. It is all a matter of perspective. Lizette -Original Message- From: IBM Mainframe Discussion List On Behalf Of Sri h Kolusu Sent: Friday, September 25, 2020 10:34 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: DFSort to pull the latest record date >>If you can load to EXCEL - use its functions Not all functions on the mainframe can do everything. You should look at what makes sense. And if the tool you are comfortable in using, does not have the function, I would say to find one that does. Lizette, EXCEL is limited to 1 million records. And it would take a lot of time to load it and then sort it and then eliminate the duplicates. >>Not all functions on the mainframe can do everything. You should look >>at what makes sense. And if the tool you are comfortable in using, does not have the function, I would say to find one that does. If the file is on mainframe, a Program/Utility should be able to handle it. Thanks, Kolusu -- 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: DFSort to pull the latest record date
Excel is awful to use. I would recommend doing as much as possible elsewhere before loading into Excel. (Including what some of my code does: Creating the CSV files in DFSORT.) Cheers, Martin Martin Packer Systems Investigator & Performance Troubleshooter, IBM +44-7802-245-584 email: martin_pac...@uk.ibm.com Twitter / Facebook IDs: MartinPacker Blog: https://mainframeperformancetopics.com Mainframe, Performance, Topics Podcast Series (With Marna Walle): https://anchor.fm/marna-walle Youtube channel: https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA From: Sri h Kolusu To: IBM-MAIN@LISTSERV.UA.EDU Date: 25/09/2020 18:34 Subject:[EXTERNAL] Re: DFSort to pull the latest record date Sent by:IBM Mainframe Discussion List >>If you can load to EXCEL - use its functions Not all functions on the mainframe can do everything. You should look at what makes sense. And if the tool you are comfortable in using, does not have the function, I would say to find one that does. Lizette, EXCEL is limited to 1 million records. And it would take a lot of time to load it and then sort it and then eliminate the duplicates. >>Not all functions on the mainframe can do everything. You should look at what makes sense. And if the tool you are comfortable in using, does not have the function, I would say to find one that does. If the file is on mainframe, a Program/Utility should be able to handle it. Thanks, Kolusu -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN Unless stated otherwise above: IBM United Kingdom Limited - Registered in England and Wales with number 741598. Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSort to pull the latest record date
On Fri, 25 Sep 2020 14:08:30 -0300, Clark Morris wrote: > >Given the obscurity of the control statements (quick tell me what >field is 1,4,CH) why not write the thing in a language that has access >to the descriptions of the fields being used? We are not in the era >of 22K DOS360 partitions, 100K MVT regions or 4 megabyte MVS regions >anymore. PL1 and COBOL both generate fairly efficient code and when >the tool becomes more than one off wonder, someone else can pick up >the program and have a fighting chance of understanding what was being >done. > Kolusu gave an answer which appears to be, "take the first record after sort descending with: SORT FIELDS=(01,14,CH,A, $ ITEM_NBR + STORE_NBR 26,10,UFF,D) $ ITEM_DATE That's well-commented; as clear as naming the fields in a COBOL record definition. The possible advantage exists if that record definition exists in a copybook and needn't be coded ad-hoc by the programmer. But a similar effect could be achieved by JCL symbols, possibly defined in a JCLLIB member, to be substituted in an instream SORTCTL. (As a novice, and accustomed only to other sort utilities, I was surprised only that the major key seems to come last.) The inconvenience of COBOL for a one-off is the need for a prior job step to compile and link into a temporary STEPLIB (or does the COBOL PROC have a compile-load-and go option?) Similarly, Rexx for a one-off requires a prior IEBGENER step to copy SYSIN to a temporary SYSEXEC (but I've done something similar with IKJEFT01: REPRO; EXEC.) But does RT ever author his own SORTCTL, or always appeal to the list to do it for him? -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSort to pull the latest record date
On Fri, 25 Sep 2020 10:25:13 -0700, Sri h Kolusu wrote: > >... The control statements for DFSORT >are not obscure and they are on the same level as following the >coding/syntax rules for a programming language. For example COBOL, you >would follow all the rules governing it. So why not do the same for DFSORT? > The comments in your example provided the necessary clarity. >... >Aren't the programs depending on the input file attributes? For example a >COBOL program written to handle a FB 80 byte file will NOT work with FB 100 >byte file. You need to write another program to handle it. With DFSORT >there is absolutely no change in the control cards for different LRECL as >long as the key fields are the same. > I hope that information could be gleaned from the data set label. Rexx, at least works that way. I'd be optimistic for PL/I to do likewise; perhaps pessimistic for COBOL. But a COBOL advocate might correct me. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSort to pull the latest record date
Just a wild guess? Sort it in reverse and take the first record as oldest date?? Chris Hoelscher Lead Sys DBA IBM Global Technical Services on assignmemt to Humana Inc. T 502.476.2538 or 502.407.7266 -Original Message- From: IBM Mainframe Discussion List On Behalf Of Lizette Koehler Sent: Friday, September 25, 2020 1:16 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: [IBM-MAIN] DFSort to pull the latest record date [External Email: Use caution with links and attachments] Why not load the data into a DB and use SQL or similar language? If you have SAS - Max Min - functions If you can load to EXCEL - use its functions Not all functions on the mainframe can do everything. You should look at what makes sense. And if the tool you are comfortable in using, does not have the function, I would say to find one that does. Hope that helps Lizette -Original Message- From: IBM Mainframe Discussion List On Behalf Of Ron Thomas Sent: Friday, September 25, 2020 9:55 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: DFSort to pull the latest record date Hello We are using DFSORT utility to extract the latest record for a store/item/po and below is the sample file item_nbr| Store_nbr|Po_nbr|item_date|mode| 00604|9137|1100276393|2017-12-26|7|DSD | 00604|9137|1100278550|2018-01-09|6|DSD | Here we need to pull the 2'nd record to the Output as this is the latest date . Could someone please let me know how to achieve the same Regards Ron T -- 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 The information transmitted is intended only for the person or entity to which it is addressed and may contain CONFIDENTIAL material. If you receive this material/information in error, please contact the sender and delete or destroy the material/information. Humana Inc. and its subsidiaries comply with applicable Federal civil rights laws and do not discriminate on the basis of race, color, national origin, ancestry, age, disability, sex, marital status, gender, sexual orientation, gender identity, or religion. Humana Inc. and its subsidiaries do not exclude people or treat them differently because of race, color, national origin, ancestry, age, disability, sex, marital status, gender, sexual orientation, gender identity, or religion. English: ATTENTION: If you do not speak English, language assistance services, free of charge, are available to you. Call 1‐877‐320‐1235 (TTY: 711). Español (Spanish): ATENCIÓN: Si habla español, tiene a su disposición servicios gratuitos de asistencia lingüística. Llame al 1‐877‐320‐1235 (TTY: 711). 繁體中文(Chinese):注意:如果您使用繁體中文,您可以免費獲得語言援助 服務。請致電 1‐877‐320‐1235 (TTY: 711)。 Kreyòl Ayisyen (Haitian Creole): ATANSION: Si w pale Kreyòl Ayisyen, gen sèvis èd pou lang ki disponib gratis pou ou. Rele 1‐877‐320‐1235 (TTY: 711). Polski (Polish): UWAGA: Jeżeli mówisz po polsku, możesz skorzystać z bezpłatnej pomocy językowej. Zadzwoń pod numer 1‐877‐320‐1235 (TTY: 711). 한국어 (Korean): 주의: 한국어를 사용하시는 경우, 언어 지원 서비스를 무료로 이용하실 수 있습니다. 1‐877‐320‐1235 (TTY: 711)번으로 전화해 주십시오. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: shopz UJ01255
Share.org has a wealth of SMP/E presentations. Davod -Original Message- From: Jousma, David <01a0403c5dc1-dmarc-requ...@listserv.ua.edu> To: IBM-MAIN@LISTSERV.UA.EDU Sent: Fri, Sep 25, 2020 6:22 am Subject: Re: shopz UJ01255 Instead of ordering "Recommended", order everything, and then only apply the Recommended. CONTENT (ALL) Its entirely possible the PTF you are interested in, never made it to "recommended". _ Dave Jousma AVP | Director, Technology Engineering Fifth Third Bank | 1830 East Paris Ave, SE | MD RSCB2H | Grand Rapids, MI 49546 616.653.8429 | fax: 616.653.2717 -Original Message- From: IBM Mainframe Discussion List On Behalf Of R Hey Sent: Thursday, September 24, 2020 8:46 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: shopz UJ01255 **CAUTION EXTERNAL EMAIL** **DO NOT open attachments or click on links from unknown senders or unexpected emails** Hi, I did an order RECEIVE ORDER(CONTENT(RECOMMENDED)... in shopZ for zos2.3 in May & Sep. I got many PTF up to RSU2008, but was missing UJ01255. I found that out of this list: UJ00088 F909 UJ00655 F911 UJ01172 F912 UJ00961 F001 UJ01255 F001 UJ01547 F003 UJ01809 F003 UJ02346 F003 UJ02146 F003 UJ01872 F004 UJ02215 F004 UJ02516 F005 UJ02578 F006 UJ02979 F007 UJ03210 F008 UJ03366 F008 I was missing these: UJ01255 NOT FOUND UJ01872 NOT FOUND UJ02215 NOT FOUND UJ02578 NOT FOUND UJ02979 NOT FOUND UJ03210 NOT FOUND UJ03366 NOT FOUND Has this been the case for anybody else? Thanks, Rez -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN **CAUTION EXTERNAL EMAIL** **DO NOT open attachments or click on links from unknown senders or unexpected emails** This e-mail transmission contains information that is confidential and may be privileged. It is intended only for the addressee(s) named above. If you receive this e-mail in error, please do not read, copy or disseminate it in any manner. If you are not the intended recipient, any disclosure, copying, distribution or use of the contents of this information is prohibited. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please erase it from your computer system. Your assistance in correcting this error is appreciated. -- 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: Caution: "Hacked" email caused the distribution of a potentially harmful attachment
The email came from someone in our organization who was asking us to forward any suspicious attachment by clicking on it and saving it before forwarding it on. My reaction was that this was another attempt to get all the recipients to click on something dangerous. I immediately sent an email to say "don't do what the email asks". The originator apologised but said what he asked for was perfectly reasonable. Very poor. On Sat, Sep 26, 2020 at 3:31 AM zMan wrote: > Wayne Bickerdike wrote: > > >My "spoof" email was apparently genuine. The > > >person who sent it has no idea > > >how much he got wrong with the request. > > Eh? Can you elaborate? First sentence makes no sense. It was spoofed or it > wasn't?! > -- > zMan -- "I've got a mainframe and I'm not afraid to use it" > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- Wayne V. Bickerdike -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN