Re: Edit Macro
On Thu, 6 Aug 2020 20:51:42 -0400, Bob Bridges wrote: >No one else has mentioned it, so I may be all wet, but don't you have to >have an ISPF environment to run an ISPF Edit macro? IKJEFT01 won't do >itI thought. > It was mentioned and addressed: On Thu, 6 Aug 2020 22:40:40 +, Steely.Mark wrote: >... >//SYSTSIN DD * >PROFILE PREFIX(xx) >ISPSTART CMD(%EDITREX1 XXX0111.DATA(DATAXX) - EICUPDT PARM(1)) >/* -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: OT: OOBOL and English was Re: Still COBOL After All These Years?
PKB -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List on behalf of R.S. Sent: Thursday, August 6, 2020 5:25 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: OT: OOBOL and English was Re: Still COBOL After All These Years? W dniu 05.08.2020 o 17:07, Seymour J Metz pisze: > Must you be so obtuse? The structure that they devised is extremely hard to > change. Look at how long it took for everyone to switch from the Julian > Calendar to the Gregorian calendar. > > Yes, Europe has had treaties, and before the ones that you mentioned at that, > but some things are easier to change than others. Let me know when, e.g., > Europe gets rid of its royalty (yes, I know that they're mostly symbolic.) Must you be so boorish? Must you insult people? Don't you have better hobby? This is not the place for your rudeness, better would be psychiatric office. -- 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,http://secure-web.cisco.com/1UjtIGDN3-XW3SZrqtfXFgBvH-3lBJB-PHSgfH0x8mYGF_z0Vf3Qa9L5HsJ44dTrDlmBU-O5jXau4Kg1ArF3ua2RleIT1xF6mIGAXRIlblqsnvjPFutxrv9G5IifiuJhfxM5I0qOI4kr2M107g0e2cG3L7CDJk3ZNbrm6yPyC4T1aYGxnTunEZpAhXiY1_-LN7LD4TtkTCcLR1IpwFKhMTEgKF0J8NMDGRGGwjgS16JFJPP1mZo-t78AaxdiRUl37xRVVru3BI8db19Pfr3Oi43gE-1-Pu5ibh2tuVdP_wORCxJNOuia8UmX1X0mCy1x2qEUHn3yRQRYdDAMxxqOyqgqg1rV0UkAUr2otmuPU_7axcUKpQFWytyY_pxfT5_TfwT1SPxSPXxi-apTIVPBwqKUW7gpp3nPZ1h8edCfMrrdEnV64uclKSciF-LbuldZD/http%3A%2F%2Fwww.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,http://secure-web.cisco.com/1UjtIGDN3-XW3SZrqtfXFgBvH-3lBJB-PHSgfH0x8mYGF_z0Vf3Qa9L5HsJ44dTrDlmBU-O5jXau4Kg1ArF3ua2RleIT1xF6mIGAXRIlblqsnvjPFutxrv9G5IifiuJhfxM5I0qOI4kr2M107g0e2cG3L7CDJk3ZNbrm6yPyC4T1aYGxnTunEZpAhXiY1_-LN7LD4TtkTCcLR1IpwFKhMTEgKF0J8NMDGRGGwjgS16JFJPP1mZo-t78AaxdiRUl37xRVVru3BI8db19Pfr3Oi43gE-1-Pu5ibh2tuVdP_wORCxJNOuia8UmX1X0mCy1x2qEUHn3yRQRYdDAMxxqOyqgqg1rV0UkAUr2otmuPU_7axcUKpQFWytyY_pxfT5_TfwT1SPxSPXxi-apTIVPBwqKUW7gpp3nPZ1h8edCfMrrdEnV64uclKSciF-LbuldZD/http%3A%2F%2Fwww.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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Edit Macro
You are correct; you have to call an EDIT macro from within EDIT. However, you can write a macro that tests how it was invoked and behaves accordingly. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List on behalf of Bob Bridges Sent: Thursday, August 6, 2020 8:51 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Edit Macro No one else has mentioned it, so I may be all wet, but don't you have to have an ISPF environment to run an ISPF Edit macro? IKJEFT01 won't do itI thought. --- Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313 /* Never dare your little brother to paint the family car. -from "Deep Thoughts From Kids" contest, ages 4-15 years */ -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Steely.Mark Sent: Thursday, August 6, 2020 18:36 I have this edit macro EICUPDT: * Top of Data ISREDIT MACRO (NUM1) ISREDIT COPY EICLIST 20 20 BEFORE 1 ISREDIT COPY EICLIST BEFORE 1 EXIT: + EXIT CODE(0) Bottom of Data ** When I am in a edit member session and I enter this command "EICUPDT 3" from the command line the Macro works as expected. All this does is copy 2 lines from EICLIST. It always copies line 20 but I supply a number for the other line to copy. I am trying to execute this in batch. I have done this in the past but I never needed to pass a parm. //TSOBTCH1 EXEC PGM=IKJEFT01 //SYSTSPRT DD SYSOUT=* ... //SYSTSIN DD * PROFILE PREFIX(xx) ISPSTART CMD(%EDITREX1 XXX0111.DATA(DATAXX) - EICUPDT PARM(1)) /* //* Here is EDITREX1: * Top of Data * /* REXX */ TRACE IR /* -- */ /* All REXX reserved words are shown in CAPS and all user */ /* defined variables are shown in 'lower case'. */ /* -- */ PARSE ARG filename macro1 macro2 ADDRESS ISPEXEC "EDIT DATASET('"filename"') MACRO("macro1") "macro2 Bottom of Data *** I added macro2 to accept the parm value. This is the results: >O> "EDIT DATASET('XXX0111.DATA(DATAXX)') MACRO(EICUPDT) PARM(1)" <---This is the last line that the trace produced ISRP124 Macro parameter error -/-The parameter specified by PARM keyword of the EDIT service could not be resolved. READY I have tried several different ways. Too many to show here. Any help would be 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: Edit Macro
No one else has mentioned it, so I may be all wet, but don't you have to have an ISPF environment to run an ISPF Edit macro? IKJEFT01 won't do itI thought. --- Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313 /* Never dare your little brother to paint the family car. -from "Deep Thoughts From Kids" contest, ages 4-15 years */ -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Steely.Mark Sent: Thursday, August 6, 2020 18:36 I have this edit macro EICUPDT: * Top of Data ISREDIT MACRO (NUM1) ISREDIT COPY EICLIST 20 20 BEFORE 1 ISREDIT COPY EICLIST BEFORE 1 EXIT: + EXIT CODE(0) Bottom of Data ** When I am in a edit member session and I enter this command "EICUPDT 3" from the command line the Macro works as expected. All this does is copy 2 lines from EICLIST. It always copies line 20 but I supply a number for the other line to copy. I am trying to execute this in batch. I have done this in the past but I never needed to pass a parm. //TSOBTCH1 EXEC PGM=IKJEFT01 //SYSTSPRT DD SYSOUT=* ... //SYSTSIN DD * PROFILE PREFIX(xx) ISPSTART CMD(%EDITREX1 XXX0111.DATA(DATAXX) - EICUPDT PARM(1)) /* //* Here is EDITREX1: * Top of Data * /* REXX */ TRACE IR /* -- */ /* All REXX reserved words are shown in CAPS and all user */ /* defined variables are shown in 'lower case'. */ /* -- */ PARSE ARG filename macro1 macro2 ADDRESS ISPEXEC "EDIT DATASET('"filename"') MACRO("macro1") "macro2 Bottom of Data *** I added macro2 to accept the parm value. This is the results: >O> "EDIT DATASET('XXX0111.DATA(DATAXX)') MACRO(EICUPDT) PARM(1)" <---This is the last line that the trace produced ISRP124 Macro parameter error -/-The parameter specified by PARM keyword of the EDIT service could not be resolved. READY I have tried several different ways. Too many to show here. Any help would be appreciated. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Edit Macro
So, you would do it like this: ISPEXEC EDIT DSN(BLAHBLAH) MACRO(START) In START: ISREDIT MACRO ISREDIT EICUPDT 5 ISREDIT END The initial macro has to call the EICUPDT macro. Joe On Thu, Aug 6, 2020 at 6:48 PM Joe Monk wrote: > It is a REQUIREMENT that when you run ISREDIT in BATCH, the INPUT TO > ISREDIT MUST BE SUPPLIED BY A MACRO. > > So, when your REXX exec launches ISREDIT, it must supply all of the input > to ISREDIT VIA A MACRO. > > Joe > > On Thu, Aug 6, 2020 at 6:18 PM Steely.Mark > wrote: > >> Thanks for the ISREDIT END suggestion. >> >> I did add that - but the process is not executing the macro. >> >> So that is not the problem. >> >> Thanks >> >> >> >> -Original Message- >> From: IBM Mainframe Discussion List On Behalf >> Of Joe Monk >> Sent: Thursday, August 06, 2020 5:57 PM >> To: IBM-MAIN@LISTSERV.UA.EDU >> Subject: Re: Edit Macro >> >> ATTENTION: This e-mail came from an external source. Do not open >> attachments or click on links from unknown or unexpected emails. >> >> >> Well... >> >> The first thing youve got to do is fix your edit macro. When you run an >> edit macro in batch, it has to end with "ISREDIT END". >> >> So, you might have two different versions, one for batch and one for >> online. >> >> Second, when you run ISREDIT in batch, you have to use a macro to supply >> the input. So, you'll probably need to rethink how youre invoking ISREDIT >> in batch. >> >> Joe >> >> >> >> On Thu, Aug 6, 2020 at 5:40 PM Steely.Mark >> wrote: >> >> > Send again hope it keeps the formatting. >> > >> > I have this edit macro EICUPDT: >> > >> > * Top of Data ISREDIT MACRO >> > (NUM1) ISREDIT COPY EICLIST 20 20 BEFORE 1 ISREDIT COPY EICLIST >> > BEFORE 1 >> > EXIT: + >> > EXIT CODE(0) >> > Bottom of Data ** >> > >> > When I am in a edit member session and I enter this command "EICUPDT 3" >> > from the command line the Macro works as expected. All this does is >> > copy 2 lines from EICLIST. It always copies line 20 but I supply a >> > number for the other line to copy. >> > >> > I am trying to execute this in batch. I have done this in the past but >> > I never needed to pass a parm. >> > >> > //TSOBTCH1 EXEC PGM=IKJEFT01 >> > //SYSTSPRT DD SYSOUT=* >> > ... >> > //SYSTSIN DD * >> > PROFILE PREFIX(xx) >> > ISPSTART CMD(%EDITREX1 XXX0111.DATA(DATAXX) - EICUPDT PARM(1)) >> > /* >> > //* >> > >> > Here is EDITREX1: >> > * Top of Data >> > * >> > /* REXX */ >> > TRACE IR >> > /* -- >> > */ >> > /* All REXX reserved words are shown in CAPS and all user */ >> > /* defined variables are shown in 'lower case'. */ >> > /* -- >> > */ PARSE ARG filename macro1 macro2 ADDRESS ISPEXEC "EDIT >> > DATASET('"filename"') MACRO("macro1") "macro2 >> > Bottom of Data >> > *** >> > >> > I added macro2 to accept the parm value. >> > >> > This is the results: >> > >> >>O> "EDIT DATASET('XXX0111.DATA(DATAXX)') MACRO(EICUPDT) >> > PARM(1)" <---This is the last line that the trace produced >> > ISRP124 Macro parameter error -/-The parameter specified by PARM >> > keyword of the EDIT service could not be resolved. >> > READY >> > >> > I have tried several different ways. Too many to show here. >> > >> > Any help would be appreciated. >> > >> > Thank You >> > *** Disclaimer *** >> > This communication (including all attachments) is solely for the use >> > of the person to whom it is addressed and is a confidential AAA >> communication. >> > If you are not the intended recipient, any use, distribution, >> > printing, or copying is prohibited. If you received this email in >> > error, please immediately delete it and notify the sender. >> > >> > -- >> > 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 >> >> *** Disclaimer *** >> This communication (including all attachments) is solely for the use of >> the person to whom it is addressed and is a confidential AAA communication. >> If you are not the intended recipient, any use, distribution, printing, or >> copying is prohibited. If you received this email in error, please >> immediately delete it and notify the sender. >> >> -- >> For IBM-MAIN subscribe / signoff / archive access instructions, >> send email to lists...@listserv.ua.edu with the message: INFO
Re: Edit Macro
It is a REQUIREMENT that when you run ISREDIT in BATCH, the INPUT TO ISREDIT MUST BE SUPPLIED BY A MACRO. So, when your REXX exec launches ISREDIT, it must supply all of the input to ISREDIT VIA A MACRO. Joe On Thu, Aug 6, 2020 at 6:18 PM Steely.Mark wrote: > Thanks for the ISREDIT END suggestion. > > I did add that - but the process is not executing the macro. > > So that is not the problem. > > Thanks > > > > -Original Message- > From: IBM Mainframe Discussion List On Behalf > Of Joe Monk > Sent: Thursday, August 06, 2020 5:57 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Edit Macro > > ATTENTION: This e-mail came from an external source. Do not open > attachments or click on links from unknown or unexpected emails. > > > Well... > > The first thing youve got to do is fix your edit macro. When you run an > edit macro in batch, it has to end with "ISREDIT END". > > So, you might have two different versions, one for batch and one for > online. > > Second, when you run ISREDIT in batch, you have to use a macro to supply > the input. So, you'll probably need to rethink how youre invoking ISREDIT > in batch. > > Joe > > > > On Thu, Aug 6, 2020 at 5:40 PM Steely.Mark > wrote: > > > Send again hope it keeps the formatting. > > > > I have this edit macro EICUPDT: > > > > * Top of Data ISREDIT MACRO > > (NUM1) ISREDIT COPY EICLIST 20 20 BEFORE 1 ISREDIT COPY EICLIST > > BEFORE 1 > > EXIT: + > > EXIT CODE(0) > > Bottom of Data ** > > > > When I am in a edit member session and I enter this command "EICUPDT 3" > > from the command line the Macro works as expected. All this does is > > copy 2 lines from EICLIST. It always copies line 20 but I supply a > > number for the other line to copy. > > > > I am trying to execute this in batch. I have done this in the past but > > I never needed to pass a parm. > > > > //TSOBTCH1 EXEC PGM=IKJEFT01 > > //SYSTSPRT DD SYSOUT=* > > ... > > //SYSTSIN DD * > > PROFILE PREFIX(xx) > > ISPSTART CMD(%EDITREX1 XXX0111.DATA(DATAXX) - EICUPDT PARM(1)) > > /* > > //* > > > > Here is EDITREX1: > > * Top of Data > > * > > /* REXX */ > > TRACE IR > > /* -- > > */ > > /* All REXX reserved words are shown in CAPS and all user */ > > /* defined variables are shown in 'lower case'. */ > > /* -- > > */ PARSE ARG filename macro1 macro2 ADDRESS ISPEXEC "EDIT > > DATASET('"filename"') MACRO("macro1") "macro2 > > Bottom of Data > > *** > > > > I added macro2 to accept the parm value. > > > > This is the results: > > > >>O> "EDIT DATASET('XXX0111.DATA(DATAXX)') MACRO(EICUPDT) > > PARM(1)" <---This is the last line that the trace produced > > ISRP124 Macro parameter error -/-The parameter specified by PARM > > keyword of the EDIT service could not be resolved. > > READY > > > > I have tried several different ways. Too many to show here. > > > > Any help would be appreciated. > > > > Thank You > > *** Disclaimer *** > > This communication (including all attachments) is solely for the use > > of the person to whom it is addressed and is a confidential AAA > communication. > > If you are not the intended recipient, any use, distribution, > > printing, or copying is prohibited. If you received this email in > > error, please immediately delete it and notify the sender. > > > > -- > > 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 > > *** Disclaimer *** > This communication (including all attachments) is solely for the use of > the person to whom it is addressed and is a confidential AAA communication. > If you are not the intended recipient, any use, distribution, printing, or > copying is prohibited. If you received this email in error, please > immediately delete it and notify the sender. > > -- > 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: Edit Macro
Thanks for the ISREDIT END suggestion. I did add that - but the process is not executing the macro. So that is not the problem. Thanks -Original Message- From: IBM Mainframe Discussion List On Behalf Of Joe Monk Sent: Thursday, August 06, 2020 5:57 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Edit Macro ATTENTION: This e-mail came from an external source. Do not open attachments or click on links from unknown or unexpected emails. Well... The first thing youve got to do is fix your edit macro. When you run an edit macro in batch, it has to end with "ISREDIT END". So, you might have two different versions, one for batch and one for online. Second, when you run ISREDIT in batch, you have to use a macro to supply the input. So, you'll probably need to rethink how youre invoking ISREDIT in batch. Joe On Thu, Aug 6, 2020 at 5:40 PM Steely.Mark wrote: > Send again hope it keeps the formatting. > > I have this edit macro EICUPDT: > > * Top of Data ISREDIT MACRO > (NUM1) ISREDIT COPY EICLIST 20 20 BEFORE 1 ISREDIT COPY EICLIST > BEFORE 1 > EXIT: + > EXIT CODE(0) > Bottom of Data ** > > When I am in a edit member session and I enter this command "EICUPDT 3" > from the command line the Macro works as expected. All this does is > copy 2 lines from EICLIST. It always copies line 20 but I supply a > number for the other line to copy. > > I am trying to execute this in batch. I have done this in the past but > I never needed to pass a parm. > > //TSOBTCH1 EXEC PGM=IKJEFT01 > //SYSTSPRT DD SYSOUT=* > ... > //SYSTSIN DD * > PROFILE PREFIX(xx) > ISPSTART CMD(%EDITREX1 XXX0111.DATA(DATAXX) - EICUPDT PARM(1)) > /* > //* > > Here is EDITREX1: > * Top of Data > * > /* REXX */ > TRACE IR > /* -- > */ > /* All REXX reserved words are shown in CAPS and all user */ > /* defined variables are shown in 'lower case'. */ > /* -- > */ PARSE ARG filename macro1 macro2 ADDRESS ISPEXEC "EDIT > DATASET('"filename"') MACRO("macro1") "macro2 > Bottom of Data > *** > > I added macro2 to accept the parm value. > > This is the results: > >>O> "EDIT DATASET('XXX0111.DATA(DATAXX)') MACRO(EICUPDT) > PARM(1)" <---This is the last line that the trace produced > ISRP124 Macro parameter error -/-The parameter specified by PARM > keyword of the EDIT service could not be resolved. > READY > > I have tried several different ways. Too many to show here. > > Any help would be appreciated. > > Thank You > *** Disclaimer *** > This communication (including all attachments) is solely for the use > of the person to whom it is addressed and is a confidential AAA communication. > If you are not the intended recipient, any use, distribution, > printing, or copying is prohibited. If you received this email in > error, please immediately delete it and notify the sender. > > -- > 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 *** Disclaimer *** This communication (including all attachments) is solely for the use of the person to whom it is addressed and is a confidential AAA communication. If you are not the intended recipient, any use, distribution, printing, or copying is prohibited. If you received this email in error, please immediately delete it and notify the sender. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Edit Macro
Well... The first thing youve got to do is fix your edit macro. When you run an edit macro in batch, it has to end with "ISREDIT END". So, you might have two different versions, one for batch and one for online. Second, when you run ISREDIT in batch, you have to use a macro to supply the input. So, you'll probably need to rethink how youre invoking ISREDIT in batch. Joe On Thu, Aug 6, 2020 at 5:40 PM Steely.Mark wrote: > Send again hope it keeps the formatting. > > I have this edit macro EICUPDT: > > * Top of Data > ISREDIT MACRO (NUM1) > ISREDIT COPY EICLIST 20 20 BEFORE 1 > ISREDIT COPY EICLIST BEFORE 1 > EXIT: + > EXIT CODE(0) > Bottom of Data ** > > When I am in a edit member session and I enter this command "EICUPDT 3" > from the command line the Macro works as expected. All this does is copy 2 > lines from EICLIST. It always copies line 20 but I supply a number for the > other line to copy. > > I am trying to execute this in batch. I have done this in the past but I > never needed to pass a parm. > > //TSOBTCH1 EXEC PGM=IKJEFT01 > //SYSTSPRT DD SYSOUT=* > ... > //SYSTSIN DD * > PROFILE PREFIX(xx) > ISPSTART CMD(%EDITREX1 XXX0111.DATA(DATAXX) - EICUPDT PARM(1)) > /* > //* > > Here is EDITREX1: > * Top of Data * > /* REXX */ > TRACE IR > /* -- */ > /* All REXX reserved words are shown in CAPS and all user */ > /* defined variables are shown in 'lower case'. */ > /* -- */ > PARSE ARG filename macro1 macro2 > ADDRESS ISPEXEC "EDIT DATASET('"filename"') MACRO("macro1") "macro2 > Bottom of Data *** > > I added macro2 to accept the parm value. > > This is the results: > >>O> "EDIT DATASET('XXX0111.DATA(DATAXX)') MACRO(EICUPDT) > PARM(1)" <---This is the last line that the trace produced > ISRP124 Macro parameter error -/-The parameter specified by PARM > keyword of the EDIT service could not be resolved. > READY > > I have tried several different ways. Too many to show here. > > Any help would be appreciated. > > Thank You > *** Disclaimer *** > This communication (including all attachments) is solely for the use of > the person to whom it is addressed and is a confidential AAA communication. > If you are not the intended recipient, any use, distribution, printing, or > copying is prohibited. If you received this email in error, please > immediately delete it and notify the sender. > > -- > 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
Edit Macro
Send again hope it keeps the formatting. I have this edit macro EICUPDT: * Top of Data ISREDIT MACRO (NUM1) ISREDIT COPY EICLIST 20 20 BEFORE 1 ISREDIT COPY EICLIST BEFORE 1 EXIT: + EXIT CODE(0) Bottom of Data ** When I am in a edit member session and I enter this command "EICUPDT 3" from the command line the Macro works as expected. All this does is copy 2 lines from EICLIST. It always copies line 20 but I supply a number for the other line to copy. I am trying to execute this in batch. I have done this in the past but I never needed to pass a parm. //TSOBTCH1 EXEC PGM=IKJEFT01 //SYSTSPRT DD SYSOUT=* ... //SYSTSIN DD * PROFILE PREFIX(xx) ISPSTART CMD(%EDITREX1 XXX0111.DATA(DATAXX) - EICUPDT PARM(1)) /* //* Here is EDITREX1: * Top of Data * /* REXX */ TRACE IR /* -- */ /* All REXX reserved words are shown in CAPS and all user */ /* defined variables are shown in 'lower case'. */ /* -- */ PARSE ARG filename macro1 macro2 ADDRESS ISPEXEC "EDIT DATASET('"filename"') MACRO("macro1") "macro2 Bottom of Data *** I added macro2 to accept the parm value. This is the results: >O> "EDIT DATASET('XXX0111.DATA(DATAXX)') MACRO(EICUPDT) PARM(1)" <---This is the last line that the trace produced ISRP124 Macro parameter error -/-The parameter specified by PARM keyword of the EDIT service could not be resolved. READY I have tried several different ways. Too many to show here. Any help would be appreciated. Thank You *** Disclaimer *** This communication (including all attachments) is solely for the use of the person to whom it is addressed and is a confidential AAA communication. If you are not the intended recipient, any use, distribution, printing, or copying is prohibited. If you received this email in error, please immediately delete it and notify the sender. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Edit Macro
I have this edit macro EICUPDT: * Top of Data ISREDIT MACRO (NUM1) ISREDIT COPY EICLIST 20 20 BEFORE 1 ISREDIT COPY EICLIST BEFORE 1 EXIT: + EXIT CODE(0) Bottom of Data ** When I am in a edit member session and I enter this command "EICUPDT 3" from the command line the Macro works as expected. All this does is copy 2 lines from EICLIST. It always copies line 20 but I supply a number for the other line to copy. I am trying to execute this in batch. I have done this in the past but I never needed to pass a parm. //TSOBTCH1 EXEC PGM=IKJEFT01 //SYSTSPRT DD SYSOUT=* ... //SYSTSIN DD * PROFILE PREFIX(xx) ISPSTART CMD(%EDITREX1 XXX0111.DATA(DATAXX) - EICUPDT PARM(1)) /* //* Here is EDITREX1: * Top of Data * /* REXX */ TRACE IR /* -- */ /* All REXX reserved words are shown in CAPS and all user */ /* defined variables are shown in 'lower case'. */ /* -- */ PARSE ARG filename macro1 macro2 ADDRESS ISPEXEC "EDIT DATASET('"filename"') MACRO("macro1") "macro2 Bottom of Data *** I added macro2 to accept the parm value. This is the results: >O> "EDIT DATASET('XXX0111.DATA(DATAXX)') MACRO(EICUPDT) PARM(1)" <---This is the last line that the trace produced ISRP124 Macro parameter error -/-The parameter specified by PARM keyword of the EDIT service could not be resolved. READY I have tried several different ways. Too many to show here. Any help would be appreciated. Thank You *** Disclaimer *** This communication (including all attachments) is solely for the use of the person to whom it is addressed and is a confidential AAA communication. If you are not the intended recipient, any use, distribution, printing, or copying is prohibited. If you received this email in error, please immediately delete it and notify the sender. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Copy DSNTYPE=BASIC to DSNTYPE=EXTREQ with LRECL=X
I tried to copy a LRECL=X file using ICEGENER, that failed with an Abend 013-E1, so I assume that DF/Sort can't handle it using SORT FIELDS=COPY. Mark Jacobs Sent from ProtonMail, Swiss-based encrypted email. GPG Public Key - https://api.protonmail.ch/pks/lookup?op=get=markjac...@protonmail.com ‐‐‐ Original Message ‐‐‐ On Thursday, August 6, 2020 6:03 PM, David W Noon wrote: > On Thu, 6 Aug 2020 21:47:26 +, Dymoke-bradshaw, Lennie > lennie_dymokebradshaw...@bmc.com wrote abour Re: Copy DSNTYPE=BASIC to > DSNTYPE=EXTREQ with LRECL=X: > > > Matthew, > > Each of those will ensure the output data set is extended format. That is > > not the issue. > > The issue is what program do I use to copy the data when LRECL=X. > > Have you tried SORT FIELDS=COPY or the like? DF/SORT or Syncsort. > > -- > > Regards, > > Dave [RLU #314465] > --- > david.w.n...@gmail.com (David W Noon) > --- > > --- > > 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: Copy DSNTYPE=BASIC to DSNTYPE=EXTREQ with LRECL=X
On Thu, 6 Aug 2020 21:47:26 +, Dymoke-bradshaw, Lennie wrote abour Re: Copy DSNTYPE=BASIC to DSNTYPE=EXTREQ with LRECL=X: > Matthew, > > Each of those will ensure the output data set is extended format. That is not > the issue. > The issue is what program do I use to copy the data when LRECL=X. Have you tried SORT FIELDS=COPY or the like? DF/SORT or Syncsort. -- Regards, Dave [RLU #314465] *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-* david.w.n...@gmail.com (David W Noon) *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-* -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Query ESM from REXX
Hi CBT file 953 has TRYAUTH a REXX program and CHKAUTH a REXX function written in Assembler. TRYAUTH calls CHKAUTH with a dataset name and CHKAUTH uses RACROUTE to check the access of the ID running the program. For your purposes you would need to change TRYAUTH to pass a facility name and remove the code in CHKAUTH where LOCATE is used to get the VOLSER and the subsequent check for MIGRAT, also change the CLASS in the RACROUTE macro. I hope you find this useful. John -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Copy DSNTYPE=BASIC to DSNTYPE=EXTREQ with LRECL=X
Matthew, Each of those will ensure the output data set is extended format. That is not the issue. The issue is what program do I use to copy the data when LRECL=X. Lennie Dymoke-Bradshaw -Original Message- From: IBM Mainframe Discussion List On Behalf Of Matthew Stitt Sent: 06 August 2020 20:56 To: IBM-MAIN@LISTSERV.UA.EDU Subject: [EXTERNAL] Re: Copy DSNTYPE=BASIC to DSNTYPE=EXTREQ with LRECL=X My first thought is to use DSNTYPE on the output DD statement. Second thought is to set up SMS DATACLAS and/or routine to make the output dataset EXTREQ. Matthew On Thu, 6 Aug 2020 17:20:12 +, Dymoke-Bradshaw, Lennie wrote: >Greetings, > >My requirement is in the title here. > >I want to copy data sets which have a DSNTYPE of BASIC to data sets with a >DSNTYPE of EXTREQ (i.e. extended format). However these data sets have LRECL=X >(i.e. LRECL larger than 32760). > >IDCAMS REPRO will not copy LRECL=X data sets. >IEBGENER will copy LRECL=X but not if the attributes are different (as in this >case). > >I need a solution which works at access method level, so no solution using >DFSMSdss is acceptable. >Anyone have any ideas? > >Lennie Dymoke-Bradshaw >Consultant working on contract for BMC Mainframe Services by RSM >Partners 'Dance like no one is watching. Encrypt like everyone is.' -- 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: Copy DSNTYPE=BASIC to DSNTYPE=EXTREQ with LRECL=X
My first thought is to use DSNTYPE on the output DD statement. Second thought is to set up SMS DATACLAS and/or routine to make the output dataset EXTREQ. Matthew On Thu, 6 Aug 2020 17:20:12 +, Dymoke-Bradshaw, Lennie wrote: >Greetings, > >My requirement is in the title here. > >I want to copy data sets which have a DSNTYPE of BASIC to data sets with a >DSNTYPE of EXTREQ (i.e. extended format). However these data sets have LRECL=X >(i.e. LRECL larger than 32760). > >IDCAMS REPRO will not copy LRECL=X data sets. >IEBGENER will copy LRECL=X but not if the attributes are different (as in this >case). > >I need a solution which works at access method level, so no solution using >DFSMSdss is acceptable. >Anyone have any ideas? > >Lennie Dymoke-Bradshaw >Consultant working on contract for BMC Mainframe Services by RSM Partners >'Dance like no one is watching. Encrypt like everyone is.' -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Query ESM from REXX
Walt, The user need access to query racf with IRRXUTIL as well. I think the best way is a racroute 3rd party check, and a the rexx ned to be compiled to hide the code. ITschak *| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere Platform* *|* *Information Security Continuous Monitoring for Z/OS, zLinux and IBM I **| * *|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522 986404 **|* *Skype**: ItschakMugzach **|* *Web**: www.Securiteam.co.il **|* On Thu, Aug 6, 2020 at 10:29 PM Walt Farrell wrote: > On Mon, 3 Aug 2020 04:16:38 +, Gadi Ben-Avi wrote: > > >But that would mean checking if the user has access, or if the user has > access through any of the groups it is connected to. > > If I remember correctly, if the user can see anything from the profile > that protects the resource then he has at least READ access somehow. So > that should provide your answer. So running IRRXUTIL and querying the > profile that protects the resource should provide the answer you need. > > However, I'd be careful doing this. First, of course, you have the Time Of > Check To Time Of Use problem, and after you make your check the user may > lose access. > > Next, you need to worry about where the REXX exec runs. If it runs in the > user's address space then there are ways the user might bypass your check. > > Finally, if your REXX exec is going to do something that will also perform > a security check, then it's generally better to just attempt the operation > and let the real enforcement happen. If you try to make a check yourself > you may get false positives or false negatives, depending on TOCTTOU and/or > how the security administrators decided to setup the profile and access > lists. > > -- > Walt > > -- > 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: Query ESM from REXX
On Mon, 3 Aug 2020 04:16:38 +, Gadi Ben-Avi wrote: >But that would mean checking if the user has access, or if the user has access >through any of the groups it is connected to. If I remember correctly, if the user can see anything from the profile that protects the resource then he has at least READ access somehow. So that should provide your answer. So running IRRXUTIL and querying the profile that protects the resource should provide the answer you need. However, I'd be careful doing this. First, of course, you have the Time Of Check To Time Of Use problem, and after you make your check the user may lose access. Next, you need to worry about where the REXX exec runs. If it runs in the user's address space then there are ways the user might bypass your check. Finally, if your REXX exec is going to do something that will also perform a security check, then it's generally better to just attempt the operation and let the real enforcement happen. If you try to make a check yourself you may get false positives or false negatives, depending on TOCTTOU and/or how the security administrators decided to setup the profile and access lists. -- Walt -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Copy DSNTYPE=BASIC to DSNTYPE=EXTREQ with LRECL=X
Greetings, My requirement is in the title here. I want to copy data sets which have a DSNTYPE of BASIC to data sets with a DSNTYPE of EXTREQ (i.e. extended format). However these data sets have LRECL=X (i.e. LRECL larger than 32760). IDCAMS REPRO will not copy LRECL=X data sets. IEBGENER will copy LRECL=X but not if the attributes are different (as in this case). I need a solution which works at access method level, so no solution using DFSMSdss is acceptable. Anyone have any ideas? Lennie Dymoke-Bradshaw Consultant working on contract for BMC Mainframe Services by RSM Partners 'Dance like no one is watching. Encrypt like everyone is.' -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: [External] IBM z15 Announcement Letter
Radoslaw is correct however. The actual Service Guide PDF's do not appear to be publicly available even for older models, or perhaps only via Resource Link for actual IBM hardware customers. It seems that you can't get them from the Library site here: https://www-05.ibm.com/e-business/linkweb/puc/jsp/index.jsp?page=Search=search I do not have a real customer sign-in for instance, so I cannot check to see if they are available on Resource Link. Peter -Original Message- From: IBM Mainframe Discussion List On Behalf Of Pommier, Rex Sent: Thursday, August 6, 2020 11:29 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: [External] IBM z15 Announcement Letter Radoslaw, The announcement letter says the planned availability date for the enhancements is September 15. I believe the documentation will be available on that date as well. In your note below, you quoted them " and will be available at planned availability in the "Library" section of Resource Link:". Rex -Original Message- From: IBM Mainframe Discussion List On Behalf Of R.S. Sent: Wednesday, August 5, 2020 6:34 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [External] IBM z15 Announcement Letter I just read IBM Announcement Letter regarding z15 enhancements https://www-01.ibm.com/common/ssi/ShowDoc.wss?docURL=/common/ssi/rep_ca/0/897/ENUS120-050/index.html=en_locale=en At the bottom they write about documentation. The following publications are shipped with the product and will be available at planned availability in the "Library" section of Resource Link: IBM 8561 Service Guide GC28-6998 IBM 8562 Service Guide GC28-7010 Service Guide. This manual is delivered with MES (upgrade) or with new machine - "shipped with the product". However it is NOT available in Resource Link. So, the official Letter tells us lies. It is not just typo, or "books are not yet available". Similar information is mentioned in many previous Letters, but Service Guide is NOT available for z15, z14, z13, etc. Is it intentional? What is the goal to misinform customers? Notes: 1. This is not classified as "licensed" or "restricted" material. This is one of the books comprising technical documentation available to customer. 2. This book is delivered on CD and/or hardcopy. It is delivered with new machine or with MES (upgrade). 3. AFAIK this is the only book in such strange state. Other documentation is available on Resource Link. Everything except this one book. 4. Do not confuse this Service Guid with similar titles, like Service Guide for HMC, SE, TKE. This manual is for CPC. -- Radoslaw Skorupka Lodz, Poland This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: [External] IBM z15 Announcement Letter
Radoslaw, The announcement letter says the planned availability date for the enhancements is September 15. I believe the documentation will be available on that date as well. In your note below, you quoted them " and will be available at planned availability in the "Library" section of Resource Link:". Rex -Original Message- From: IBM Mainframe Discussion List On Behalf Of R.S. Sent: Wednesday, August 5, 2020 6:34 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [External] IBM z15 Announcement Letter I just read IBM Announcement Letter regarding z15 enhancements https://www-01.ibm.com/common/ssi/ShowDoc.wss?docURL=/common/ssi/rep_ca/0/897/ENUS120-050/index.html=en_locale=en At the bottom they write about documentation. The following publications are shipped with the product and will be available at planned availability in the "Library" section of Resource Link: IBM 8561 Service Guide GC28-6998 IBM 8562 Service Guide GC28-7010 Service Guide. This manual is delivered with MES (upgrade) or with new machine - "shipped with the product". However it is NOT available in Resource Link. So, the official Letter tells us lies. It is not just typo, or "books are not yet available". Similar information is mentioned in many previous Letters, but Service Guide is NOT available for z15, z14, z13, etc. Is it intentional? What is the goal to misinform customers? Notes: 1. This is not classified as "licensed" or "restricted" material. This is one of the books comprising technical documentation available to customer. 2. This book is delivered on CD and/or hardcopy. It is delivered with new machine or with MES (upgrade). 3. AFAIK this is the only book in such strange state. Other documentation is available on Resource Link. Everything except this one book. 4. Do not confuse this Service Guid with similar titles, like Service Guide for HMC, SE, TKE. This manual is for CPC. -- 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 The information contained in this message is confidential, protected from disclosure and may be legally privileged. If the reader of this message is not the intended recipient or an employee or agent responsible for delivering this message to the intended recipient, you are hereby notified that any disclosure, distribution, copying, or any action taken or action omitted in reliance on it, is strictly prohibited and may be unlawful. If you have received this communication in error, please notify us immediately by replying to this message and destroy the material in its entirety, whether in electronic or hard copy format. Thank you. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: zSeries and using cloud for backups
Thanks everyone. That gives me a lot of options, if my management decides to go down this path. -Original Message- From: IBM Mainframe Discussion List On Behalf Of Glenn Wilcock Sent: Thursday, August 6, 2020 10:50 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: zSeries and using cloud for backups This message was sent from an external source outside of Western & Southern's network. Do not click links or open attachments unless you recognize the sender and know the contents are safe. The TS7700C provides a really nice option for what you are being asked to do. You can continue to take the backup copies that you do today, and have the TS7700 seamlessly migrate them out to the cloud for you. Best of both worlds! If you want to go directly to the cloud, the DFSMShsm/dss, DS8K transparent cloud tiering provides the value that 100% of the data movement is performed by the DS8K. None of the disk data passes through Z! DFSMShsm TCT migration has been available for some time. This gives you the capability to create a fast PiT backup on disk with DSS (with FlashCopy, all of the data movement is within disk controller), and then have HSM automatic migration move them to the cloud with tct. So, you get PiT backup copies in the cloud, with none of the data passing through Z. Also, DSS just announced this capability for Full Volume Dump and HSM has a statement of direction to provide the same for it's dump capabilities. DS8K TCT now supports compression when targeting a TS7700. Compression when targeting cloud object storage is in the short term roadmap. The DS8K natively encrypts the data, so that you have the piece of mind that the data was encrypted on your Z platform before it even lands on the ip connection to the cloud. Cloud Tape Connector is another nice IBM option that allows you to spin off a tape copy to cloud. Reach out to me if you would like any more information on any/all of the options and I can connect you with the folks to get you more information. -- 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: zSeries and using cloud for backups
The TS7700C provides a really nice option for what you are being asked to do. You can continue to take the backup copies that you do today, and have the TS7700 seamlessly migrate them out to the cloud for you. Best of both worlds! If you want to go directly to the cloud, the DFSMShsm/dss, DS8K transparent cloud tiering provides the value that 100% of the data movement is performed by the DS8K. None of the disk data passes through Z! DFSMShsm TCT migration has been available for some time. This gives you the capability to create a fast PiT backup on disk with DSS (with FlashCopy, all of the data movement is within disk controller), and then have HSM automatic migration move them to the cloud with tct. So, you get PiT backup copies in the cloud, with none of the data passing through Z. Also, DSS just announced this capability for Full Volume Dump and HSM has a statement of direction to provide the same for it's dump capabilities. DS8K TCT now supports compression when targeting a TS7700. Compression when targeting cloud object storage is in the short term roadmap. The DS8K natively encrypts the data, so that you have the piece of mind that the data was encrypted on your Z platform before it even lands on the ip connection to the cloud. Cloud Tape Connector is another nice IBM option that allows you to spin off a tape copy to cloud. Reach out to me if you would like any more information on any/all of the options and I can connect you with the folks to get you more information. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Knowledge Center ...
Justified my investment in installing and configuring KC4z. z/OS doc pretty straightforward except for the surprise change in doc source. CICS not so much if you want the PDFs. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: OT: OOBOL and English was Re: Still COBOL After All These Years?
Touche! -Original Message- From: IBM Mainframe Discussion List On Behalf Of R.S. Sent: Thursday, August 6, 2020 5:25 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: OT: OOBOL and English was Re: Still COBOL After All These Years? [External Email. Exercise caution when clicking links or opening attachments.] W dniu 05.08.2020 o 17:07, Seymour J Metz pisze: > Must you be so obtuse? The structure that they devised is extremely hard to > change. Look at how long it took for everyone to switch from the Julian > Calendar to the Gregorian calendar. > > Yes, Europe has had treaties, and before the ones that you mentioned > at that, but some things are easier to change than others. Let me know > when, e.g., Europe gets rid of its royalty (yes, I know that they're > mostly symbolic.) Must you be so boorish? Must you insult people? Don't you have better hobby? This is not the place for your rudeness, better would be psychiatric office. -- 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 Confidentiality notice: This e-mail message, including any attachments, may contain legally privileged and/or confidential information. If you are not the intended recipient(s), or the employee or agent responsible for delivery of this message to the intended recipient(s), you are hereby notified that any dissemination, distribution, or copying of this e-mail message is strictly prohibited. If you have received this message in error, please immediately notify the sender and delete this e-mail message from your computer. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Multiprise 3000
Contact me off-list. I might be able to help with an old piece of surplus equipment, but I am very limited in how I dispose of it. Tony Thigpen W Mainframe wrote on 8/6/20 1:21 AM: Guys,Any small ESCON storage suggestion for a 7060-P30 model (Multiprise 3000). Something really small.. a physical issue.. not logical..Thank youDan Sent from Yahoo Mail for iPhone -- 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: Multiprise 3000
W dniu 06.08.2020 o 07:21, W Mainframe pisze: Guys,Any small ESCON storage suggestion for a 7060-P30 model (Multiprise 3000). Something really small.. a physical issue.. not logical..Thank youDan IBM DS 6000 Luminex BusTech Everthing is as old as MP3000 and small. -- 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
Multiprise 3000
Guys,Any small ESCON storage suggestion for a 7060-P30 model (Multiprise 3000). Something really small.. a physical issue.. not logical..Thank youDan Sent from Yahoo Mail for iPhone -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: OT: Federalism and speed limits
W dniu 05.08.2020 o 17:58, Bob Bridges pisze: Radoslaw, it seems to me two things are going on here. One is simply a mistake of fact: Speed limits are ~not~ a good candidate for standardization. An upper limit of 120mph would be possible in Texas but insane in North Carolina. You said pretty much the same thing in your original post: In Poland you use 140kph, but in Germany they use...nothing, I guess, except the local policeman's judgement as to whether you're driving safely. Why then do you say it should be different here? I'm guessing you're thinking of the USA as being a single country in the same way Poland is a single country (so why can't the US have a single speed limit like Poland?). But the USA has almost (not quite) the area of Europe. Of course its geography varies considerably, and its speed limits should do the same. The other thing you're ignoring is the issue of sovereignty. I'm guessing you're thinking of the USA as a single country, and assuming the national government can (and should) impose a standardized speed limit on its subdivisions. But as I said in another post, we are a collection of states, not of provinces; the federal government wasn't given that authority. Of course the states can individually agree on standardized rules for some things (not speed limits), IF THEY CHOOSE TO - just as Poland can agree to use the same electrical standards as other sovereign nations, for convenience. But Poland has the authority to decide that - and I'm sure there are subjects on which Poland has decided not to go along with everyone else in EU, for reasons that no doubt seem good to Poland. Bob, First some disclaimers: I really LIKE US. I don't feel comfortable in some countries or places, but I like Unites States. I have been there many times. I like rural places, San Francisco, Sonora Desert, Grand Canyon, NY state, etc. I also observe and like many small differences you have (compared to Europe). However it's off-topic. I also have nothing against political structure of US as Unites States. It is not my problem. Some countries are federations, some are not. Again, it is not my problem at all. Regarding speed limits: First, we are talking about *default* limits. Those limits can be further limited by signs when needed. And of course you have a lot of such signs, I saw them. Small, interesting difference: sometimes during school hours you put temporary signs on something we call "caution wet floor" (small plastic stand). AFAIK, the limit was 15mph, less than normal. 2. I don't dispute how big the limits should be. OK, for me 55mph on highway is definitely too low. However I don't want to jugde whether Texas 85mph is better than NY 65mph. It is not my choice. I would only beg to avoid left-side traffic in some states. ;-) 3. Note: limit allows you to drive slower, depending on weather, snow, car, driver... You are not obliged to achieve the limit. Note2: In EU we also have signs for MINIMUM speed, but it is rarely used and only on some lanes of multi-lane road. Typical value is 60km/h which is approx 37mph. Nevermind. 4. I really see no reason why some state allows 15mph in "residential area" and another allows 55mph. I'm sorry, but independent states have common physics laws and people reflex, etc. 5. States may be independent - this is not my problem. However in Europe it was possible to agree quite detailed agreements between totally independent countries, including communist block, which was rather hostile than friendly. Reason was simple: road traffic has nothing to do with great politics. Yes, it is possible to talk and agree some useful things. Like truck equipment and speed limits. 6. What's funny for me, speed limits cannot be even put in the table, because there is no common categories set. I think Poland has complex set of limits. Usually it is urban area (clearly signed), rural area and highway. In Poland rural are have 3 subcategories: normal, two-way (independent lanes for each direction) and express (in other countries that's equal to highway). Yes, speed limits vary by the country (which I'm not happy), however differences between countries are smaller than in US and the rules are really similar. We also standarized rules regarding turn on red. ;-) Last, but not least: I joined in the looong off-topic discussion. Speed limits in US are not the biggest issue in my life. Really. I don't belong to any Speed Limit Society or Speeders Party. I prefer bicycle - it is better for oversized IT guy. ;-) Regards -- 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
Re: OT: OOBOL and English was Re: Still COBOL After All These Years?
W dniu 05.08.2020 o 17:07, Seymour J Metz pisze: Must you be so obtuse? The structure that they devised is extremely hard to change. Look at how long it took for everyone to switch from the Julian Calendar to the Gregorian calendar. Yes, Europe has had treaties, and before the ones that you mentioned at that, but some things are easier to change than others. Let me know when, e.g., Europe gets rid of its royalty (yes, I know that they're mostly symbolic.) Must you be so boorish? Must you insult people? Don't you have better hobby? This is not the place for your rudeness, better would be psychiatric office. -- 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