how to know who use system symbols
Hi all In our shop there are many system symbols defined. Could you tell us how to know who use system symbols ? Thanks a lot! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: how to know who use system symbols
W dniu 2014-03-19 08:09, mvsmain pisze: Hi all In our shop there are many system symbols defined. Could you tell us how to know who use system symbols ? You can search for them. Good candidates are PROCLIB, PARMLIB, VTAMLST, TCPIP configuration library, etc. The list above may be incomplee, but we don't know your installation, so we cannot guess the dataset names and other libraries where the symbols are / may be used. -- Radoslaw Skorupka Lodz, Poland --- Treść tej wiadomości może zawierać informacje prawnie chronione Banku przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne działanie o podobnym charakterze jest prawnie zabronione i może być karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorized to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 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, nr rejestru przedsiębiorców KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2014 r. kapitał zakładowy mBanku S.A. (w całości wpłacony) wynosi 168.696.052 złote. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Difference between MVS and z / OS systems
In 12e58ce9881ac54091618c736fa1ac647ddb2e6...@corpexmbx.bekco.com, on 03/18/2014 at 03:17 PM, Greg Shirey wgshi...@benekeith.com said: In the document, the author specifically mentions you as one of several people to point out his technical errors. Are you suggesting that he never corrected them or that there were more than you had time to detail? Or that I didn't catch all of them, or that I was working from an obsolete verson. I'll take a look at the latest version and see whether it fills in some of the caps. Unfortunately, one mans critical dates is another man's TMI. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: how to know who use system symbols
mvsmain wrote: In our shop there are many system symbols defined. Could you tell us how to know who use system symbols ? Radoslaw wrote about searching datasets. You could start there. But, I would also ask: exactly what or how do you want to know who use/used system symbols? Usage by member, job, proc, etc or usage by ASASYMBM program? Searching datasets or usage of them is one example, but AFAIK, there are no audit trails for program ASASYMBM. (Even with RACF PROGRAM class) Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: how to know who use system symbols
Where to search for system symbol usage: All JCL: STC, Logon procs, and Batch JCL (Though seeing it in batch jcl is fairly rare) Rexx Clists In catalog aliases Within Commands: DD, SETPROG, VARY etc. (So these might be specified in your automation) Any code invoking SVC 99 Any code invoking ASASYMBM USS paths/symbols And of course as already mentioned, in parmlib, proclib, vtamlst, and tcpip and Jes2 parms. MA On Wed, 19 Mar 2014 05:53:03 -0500, Elardus Engelbrecht elardus.engelbre...@sita.co.za wrote: mvsmain wrote: In our shop there are many system symbols defined. Could you tell us how to know who use system symbols ? Radoslaw wrote about searching datasets. You could start there. But, I would also ask: exactly what or how do you want to know who use/used system symbols? Usage by member, job, proc, etc or usage by ASASYMBM program? Searching datasets or usage of them is one example, but AFAIK, there are no audit trails for program ASASYMBM. (Even with RACF PROGRAM class) Groete / Greetings Elardus Engelbrecht -- 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
assign userid to SMS system address space
Hello all, I know that this question has been posted before, but I could not find an answer that I could work with: We are currently implementing the TS7700 tape library, and SMS does not have the authority to issue F OAM, commands. The the ICH408I messages it does not say that USER() but JOB(SMS) has no permission. That is correct because SMS has no userid assigned. How do you assign a userid to the SMS system address space? At this point I have created a userid (DFSMS) and added a profile with the name SMS.* to the STARTED class with in the STDATA segment the userid that is to be assigned, but the system, the SMS address space, does not pick up the userid. thanks in advance... Wilco Boschman -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: z/OS PKI Services HostIDMapping format
I have a ticket open with the RDz client issues. IBM hasn't provided a resolution yet. They have been questioning the validity of my certificates, but now that they work on CICS Web Services that issue should not be questioned. All I can think of then is that RACF isn't finding the matching hostname in a hostIdMapping. There doesn't seem to be doc on the specifics of this: upper/lower case, fully qualified or not, CNAMES or only ANAMES, etc. But you got this working with CICS, so presumably you've got it covered. Has IBM asked you for a RACF callable services trace? I still haven't gotten FTP server to work with HostIDMapping. I have another issue with certificates and FTP Server that I opened a ticket with IBM on, so I tacked on a 2nd issue of HostIdMapping not working to see what they say. My FTP tests are with a test server (different RACF system than production CICS web services), so there is a possiblitity of some RACF items missing. But I will try to test this weekend with the FTP server on the same RACF system as the CICS web services. FU0972 tlsLevel: entered GU4236 checkSpec: entered with 2F (0,3) FU1026 tlsLevel: using TLSV1 with SSL_AES_128_SHA (2F) FR1318 getUserid: entered FU1092 find_cert: entered for 19 elements FR1401 getUserid: cert query failed- safrc=8, rc=8, rsn=40 But did you complete the other setup steps to enable the use of HostIDMapping? See, for example, item 2 at http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ichzd1c0/2.12.4?SHELF=all13be9.bksDT=20110608113637 or http://preview.tinyurl.com/n63tfyf for details on the required SERVAUTH authority that CICS would need to make use of a HostIDMapping extension. (HostIDMapping, just like basic usage of Certificate Name Filtering, should be transparent to the application once all setup steps are completed.) -- Walt -- http://www.fastmail.fm - The way an email service should be -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: XMLSS performance vs COBOL 4.1 runtime XML
He might also suggest migrating to COBOL 5.1. From the migration guide: The XML function supported by IBM® Enterprise COBOL for z/OS® has been enhanced: •The XML GENERATE statement has been extended with new syntax that gives the programmer more flexibility and control over the form of the XML document that is generated: ◦The NAME phrase has been added to allow user-supplied element and attribute names. ◦The TYPE phrase has been added to give the user control of attribute and element generation. ◦The SUPPRESS phrase has been added to allow suppression of empty attributes and elements. •XML parsing support has been enhanced with a special register, XML-INFORMATION, to easily determine whether the XML content delivered for an XML event is complete or will be continued on the next event. •The compatibility-mode COBOL XML parser from the COBOL library is no longer supported for use by Enterprise COBOL V5 programs. XML PARSE statements in V5 programs always use the XML parser in z/OS XML System Services. Regards, Greg Shirey Ben E. Keith Company -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Frank Swarbrick Sent: Tuesday, March 18, 2014 7:14 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: XMLSS performance vs COBOL 4.1 runtime XML I seem to recall Tom Ross saying that XMLSS is, in fact, generally slower than COMPAT. I believe the only advantage to XMLSS is that it can be offloaded to a specialty engine. So it will be slower but cost less (??). Or slower and cost more if you don't have a specialty engine! Crazy, no? I'm sure Tom will correct me if I have misstated! From: Farley, Peter x23353 peter.far...@broadridge.com To: IBM-MAIN@LISTSERV.UA.EDU Sent: Tuesday, March 18, 2014 3:40 PM Subject: XMLSS performance vs COBOL 4.1 runtime XML One of my co-workers is trying to improve the performance of an Enterprise 4.1 program that decomposes an input XML file into record fields for processing by later programs. The volume of the XML input has increased quite a bit and the performance may soon impact SLA's. This program is currently compiled with XMLPARSE(COMPAT), so I advised him to try compiling a test version with XMLPARSE(XMLSS) and run some production data through both versions a few times to get some average performance numbers. The XMLSS version seems to be running about 10% more CPU utilization and elapsed time than the production version, on average. Are there any tweaks or adjustments that can or should be made to the XMLSS subsystem to improve performance? Our environment is z/OS V1 R12, z196 hardware. Any RTFM would be most appreciated, since I can't make any such changes myself but have to refer them to my systems programming group for consideration. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ICSF KGUP Data Keys
Using the sample utility in the TechDoc would be one solution and I know of customers that are using it, however that implies a couple of things: 1) You have to install and maintain the sample code from the TechDoc (i.e. it is provided 'as is', and for some customers that may not be acceptable) 2) Your key material will exist, at least briefly, in memory when using those ISPF panels, so someone who can view memory could capture your key material 3) And probably most importantly, you need to make sure that the hardcopy of those key parts that are loaded via the panels are stored securely somewhere. An attacker will hit the weakest link, which is probably the file cabinet or drawer where those key parts are stored. You are paying lots of money for the secure key technology, probably not so much for the file cabinet. Another solution might be to simply export your secure keys. That is, you could use a key-export-key (KEK) to encrypt a copy of your operational key and store that encrypted copy in a file somewhere. Or you could use a public pair to encrypt a copy of your operational key and again, store that encrypted copy in a file. If you accidentally delete the operational key from the keystore you would decrypt the backup copy from the file using the KEK or the private key. With this solution, you could still 'shoot yourself in the foot', but you'd have to delete both the original key plus the KEK or the public/private key before you'd be in a bind. Bottom line, is that while the System z crypto technology provides an incredible amount of protection for your key material, your operational procedures are just as important in protecting the crypto infrastructure. If you don't have key integrity (knowing that you have the right keys when you need them) your crypto infrastructure will break down. I'll also agree that if you only have a small number of keys, and they don't change very often, then you don't need a comprehensive key management solution like EKMF or the TKE, however I would suggest that you need some robust local procedures to manage those operational keys. Greg Boyd IBM Advanced Technical Support Supporting Crypto on System z (and soon to be Greg Boyd at MainframeCrypto, www.mainframecrypto.com) On Tue, 18 Mar 2014 10:04:12 -0500, Ann Mackey thearch...@live.com wrote: Greg – Thanks for your reply, it’s a great overview. My concern is not with master keys, only with the data keys (we have tested documented master key recovery procedures). The last half of your answer is a big help. We currently encrypt/decrypt data using one ‘data’ key for all prod data, one key for test, and so on – so we don’t have a high level of change to our key stores. Based on what you pointed out, we could use repro in our current environment, since we use only the CKDS, and the same CKDS on each LPAR (and I do understand that repro is not an ideal recovery choice, and certainly not 100%). My concern would be the deletion of a data key in error and how to recover that key when the key parts are unknown since we use KGUP to automatically generate the key. For example: -KGUP is used to create data key “X”. Data key “X” exists in ICSF memory the CKDS vsam dataset. -Admin mistakenly deletes “X”. We still have data encrypted with “X” - we need to recover “X”. -Without knowing the key parts, we can easily restore the CKDS in its entirety from a backup when “X” existed, but what if additional key changes were made to the CKDS after “X” was deleted, but before the CKDS was restored? Without knowing the parts, at the current time, our only option would be to use REPRO on the missing record(s). So I think I have my answer – Since we shouldn’t rely on IDCAMS REPRO, and to ensure PCI compliancy, we need to create our data keys with ‘known’ key parts and at least install the ISPF panels Rexx that allow dual key entry (not the ICSF ISPF panels used for master keys). (http://www-01.ibm.com/support/docview.wss?uid=tss1prs189) Thanks to everyone for your input. -- 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: XMLSS performance vs COBOL 4.1 runtime XML
Which would be of little help to my co-worker at the moment, as we are on V1.12 and thus cannot run COBOL 5.1. When we will be upgrading (and to which version) is not published yet, so I can't tell when we will get there, or where there is. The enhancements you listed (except the last one) are all at the language level. Our issue at the moment is performance, and yes we do have at least one specialty engine on each of our CEC's, but I don't know what the usage level is yet. I'll have to talk to our system capacity and performance team to find that out. The fact that 5.1 will ONLY use the equivalent of XMLPARSE(XMLSS) is something I missed however, so thank you for that nugget. Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Greg Shirey Sent: Wednesday, March 19, 2014 9:49 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: XMLSS performance vs COBOL 4.1 runtime XML He might also suggest migrating to COBOL 5.1. From the migration guide: The XML function supported by IBM® Enterprise COBOL for z/OS® has been enhanced: •The XML GENERATE statement has been extended with new syntax that gives the programmer more flexibility and control over the form of the XML document that is generated: ◦The NAME phrase has been added to allow user-supplied element and attribute names. ◦The TYPE phrase has been added to give the user control of attribute and element generation. ◦The SUPPRESS phrase has been added to allow suppression of empty attributes and elements. •XML parsing support has been enhanced with a special register, XML-INFORMATION, to easily determine whether the XML content delivered for an XML event is complete or will be continued on the next event. •The compatibility-mode COBOL XML parser from the COBOL library is no longer supported for use by Enterprise COBOL V5 programs. XML PARSE statements in V5 programs always use the XML parser in z/OS XML System Services. Regards, Greg Shirey Ben E. Keith Company -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Frank Swarbrick Sent: Tuesday, March 18, 2014 7:14 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: XMLSS performance vs COBOL 4.1 runtime XML I seem to recall Tom Ross saying that XMLSS is, in fact, generally slower than COMPAT. I believe the only advantage to XMLSS is that it can be offloaded to a specialty engine. So it will be slower but cost less (??). Or slower and cost more if you don't have a specialty engine! Crazy, no? I'm sure Tom will correct me if I have misstated! From: Farley, Peter x23353 peter.far...@broadridge.com To: IBM-MAIN@LISTSERV.UA.EDU Sent: Tuesday, March 18, 2014 3:40 PM Subject: XMLSS performance vs COBOL 4.1 runtime XML One of my co-workers is trying to improve the performance of an Enterprise 4.1 program that decomposes an input XML file into record fields for processing by later programs. The volume of the XML input has increased quite a bit and the performance may soon impact SLA's. This program is currently compiled with XMLPARSE(COMPAT), so I advised him to try compiling a test version with XMLPARSE(XMLSS) and run some production data through both versions a few times to get some average performance numbers. The XMLSS version seems to be running about 10% more CPU utilization and elapsed time than the production version, on average. Are there any tweaks or adjustments that can or should be made to the XMLSS subsystem to improve performance? Our environment is z/OS V1 R12, z196 hardware. Any RTFM would be most appreciated, since I can't make any such changes myself but have to refer them to my systems programming group for consideration. -- 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: Help with IEBCOPY?
You're using the wrong utility. You want IEBGENER. Good luck Adam -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hansen, Dave L - Eagan, MN Sent: Wednesday, March 19, 2014 9:41 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Help with IEBCOPY? Dear listeners, I am trying to use IEBCOPY to copy a sequential data set to a partitioned dataset. We are running z/OS V1R13. I looked in the DFSMSdfp Utilities (SC26-7414-07). I found Example 8: Loading a Data Set. However this example says the sequential data set was created using an IEBCOPY unload operation. I found Example 9: Unload Selected Members, Load, Copy and Merge. However the sequential datasets are used as output. I tried C I=INDD1,O=OUTDD1 and S M=(DRSSKEY,KEYLRS). I would like the flat file to be copied into two PDS members in the same dataset. If I can get one member created that would be nice. My problem may be IEBCOPY can't do that. My messages are: FCO105I C I=INDD1,O=OUTDD1 FCO105I S M=(DRSSKEY,KEYLRS) FCO110I LOADING TO PDSE OUTDD=OUTD1 VOL=xxx DSN= xxx FCO111I FROM PDSU INDD=INDD1 VOL=xx DSN=xxx FCO710A SYNADAF DATA - 618F,D,INDD1 ,UNKNOWN,WRNG.LEN.RECORD,087800,BSAM FCO702A DSN IN ERROR = xxx FCO701A DDNAME INDD1 PERMANENT I/O ERROR WHEN READING UNLOADED DATASET BLOCK 1 The first message FCO710A says there is more information in FCO700A. The second message FCO701A says it's trying to read from the unloaded dataset. Q). Can I use IEBCOPY to copy a flat file to a PDS? Q). I am running a REXX exec using IEBCOPY. Would you recommend a different approach for my REXX exec? Thank you, Dave -- 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: Help with IEBCOPY?
From the DFSMSdfp Utilities manual. In this example, a partitioned data set (consisting of three members) is created from sequential input. //TAPEDISK JOB ... //STEP1EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=A //SYSUT1 DD DSNAME=INSET,UNIT=tape,LABEL=(,SL), // DISP=(OLD,KEEP),VOLUME=SER=001234 //SYSUT2 DD DSNAME=NEWSET,UNIT=disk,DISP=(,KEEP), // VOLUME=SER=12,SPACE=(TRK,(10,5,5)), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=2000) //SYSINDD * GENERATE MAXNAME=3,MAXGPS=2 MEMBER NAME=MEMBER1 GROUP1 RECORD IDENT=(8,'FIRSTMEM',1) MEMBER NAME=MEMBER2 GROUP2 RECORD IDENT=(8,'SECNDMEM',1) MEMBER NAME=MEMBER3 /* -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Paul Gilmartin Sent: Wednesday, March 19, 2014 9:55 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Help with IEBCOPY? On Wed, 19 Mar 2014 09:45:26 -0700, Gerhard Adam wrote: You're using the wrong utility. You want IEBGENER. Maybe. -Original Message- Behalf Of Hansen, Dave L - Eagan, MN Sent: Wednesday, March 19, 2014 9:41 AM I tried C I=INDD1,O=OUTDD1 and S M=(DRSSKEY,KEYLRS). I would like the flat file to be copied into two PDS members in the same dataset. If I can get one member created that would be nice. What's the format of your flat file? How are the two members delimited. The first message FCO710A says there is more information in FCO700A. The second message FCO701A says it's trying to read from the unloaded dataset. Anything that's not a PDS is presumed to have been unloaded by IEBCOPY. Q). Can I use IEBCOPY to copy a flat file to a PDS? Only if it has been unloaded by IEBCOPY. Q). I am running a REXX exec using IEBCOPY. Would you recommend a different approach for my REXX exec? IEBGENER? I don't know the full capabilities of IEBGENER. Can it stop some known delimiter? At worst, read records with EXECIO and write with EXECIO. Someone will surely suggest DFSORT or ICEUTIL. Not in my skill set. -- gil -- 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: Help with IEBCOPY?
On Wed, 19 Mar 2014 16:40:34 +, Hansen, Dave L - Eagan, MN wrote: I am trying to use IEBCOPY to copy a sequential data set to a partitioned dataset. That's not what IEBCOPY was designed to do. I would use IEBGENER or IDCAMS REPRO. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Help with IEBCOPY?
On Wed, 19 Mar 2014 10:15:53 -0700, Sri h Kolusu wrote: Apart from IEBGENER, you can use IEBUPDTE to create a new member from a sequential Input. You just need to have ./ ADDNAME=member_name at the beginning of each member contents. And you also need to use PARM=NEW on IEBUPDTE. Of course, this depends on having no records in your input data that spoof IEBUPDTE commands (and being able to add your own commands to that input.) What are the RECFM and LRECL capabilities of IEBUPDTE? (And no one has suggested DFSORT or its utilities.) -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Help with IEBCOPY?
Paul, 1 . What are the RECFM and LRECL capabilities of IEBUPDTE? A. I assumed that OP has considered the RECFM and LRECL of his existing PDS when creating the sequential Input. 2 . (And no one has suggested DFSORT or its utilities.) A. I could have suggested using DFSORT, however I do believe in using the right utility for the right job. If I were to use DFSORT to create 2 new members from a sequential input, it would require a PDSE to copy in 1 pass or 2 passes of data for PDS Thanks, Kolusu IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu wrote on 03/19/2014 10:21:50 AM: From: Paul Gilmartin paulgboul...@aim.com To: IBM-MAIN@listserv.ua.edu, Date: 03/19/2014 10:22 AM Subject: Re: Help with IEBCOPY? Sent by: IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu On Wed, 19 Mar 2014 10:15:53 -0700, Sri h Kolusu wrote: Apart from IEBGENER, you can use IEBUPDTE to create a new member from a sequential Input. You just need to have ./ ADDNAME=member_name at the beginning of each member contents. And you also need to use PARM=NEW on IEBUPDTE. Of course, this depends on having no records in your input data that spoof IEBUPDTE commands (and being able to add your own commands to that input.) What are the RECFM and LRECL capabilities of IEBUPDTE? (And no one has suggested DFSORT or its utilities.) -- gil -- 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: Help with IEBCOPY?
Dave, Apart from IEBGENER, you can use IEBUPDTE to create a new member from a sequential Input. You just need to have ./ ADDNAME=member_name at the beginning of each member contents. And you also need to use PARM=NEW on IEBUPDTE. The following example will create 2 new members in an existing pds. //STEP0100 EXEC PGM=IEBUPDTE,PARM=NEW //SYSPRINT DD SYSOUT=* //SYSUT2 DD DISP=SHR,DSN=Your.exiting.pds //SYSINDD * ./ ADDNAME=DRSSKEY contents to be copied as member DRSSKEY .. ./ ADDNAME=KEYLRS contents to be copied as member KEYLRS //* Thanks, Kolusu IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu wrote on 03/19/2014 09:40:34 AM: From: Hansen, Dave L - Eagan, MN dave.l.han...@usps.gov To: IBM-MAIN@listserv.ua.edu, Date: 03/19/2014 09:41 AM Subject: Help with IEBCOPY? Sent by: IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu Dear listeners, I am trying to use IEBCOPY to copy a sequential data set to a partitioned dataset. We are running z/OS V1R13. I looked in the DFSMSdfp Utilities (SC26-7414-07). I found Example 8: Loading a Data Set. However this example says the sequential data set was created using an IEBCOPY unload operation. I found Example 9: Unload Selected Members, Load, Copy and Merge. However the sequential datasets are used as output. I tried C I=INDD1,O=OUTDD1 and S M=(DRSSKEY,KEYLRS). I would like the flat file to be copied into two PDS members in the same dataset. If I can get one member created that would be nice. My problem may be IEBCOPY can't do that. My messages are: FCO105I C I=INDD1,O=OUTDD1 FCO105I S M=(DRSSKEY,KEYLRS) FCO110I LOADING TO PDSE OUTDD=OUTD1 VOL=xxx DSN= xxx FCO111I FROM PDSU INDD=INDD1 VOL=xx DSN=xxx FCO710A SYNADAF DATA - 618F,D,INDD1 ,UNKNOWN,WRNG.LEN.RECORD, 087800,BSAM FCO702A DSN IN ERROR = xxx FCO701A DDNAME INDD1 PERMANENT I/O ERROR WHEN READING UNLOADED DATASET BLOCK 1 The first message FCO710A says there is more information in FCO700A. The second message FCO701A says it's trying to read from the unloaded dataset. Q). Can I use IEBCOPY to copy a flat file to a PDS? Q). I am running a REXX exec using IEBCOPY. Would you recommend a different approach for my REXX exec? Thank you, Dave -- 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: how to know who use system symbols
As you have probably guessed from the previous responses, there are lots of ways the symbols can be used. Trying to find all the places where they are used is going to be complicated. You even many not have read access to some of the datasets where the use appears. One possibility, which I DO NOT recommend, would be to change the value of a symbol you are interested in to one that is invalid in the context it is used. For example, if the symbol is used in a DSN, change its value to !JCLERR!. Then sit back and wait for the howls from upset users. But beware; doing this could cause your system to not IPL. Perhaps if you described why you want to know and precisely what type of info you need, someone could suggest an alternate approach. :: -Original Message- :: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On :: Behalf Of mvsmain :: Sent: Wednesday, March 19, 2014 12:09 AM :: To: IBM-MAIN@LISTSERV.UA.EDU :: Subject: how to know who use system symbols :: :: Hi all :: :: In our shop there are many system symbols defined. Could you tell us :: how to know who use system symbols ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Help with IEBCOPY?
Dear listeners, I am trying to use IEBCOPY to copy a sequential data set to a partitioned dataset. We are running z/OS V1R13. I looked in the DFSMSdfp Utilities (SC26-7414-07). I found Example 8: Loading a Data Set. However this example says the sequential data set was created using an IEBCOPY unload operation. I found Example 9: Unload Selected Members, Load, Copy and Merge. However the sequential datasets are used as output. I tried C I=INDD1,O=OUTDD1 and S M=(DRSSKEY,KEYLRS). I would like the flat file to be copied into two PDS members in the same dataset. If I can get one member created that would be nice. My problem may be IEBCOPY can't do that. My messages are: FCO105I C I=INDD1,O=OUTDD1 FCO105I S M=(DRSSKEY,KEYLRS) FCO110I LOADING TO PDSE OUTDD=OUTD1 VOL=xxx DSN= xxx FCO111I FROM PDSU INDD=INDD1 VOL=xx DSN=xxx FCO710A SYNADAF DATA - 618F,D,INDD1 ,UNKNOWN,WRNG.LEN.RECORD,087800,BSAM FCO702A DSN IN ERROR = xxx FCO701A DDNAME INDD1 PERMANENT I/O ERROR WHEN READING UNLOADED DATASET BLOCK 1 The first message FCO710A says there is more information in FCO700A. The second message FCO701A says it's trying to read from the unloaded dataset. Q). Can I use IEBCOPY to copy a flat file to a PDS? Q). I am running a REXX exec using IEBCOPY. Would you recommend a different approach for my REXX exec? Thank you, Dave -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Help with IEBCOPY?
I couldn't recall the older utilities until you mentioned IEBUPDTE. Then I recalled DITTO, which use to have a card image to member function. However I don't recall if it was limited to DOS or OS. Thank You Kolusu, Rob -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Sri h Kolusu Sent: Wednesday, March 19, 2014 1:28 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Help with IEBCOPY? Paul, 1 . What are the RECFM and LRECL capabilities of IEBUPDTE? A. I assumed that OP has considered the RECFM and LRECL of his existing PDS when creating the sequential Input. 2 . (And no one has suggested DFSORT or its utilities.) A. I could have suggested using DFSORT, however I do believe in using the right utility for the right job. If I were to use DFSORT to create 2 new members from a sequential input, it would require a PDSE to copy in 1 pass or 2 passes of data for PDS Thanks, Kolusu IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu wrote on 03/19/2014 10:21:50 AM: From: Paul Gilmartin paulgboul...@aim.com To: IBM-MAIN@listserv.ua.edu, Date: 03/19/2014 10:22 AM Subject: Re: Help with IEBCOPY? Sent by: IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu On Wed, 19 Mar 2014 10:15:53 -0700, Sri h Kolusu wrote: Apart from IEBGENER, you can use IEBUPDTE to create a new member from a sequential Input. You just need to have ./ ADDNAME=member_name at the beginning of each member contents. And you also need to use PARM=NEW on IEBUPDTE. Of course, this depends on having no records in your input data that spoof IEBUPDTE commands (and being able to add your own commands to that input.) What are the RECFM and LRECL capabilities of IEBUPDTE? (And no one has suggested DFSORT or its utilities.) -- gil -- 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Help with IEBCOPY?
Dave, Are the members card image or something else? The only sequential dataset IEBCOPY works with is one that it created by unloading a PDS. I think you want IEBGENER //SYSUT1 DD DISP=SHR,DSN=seqdataset //SYSUT2 DD DISP=SHR,DSN=aaa(DRSSKEY) Alan Field Technical Engineer Principal BCBS Minnesota Phone: 651.662.3546 Mobile: 651.428.8826 From: Hansen, Dave L - Eagan, MN dave.l.han...@usps.gov To: IBM-MAIN@LISTSERV.UA.EDU, Date: 03/19/2014 11:41 Subject:Help with IEBCOPY? Sent by:IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU Dear listeners, I am trying to use IEBCOPY to copy a sequential data set to a partitioned dataset. We are running z/OS V1R13. I looked in the DFSMSdfp Utilities (SC26-7414-07). I found Example 8: Loading a Data Set. However this example says the sequential data set was created using an IEBCOPY unload operation. I found Example 9: Unload Selected Members, Load, Copy and Merge. However the sequential datasets are used as output. I tried C I=INDD1,O=OUTDD1 and S M=(DRSSKEY,KEYLRS). I would like the flat file to be copied into two PDS members in the same dataset. If I can get one member created that would be nice. My problem may be IEBCOPY can't do that. My messages are: FCO105I C I=INDD1,O=OUTDD1 FCO105I S M=(DRSSKEY,KEYLRS) FCO110I LOADING TO PDSE OUTDD=OUTD1 VOL=xxx DSN= xxx FCO111I FROM PDSU INDD=INDD1 VOL=xx DSN=xxx FCO710A SYNADAF DATA - 618F,D,INDD1 ,UNKNOWN,WRNG.LEN.RECORD,087800,BSAM FCO702A DSN IN ERROR = xxx FCO701A DDNAME INDD1 PERMANENT I/O ERROR WHEN READING UNLOADED DATASET BLOCK 1 The first message FCO710A says there is more information in FCO700A. The second message FCO701A says it's trying to read from the unloaded dataset. Q). Can I use IEBCOPY to copy a flat file to a PDS? Q). I am running a REXX exec using IEBCOPY. Would you recommend a different approach for my REXX exec? Thank you, Dave -- 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: Help with IEBCOPY?
I don't understand exactly what you want. Do you have a data in a sequential data set and you want to put that same data into a member of a PDS? If yes, then IEBCOPY is the wrong utility. It copies members from one PDS to another, or from an unloaded PDS, which was created with IEBCOPY from a PDS, into a PDS. If you want to copy the data, as is, then used IEBGENER. Point SYSUT1 to the sequential DSN. Point SYSUT2 to the PDS with a member name, e.g. DSN=PDS(MEMBER),DISP=OLD On Wed, Mar 19, 2014 at 11:40 AM, Hansen, Dave L - Eagan, MN dave.l.han...@usps.gov wrote: Dear listeners, I am trying to use IEBCOPY to copy a sequential data set to a partitioned dataset. We are running z/OS V1R13. I looked in the DFSMSdfp Utilities (SC26-7414-07). I found Example 8: Loading a Data Set. However this example says the sequential data set was created using an IEBCOPY unload operation. I found Example 9: Unload Selected Members, Load, Copy and Merge. However the sequential datasets are used as output. I tried C I=INDD1,O=OUTDD1 and S M=(DRSSKEY,KEYLRS). I would like the flat file to be copied into two PDS members in the same dataset. If I can get one member created that would be nice. My problem may be IEBCOPY can't do that. My messages are: FCO105I C I=INDD1,O=OUTDD1 FCO105I S M=(DRSSKEY,KEYLRS) FCO110I LOADING TO PDSE OUTDD=OUTD1 VOL=xxx DSN= xxx FCO111I FROM PDSU INDD=INDD1 VOL=xx DSN=xxx FCO710A SYNADAF DATA - 618F,D,INDD1 ,UNKNOWN,WRNG.LEN.RECORD,087800,BSAM FCO702A DSN IN ERROR = xxx FCO701A DDNAME INDD1 PERMANENT I/O ERROR WHEN READING UNLOADED DATASET BLOCK 1 The first message FCO710A says there is more information in FCO700A. The second message FCO701A says it's trying to read from the unloaded dataset. Q). Can I use IEBCOPY to copy a flat file to a PDS? Q). I am running a REXX exec using IEBCOPY. Would you recommend a different approach for my REXX exec? Thank you, Dave -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Help with IEBCOPY?
Sri h Kolusu wrote: 2 . (And no one has suggested DFSORT or its utilities.) A. I could have suggested using DFSORT, however I do believe in using the right utility for the right job. Agreed! I think Paul Gilmartin was perhaps thinking of ICEGENER. ICETOOL is also inelegant like DFSORT, but it can perhaps do the job too! ;-D What about IDCAMS REPRO, DFDSS COPY, REXX EXECIO, DITTO, RYO Assembler/COBOL program, CBTTAPE copy utilities, ISPF COPY functions/services, IEBUPDTE, etc? Many ways to skin a cat, but I also agree IEBGENER is the correct utility for copy from PS to PDS/PDSE. Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
AS400 iSeries connecting to z/OS
Gents, We may need to enable batch jobs running on AS400 to SYNCHRONOUSLY access data residing on the mainframe [say, on DB2 or on a VSAM file]. Is anyone doing this and if yes what would be the recommended methods? TIA! -Victor- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: AS400 iSeries connecting to z/OS
Check out IBM's Websphere MQ series. On Wed, Mar 19, 2014 at 3:21 PM, Victor Gil victor@broadridge.comwrote: Gents, We may need to enable batch jobs running on AS400 to SYNCHRONOUSLY access data residing on the mainframe [say, on DB2 or on a VSAM file]. Is anyone doing this and if yes what would be the recommended methods? TIA! -Victor- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- 'In a time of universal deceit - telling the truth is a revolutionary act. ' George Orwell -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: AS400 iSeries connecting to z/OS
W dniu 2014-03-19 20:21, Victor Gil pisze: Gents, We may need to enable batch jobs running on AS400 to SYNCHRONOUSLY access data residing on the mainframe [say, on DB2 or on a VSAM file]. DB2 - DB2 connect, odbc, itp. VSAM - maybe NFS? -- Radoslaw Skorupka Lodz, Poland -- Treść tej wiadomości może zawierać informacje prawnie chronione Banku przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne działanie o podobnym charakterze jest prawnie zabronione i może być karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorized to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 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, nr rejestru przedsiębiorców KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2014 r. kapitał zakładowy mBanku S.A. (w całości wpłacony) wynosi 168.696.052 złote. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Help with IEBCOPY?
In cc42e2f56d60f24fb8a6bcc639d1d9632c673...@samtcasxmb13.usa.dce.usps.gov, on 03/19/2014 at 04:40 PM, Hansen, Dave L - Eagan, MN dave.l.han...@usps.gov said: I am trying to use IEBCOPY to copy a sequential data set to a partitioned dataset. Why do you believe that IEBCOPY has such a facility? Q). Can I use IEBCOPY to copy a flat file to a PDS? No. Q). I am running a REXX exec using IEBCOPY. Would you recommend a different approach for my REXX exec? Yes - what's wrong with EXECIO? -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Now IEBGENER, Was Help with IEBCOPY?
Gerhard and all, I have been kicking the sample around. I have been working with these control statements using IEBGENER: V1 = GENERATE MAXNAME=2,MAXGPS=1 V2 =MEMBER NAME=DRSSKEY /* V3 = GROUP1 RECORD IDENT=(8,'FIRSTMEM',1) */ V3 = GROUP1 RECORD IDENT V4 =MEMBER NAME=KEYLRS My input file is a sequential file. My output is a PDS. Both are predefined. Generate is required for a PDS. MAXNAME is set to 2 because I want to create two members: DRSSKEY and KEYLRS with two MEMBER statements. MAXGRP is set to 1 because I only have 1 GROUP statement. Not sure what GROUP1 does for me, it looks like it's just a label. Member name DRSSKEY works great. I can iebgener a flat file to a PDS member. However, I 'm lost on the IDENT. It talks about editing. If I just key GROUP1 RECORD IDENT it wants more. If I give it the 'FIRSTMEM' it appears to not match and stops with only DRSSKEY created in the PDS from the flat file. IDENT identifies the last record of a collection of records in the input data set. The first RECORD statement (GROUP1) identifies the last record to be placed in the first member. The name of this record (FIRSTMEM) appears in the first eight positions of the input record. This looks to be evaluating what's in my flat file. The remaining MEMBER and RECORD statements define the second and third members. There is no RECORD statement associated with the third MEMBER statement, the remainder of the input file will be loaded as the third member. Do I need to know what's in my input file? I just want the whole flat file as a member (or two) in a PDS. If this does editing I don't know what to do with that. Q). How can I code the IDENT so it matches and creates my second member in the PDS? Yes, I could run this process twice (or do a copy to get my second member). Thank you, Dave -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Gerhard Adam Sent: Wednesday, March 19, 2014 12:02 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Help with IEBCOPY? From the DFSMSdfp Utilities manual. In this example, a partitioned data set (consisting of three members) is created from sequential input. //TAPEDISK JOB ... //STEP1EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=A //SYSUT1 DD DSNAME=INSET,UNIT=tape,LABEL=(,SL), // DISP=(OLD,KEEP),VOLUME=SER=001234 //SYSUT2 DD DSNAME=NEWSET,UNIT=disk,DISP=(,KEEP), // VOLUME=SER=12,SPACE=(TRK,(10,5,5)), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=2000) //SYSINDD * GENERATE MAXNAME=3,MAXGPS=2 MEMBER NAME=MEMBER1 GROUP1 RECORD IDENT=(8,'FIRSTMEM',1) MEMBER NAME=MEMBER2 GROUP2 RECORD IDENT=(8,'SECNDMEM',1) MEMBER NAME=MEMBER3 /* -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Paul Gilmartin Sent: Wednesday, March 19, 2014 9:55 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Help with IEBCOPY? On Wed, 19 Mar 2014 09:45:26 -0700, Gerhard Adam wrote: You're using the wrong utility. You want IEBGENER. Maybe. -Original Message- Behalf Of Hansen, Dave L - Eagan, MN Sent: Wednesday, March 19, 2014 9:41 AM I tried C I=INDD1,O=OUTDD1 and S M=(DRSSKEY,KEYLRS). I would like the flat file to be copied into two PDS members in the same dataset. If I can get one member created that would be nice. What's the format of your flat file? How are the two members delimited. The first message FCO710A says there is more information in FCO700A. The second message FCO701A says it's trying to read from the unloaded dataset. Anything that's not a PDS is presumed to have been unloaded by IEBCOPY. Q). Can I use IEBCOPY to copy a flat file to a PDS? Only if it has been unloaded by IEBCOPY. Q). I am running a REXX exec using IEBCOPY. Would you recommend a different approach for my REXX exec? IEBGENER? I don't know the full capabilities of IEBGENER. Can it stop some known delimiter? At worst, read records with EXECIO and write with EXECIO. Someone will surely suggest DFSORT or ICEUTIL. Not in my skill set. -- gil -- 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Now IEBGENER, Was Help with IEBCOPY?
How do you know when to end the first member and start the second member? SORT with a count might be better for you. Personally, I leave the LRS key in a sequential file as distributed and am done with it. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hansen, Dave L - Eagan, MN Sent: Wednesday, March 19, 2014 2:05 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Now IEBGENER, Was Help with IEBCOPY? Gerhard and all, I have been kicking the sample around. I have been working with these control statements using IEBGENER: V1 = GENERATE MAXNAME=2,MAXGPS=1 V2 =MEMBER NAME=DRSSKEY /* V3 = GROUP1 RECORD IDENT=(8,'FIRSTMEM',1) */ V3 = GROUP1 RECORD IDENT V4 =MEMBER NAME=KEYLRS My input file is a sequential file. My output is a PDS. Both are predefined. Generate is required for a PDS. MAXNAME is set to 2 because I want to create two members: DRSSKEY and KEYLRS with two MEMBER statements. MAXGRP is set to 1 because I only have 1 GROUP statement. Not sure what GROUP1 does for me, it looks like it's just a label. Member name DRSSKEY works great. I can iebgener a flat file to a PDS member. However, I 'm lost on the IDENT. It talks about editing. If I just key GROUP1 RECORD IDENT it wants more. If I give it the 'FIRSTMEM' it appears to not match and stops with only DRSSKEY created in the PDS from the flat file. IDENT identifies the last record of a collection of records in the input data set. The first RECORD statement (GROUP1) identifies the last record to be placed in the first member. The name of this record (FIRSTMEM) appears in the first eight positions of the input record. This looks to be evaluating what's in my flat file. The remaining MEMBER and RECORD statements define the second and third members. There is no RECORD statement associated with the third MEMBER statement, the remainder of the input file will be loaded as the third member. Do I need to know what's in my input file? I just want the whole flat file as a member (or two) in a PDS. If this does editing I don't know what to do with that. Q). How can I code the IDENT so it matches and creates my second member in the PDS? Yes, I could run this process twice (or do a copy to get my second member). Thank you, Dave -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Gerhard Adam Sent: Wednesday, March 19, 2014 12:02 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Help with IEBCOPY? From the DFSMSdfp Utilities manual. In this example, a partitioned data set (consisting of three members) is created from sequential input. //TAPEDISK JOB ... //STEP1EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=A //SYSUT1 DD DSNAME=INSET,UNIT=tape,LABEL=(,SL), // DISP=(OLD,KEEP),VOLUME=SER=001234 //SYSUT2 DD DSNAME=NEWSET,UNIT=disk,DISP=(,KEEP), // VOLUME=SER=12,SPACE=(TRK,(10,5,5)), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=2000) //SYSINDD * GENERATE MAXNAME=3,MAXGPS=2 MEMBER NAME=MEMBER1 GROUP1 RECORD IDENT=(8,'FIRSTMEM',1) MEMBER NAME=MEMBER2 GROUP2 RECORD IDENT=(8,'SECNDMEM',1) MEMBER NAME=MEMBER3 /* -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Paul Gilmartin Sent: Wednesday, March 19, 2014 9:55 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Help with IEBCOPY? On Wed, 19 Mar 2014 09:45:26 -0700, Gerhard Adam wrote: You're using the wrong utility. You want IEBGENER. Maybe. -Original Message- Behalf Of Hansen, Dave L - Eagan, MN Sent: Wednesday, March 19, 2014 9:41 AM I tried C I=INDD1,O=OUTDD1 and S M=(DRSSKEY,KEYLRS). I would like the flat file to be copied into two PDS members in the same dataset. If I can get one member created that would be nice. What's the format of your flat file? How are the two members delimited. The first message FCO710A says there is more information in FCO700A. The second message FCO701A says it's trying to read from the unloaded dataset. Anything that's not a PDS is presumed to have been unloaded by IEBCOPY. Q). Can I use IEBCOPY to copy a flat file to a PDS? Only if it has been unloaded by IEBCOPY. Q). I am running a REXX exec using IEBCOPY. Would you recommend a different approach for my REXX exec? IEBGENER? I don't know the full capabilities of IEBGENER. Can it stop some known delimiter? At worst, read records with EXECIO and write with EXECIO. Someone will surely suggest DFSORT or ICEUTIL. Not in my skill set. -- gil -- For IBM-MAIN
Re: XMLSS performance vs COBOL 4.1 runtime XML
Maybe you might consider to buy a third party XML parser that has proven to be 3 times faster than for example XerCes and is callable from all languages, including PL/1 and C. The parser can be used as a SAX or DOM parser, validating or non validating. If you are interested, please contact me offline. If the PL/1 interface is not usable out of the box for COBOL callers, I will build a COBOL interface for you. Of course, there is a limitation: it cannot be offloaded to a specialty engine. But maybe if it is faster anyway and takes less CPU, it doesn't really matter. Kind regards Bernd Am 19.03.2014 17:36, schrieb Frank Swarbrick: I don't see any indication there that XMLSS performance has improved with COBOL 5.1. Only that the faster COMPAT is no longer supported! :-( From: Greg Shirey wgshi...@benekeith.com To: IBM-MAIN@LISTSERV.UA.EDU Sent: Wednesday, March 19, 2014 7:48 AM Subject: Re: XMLSS performance vs COBOL 4.1 runtime XML He might also suggest migrating to COBOL 5.1. From the migration guide: The XML function supported by IBM® Enterprise COBOL for z/OS® has been enhanced: •The XML GENERATE statement has been extended with new syntax that gives the programmer more flexibility and control over the form of the XML document that is generated: ◦The NAME phrase has been added to allow user-supplied element and attribute names. ◦The TYPE phrase has been added to give the user control of attribute and element generation. ◦The SUPPRESS phrase has been added to allow suppression of empty attributes and elements. •XML parsing support has been enhanced with a special register, XML-INFORMATION, to easily determine whether the XML content delivered for an XML event is complete or will be continued on the next event. •The compatibility-mode COBOL XML parser from the COBOL library is no longer supported for use by Enterprise COBOL V5 programs. XML PARSE statements in V5 programs always use the XML parser in z/OS XML System Services. Regards, Greg Shirey Ben E. Keith Company -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Frank Swarbrick Sent: Tuesday, March 18, 2014 7:14 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: XMLSS performance vs COBOL 4.1 runtime XML I seem to recall Tom Ross saying that XMLSS is, in fact, generally slower than COMPAT. I believe the only advantage to XMLSS is that it can be offloaded to a specialty engine. So it will be slower but cost less (??). Or slower and cost more if you don't have a specialty engine! Crazy, no? I'm sure Tom will correct me if I have misstated! From: Farley, Peter x23353 peter.far...@broadridge.com To: IBM-MAIN@LISTSERV.UA.EDU Sent: Tuesday, March 18, 2014 3:40 PM Subject: XMLSS performance vs COBOL 4.1 runtime XML One of my co-workers is trying to improve the performance of an Enterprise 4.1 program that decomposes an input XML file into record fields for processing by later programs. The volume of the XML input has increased quite a bit and the performance may soon impact SLA's. This program is currently compiled with XMLPARSE(COMPAT), so I advised him to try compiling a test version with XMLPARSE(XMLSS) and run some production data through both versions a few times to get some average performance numbers. The XMLSS version seems to be running about 10% more CPU utilization and elapsed time than the production version, on average. Are there any tweaks or adjustments that can or should be made to the XMLSS subsystem to improve performance? Our environment is z/OS V1 R12, z196 hardware. Any RTFM would be most appreciated, since I can't make any such changes myself but have to refer them to my systems programming group for consideration. -- 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Now IEBGENER, Was Help with IEBCOPY?
On 2014-03-19 15:04, Hansen, Dave L - Eagan, MN wrote: I have been kicking the sample around. ... Do I need to know what's in my input file? I just want the whole flat file as a member (or two) in a PDS. If this does editing I don't know what to do with that. You probably need to know. One member or two? Which do you need? Q). How can I code the IDENT so it matches and creates my second member in the PDS? Yes, I could run this process twice (or do a copy to get my second member). Suppose you were assigning this task to a willing but naive (knowing nothing a priori of your data formats) apprentice, working with a quill pen and two parchment ledgers. What instructions would you give such a person? -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Help with IEBCOPY?
After reading your OP, I think TSO XMIT would do what you want. You can create a transportable file that you then TSO RECEIVE into the data set on the other end. See if that will work for you. You would need an IEBCOPY UNLOADed dataset to use as INPUT to another IEBCOPY process to load the file back as a PDS. TSO XMIT/RECEIVE is a nicer process. Lizette -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hansen, Dave L - Eagan, MN Sent: Wednesday, March 19, 2014 9:41 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Help with IEBCOPY? Dear listeners, I am trying to use IEBCOPY to copy a sequential data set to a partitioned dataset. We are running z/OS V1R13. I looked in the DFSMSdfp Utilities (SC26-7414-07). I found Example 8: Loading a Data Set. However this example says the sequential data set was created using an IEBCOPY unload operation. I found Example 9: Unload Selected Members, Load, Copy and Merge. However the sequential datasets are used as output. I tried C I=INDD1,O=OUTDD1 and S M=(DRSSKEY,KEYLRS). I would like the flat file to be copied into two PDS members in the same dataset. If I can get one member created that would be nice. My problem may be IEBCOPY can't do that. My messages are: FCO105I C I=INDD1,O=OUTDD1 FCO105I S M=(DRSSKEY,KEYLRS) FCO110I LOADING TO PDSE OUTDD=OUTD1 VOL=xxx DSN= xxx FCO111I FROM PDSU INDD=INDD1 VOL=xx DSN=xxx FCO710A SYNADAF DATA - 618F,D,INDD1 ,UNKNOWN,WRNG.LEN.RECORD,087800,BSAM FCO702A DSN IN ERROR = xxx FCO701A DDNAME INDD1 PERMANENT I/O ERROR WHEN READING UNLOADED DATASET BLOCK 1 The first message FCO710A says there is more information in FCO700A. The second message FCO701A says it's trying to read from the unloaded dataset. Q). Can I use IEBCOPY to copy a flat file to a PDS? Q). I am running a REXX exec using IEBCOPY. Would you recommend a different approach for my REXX exec? Thank you, Dave -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Now IEBGENER, Was Help with IEBCOPY?
Wow, so much batch! How about ISPF EDIT sequential file CUT A CUT B Edit PDS(A) PASTE A EDIT PDS(B) PASTE B Sri gave the solution I would have used, ie IEBUPDTE since the subject of a RECEIVE can be anything you decide, two RECEIVES with OUTDSN(PDS(A)) OUTDSN(PDS(B)) would be another non-batch method. The plain old IEBGENER would be best batch option for a non-source type dataset, since IEBUPDTE is for 80 byte cards On Thu, Mar 20, 2014 at 12:03 PM, Paul Gilmartin paulgboul...@aim.comwrote: On 2014-03-19 15:04, Hansen, Dave L - Eagan, MN wrote: I have been kicking the sample around. ... Do I need to know what's in my input file? I just want the whole flat file as a member (or two) in a PDS. If this does editing I don't know what to do with that. You probably need to know. One member or two? Which do you need? Q). How can I code the IDENT so it matches and creates my second member in the PDS? Yes, I could run this process twice (or do a copy to get my second member). Suppose you were assigning this task to a willing but naive (knowing nothing a priori of your data formats) apprentice, working with a quill pen and two parchment ledgers. What instructions would you give such a person? -- gil -- 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