Re: How to "Carbon Copy" ("Cc:") in Email from MVS?
Could you use multiple RCPTTO control cards ? This link may help http://www.linkedin.com/answers/technology/information-technology/computer-n etworking/TCH_ITS_CNW/563444-55625464 Lizette > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of > Larry Burch > Sent: Wednesday, June 13, 2012 7:17 PM > To: IBM-MAIN@bama.ua.edu > Subject: How to "Carbon Copy" ("Cc:") in Email from MVS? > > Is there any way to specify a carbon-copy option when sending an email from MVS? > Using IEBGENER with SYSOUT=(B,SMTP); have never needed to do a Cc: before today! > And today I can't find -- or figure out -- how to say it. > > Incidentally, this is with OS390/v2r10. Thanks for any info! > > LM Burch > AlbuQQ NM USA > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Problem with SMP/E RECEIVE ORDER
>Hi, > >today I get a problem with SMPE RECEIVE ORDER. With several tries I >always get the following message: > >GIM69212S ** RECEIVE PROCESSING HAS FAILED FOR ORDER ORD2. A PACKAGE >FOR > ORDER ORD2 WITH ORDERID H73315968 CANNOT BE CREATED >BECAUSE THE > PACKAGE SIZE (10282199040 BYTES) WOULD EXCEED THE >THRESHOLD FOR > INTERNET DELIVERY (80 BYTES). > >Two questions regarding this message: > >1. Is there any chance to identify which very large PTFs lead to such a >large package size? Can I RECEIVE then the PTFs one by one by using >CONTENT(PTFS(xxx)) instead of CONTENT(ALL) or CONTENT(RECOMMENDED)? >2. If some PTFs are logically connected via REQ (one requires the other, >both or all are not already received), in this case is it possible to >RECEIVE these PTFs one by one, or will I always get the whole package? > >Thanks in advance for any help. > It would help to know what you were ordering? Was it an RSU? Was it all PTFs for 2012? If you could tell us what you were ordering, we might be able to help. Were you going after MQ, CICS, DB2, etc PTFs? It is possible you have to do multiplie Receives. Possibly doing CONTENT(CRITICAL) or other. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: REXEC error
>Hi, > >We are using rexec to trigger a shell script in unix box, but getting the >below error message. can some let me know what could be issue. > >Using NETRC file //'KEVIN07.NETRC.DATA'. >MACHINE : tpj4012 >LOGIN : krn >PASSWORD: ** >MVS TCP/IP REXEC CS V1R13 >Calling function rexec_af with the following: >Host: tpj4012 user: krn cmd: krn mtv-tart port: 512 >Getaddrinfo successful >rexec invoked; >Data socket = 1 Control socket = 3 > >Thanks, > Ron, Do you have any error logs from the Unix box? Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: PDSE and DFDSS
> > > I would like to move a PDSE dataset using DFDSS - I have never been able to do this. > > I am using the following format: > > COPY DATASET( - > INCLUDE( - > OS130508.SMPE.SMPPTS- > ))- > OUTDYNAM((MVASM2)) - > CANCELERROR - > CATALOG - > DELETE PURGE - > ALLDATA(*) - > ALLEXCP - > PROCESS(SYS1,UNDEF) - > TGTALLOC(SRC) > > When I try to execute the job - the job just sits there and then I start receiving PDSE > messages that there is a PDSE problem. > > > IGW031I PDSE ANALYSIS Start of Report(SMSPDSE1) 658 -data set name-- > -vsgt--- > OS130508.SMPE.SMPPTS 01-MVASM2-000104 > ++ Unable to latch DIB_Global_Latch:7F3A7680 >Latch:7F3A7698 Holder(0088:00AF8748) >Holding Job:SDALMFSM > ++ Lock GLOBAL DIRECTORY EXCLUSIVE >held for at least 47 seconds >Hl1b:7FF769A0 HOLDER(0088:00AF8748) >Holding Job:SDALMFSM > ++ Lock GLOBAL FORMATWRITE EXCLUSIVE >held for at least 47 seconds >Hl1b:7FF769A0 HOLDER(0088:00AF8748) >Holding Job:SDALMFSM > PDSE ANALYSIS End of Report(SMSPDSE1) > > At that point I have to cancel the job. > > I am z/OS v1r11 any help would be appreciated. > > Thanks > Try running the job and when you see this message issue a D GRS,C command. See if anything else pops up. Otherwise you need to issue some of the other LATCH commands during this issue. Another idea is to use ISMF to generate the job. See if it has any other parms not in your control cards. Sometimes having ISMF create the move job can generate good control cards. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: DB2 users list
There is a db2 newsgroup IDUG.ORG As for cobol, this newsgroup should be able to help. Can you post the message around the copybook statement? And Cobol Options? Lizette > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of > william janulin > Sent: Wednesday, June 13, 2012 8:12 AM > To: IBM-MAIN@bama.ua.edu > Subject: DB2 users list > > To list; > > Is there a DB2 and a COBOL users list? I am running into an issue where the DB2 > preprocessor in a CICS/COBOL/DB2 program is not picking up copybooks from a > COPYLIB. > > Thank you and regards, > Bill J. > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Need to make a catalog entry for a SMS managed Virtual tape
You can try copying the GDG to a V01 gen //STEP1 EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSUT1 DD DISP=SHR,DSN=currentGDG.GV00 //SYSUT2 DD DISP=(,CATLG,DELETE),UNIT=tape, //DSN=currentGDG.GV01 //SYSINDD DUMMY You are replacing the GDG number with the next version of the same GDG number. Wild shot but might work. It should be located right where you want it. And it is accessible as a GDG(0) if that is the correct position. Lizette -Original Message- >From: Hervey Martinez >Sent: Jun 11, 2012 1:47 PM >To: IBM-MAIN@bama.ua.edu >Subject: Re: Need to make a catalog entry for a SMS managed Virtual tape > >As long as your GDG base has room to handle the additional generation, then >all you have to do is a define nonvsam with your tape number. You don't have >to roll it in. Have done this several times in our shop. > >-Original Message- >From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of >Darby, Jim >Sent: Monday, June 11, 2012 3:57 PM >To: IBM-MAIN@bama.ua.edu >Subject: Re: Need to make a catalog entry for a SMS managed Virtual tape > >I can read the dataset just fine by asking for it by complete name, what I >need to do is to get in rolled back into the gdg base so it can be accessed as >the 0 gen or -1 and so forth. Right now it isn't part of the gdg group. > >Jim > >-Original Message- >From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of >Mike Schwab >Sent: Monday, June 11, 2012 12:09 PM >To: IBM-MAIN@bama.ua.edu >Subject: Re: Need to make a catalog entry for a SMS managed Virtual tape > >Try to read it (maybe just 1 record) using DISP=(OLD,CATLG). > >On Mon, Jun 11, 2012 at 1:09 PM, Darby, Jim wrote: >> No my TCDB is okay, so both CA-1 and OAM know that the tape is private >> and where it is. My problem is with MVS. Define nonvsam makes it a >> non-sms entry in the MVS catalog and when I try to run the Alter >> command to roll it back into the gdg base, it fails and tells me I can >> rollin an non SMS dataset. >> Gives me the IDC3195I message: >> >> IDC3195I OBJECT IS NOT SMS MANAGED >> >> Explanation: An access method services ALTER command requested that a >> generation data set (GDS) be rolled in, but the GDS is not managed by >> the storage management subsystem (SMS). >> >> Thoughts? >> Jim >> >> -Original Message- >> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On >> Behalf Of McKown, John >> Sent: Monday, June 11, 2012 10:58 AM >> To: IBM-MAIN@bama.ua.edu >> Subject: Re: Need to make a catalog entry for a SMS managed Virtual >> tape >> >> Are the volume serial numbers in the TCDB? I.e. the SMS Tape Control >> Data Base, which is usually name SYS1.VOLCAT.VGENERAL. I would bet >> that they are not. So you must run a ALTER command. We do this a lot >> at DR and have a REXX program: >> >> /* REXX */ >> PARSE ARG INVOL >> "ALTER V"INVOL" VOLENT STORGRP(SGRTAPE2) ", >> "LIBNAME($ATL0002) LOCATION(LIBRARY) UATTR(PRIVATE)" >> >> >> //.. idcams jcl >> %ALTERVOL volser >> /* >> //* ONE PER VOLUME SERIAL. >> >> I bet your DEF NVSAM is OK. One that I have is: >> >> DEF NVSAM(NAME(TSHPG.CICSMGR.P8.DAILY.HISTORY.G2422V00) - >> DEVT(3490) - >> VOL(238263)) >> ALTER V238263 VOLENT STORGRP(SGRTAPE2) - >> LIBNAME($ATL0002) LOCATION(LIBRARY) UATTR(PRIVATE) >> >> You need both. I am not sure, but you might be able to get away with >> doing the DEF NVSAM, followed by a CTSSYNC from CA-1. I'm not sure. >> >> >> >> John McKown >> >> Systems Engineer IV >> >> IT >> >> >> >> Administrative Services Group >> >> >> >> HealthMarkets(r) >> >> >> >> 9151 Boulevard 26 * N. Richland Hills * TX 76010 >> >> (817) 255-3225 phone * >> >> john.mck...@healthmarkets.com * www.HealthMarkets.com >> >> >> >>> -Original Message- >>> From: IBM Mainframe Discussion List >>> [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Darby, Jim >>> Sent: Monday, June 11, 2012 12:41 PM >>> To: IBM-MAIN@bama.ua.edu >>> Subject: Need to make a catalog entry for a SMS managed Virtual tape >>> >>> Hi, >>> Had a group of SMS managed virtual tapes be accidently scratched and >>> I'm trying to recreate the entries. Updated CA-1 okay and the tapes >>> are still on the stacked drives and marked private there, but my >>> question is around the MVS catalog entry. I tried to do IDCAMS >>> "define nonvsam name, decivetype and volume" entries and then use >>> alter rollin to re-attach them to the base but alter won't work >>> because they're not SMS managed. Define Nonvsam would let me include >>> SMS constructs, and I can't "alter" it a SMS storage class either. >>> >>> There has to be a way to make a MVS catalog entry of a tape gdg, and >>> then roll it into the base. >>> >>> What have I forgot? >>> >>> Jim -- For IBM-MAIN subscribe / signoff / archive access instructions, send ema
Re: FTPing datasets to MS Share Point Server
> > Dear List, > > Good Day !! > > I have tried FTPing using the IEBGENER to my Local PC but just wanted to understand > if we can FTP all the Dataset contents to a Share Point Server ? > I am in process of automating a process of FTPing all the MF datasets to a share Point > server on a monthly Basis for our Internal Review. > > Has Anyone Performed a similar set up at your Shop of FTPing the MF data's to Share > Point server ? Any Pointers or suggestions are most welcome. > > > Jake > Jake, Search the internet for z/OS MOSSS SharePoint. It should provide some links to help get you started. One link I found interesting is http://www.slideshare.net/Tess98/accessing-vsam-and-db2-data-from-a-windows- sharepoint-moss Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Exclusive ENQ on dataset owned (SHR) by Started Task?
Dave, At R1.13 z/OS you can use the DEL 'MYDSN(member)' in rexx. Also note, the member can contain a mask so if you wanted to delete all members that being with A you can issue DEL 'MYDSN(A*)' and it should remove all the members that being with A. If you allocate MYDSN with SHR REUSE in your REXX I would think you could delete members. I have not tried this. Or, if you have not done so, you can join the TSO-REXX newsgroup and query there. I am thinking that the ISPF LM services may be your friend in this case. Lizette > >Group, > > We are running z/OS V1R13 and a product called VPS. I wrote some code to > ADD, UPDATE and DELETE members of a PDS. It worked fine until VPS came up. > I see that the VPS started task "OWNS SHR" the dataset. > I need to allocate a dataset exclusively (EXCL/DISP=MOD) to do a delete from > REXX (or batch). > I can go out by hand using 3.4 and delete all I want from the dataset while > VPS is up. > I asked the vendor if they can FREE the dataset after program > initialization. Waiting to hear back. > > >Q). What is the best way to delete a PDS member while the started task has it >allocated DISP=SHR? > > > Thanks in advance, Dave > > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: JCL PROBLEM
At what step do you get this error? PROC001, PROC003, etc... Lizette -Original Message- >From: John Dawes >Sent: Jun 5, 2012 2:01 PM >To: IBM-MAIN@bama.ua.edu >Subject: JCL PROBLEM > >G'Day, > >I am having a problem (jcl error) trying to run this job. The object is to >have all the backups written out to a 3592 tape. >//*** >//PROC001 EXEC FCBPRDXX,TARGET='FQ8A00',SOURCE='PAGE01',LB='1' >//PROC002 EXEC FCBPRDXX,TARGET='FQ8A01',SOURCE='CSYS01',LB='2' >//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE) >//PROC003 EXEC FCBPRDXX,TARGET='FQ8A02',SOURCE='CSYS02',LB='3' >//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE) >//PROC004 EXEC FCBPRDXX,TARGET='FQ8A03',SOURCE='CSYS03',LB='4' >//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE) >//PROC005 EXEC FCBPRDXX,TARGET='FQ8A04',SOURCE='CSYS04',LB='5' >//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE) >//PROC006 EXEC FCBPRDXX,TARGET='FQ8A05',SOURCE='CSYS05',LB='6' >//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE) >//PROC007 EXEC FCBPRDXX,TARGET='FQ8A06',SOURCE='CSYS06',LB='7' >//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE) >//PROC008 EXEC FCBPRDXX,TARGET='FQ8A07',SOURCE='CSYS07',LB='8' >//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE) >//PROC009 EXEC FCBPRDXX,TARGET='FQ8A08',SOURCE='PAGE02',LB='9' >//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE) >//PROC010 EXEC FCBPRDXX,TARGET='FQ8A09',SOURCE='HFSC01',LB='10' >//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE) > >This is the proc: > >//FCBPRDXX PROC >//* >//STEP01 EXEC PGM=ADRDSSU PARM='TYPRUN=NORUN' >//DISK DD VOL=SER=&TARGET,DISP=SHR,UNIT=3390 >//*TAPE DD DSN=BKUP..XX.V&SOURCE.XX, >//TAPE DD DSN=BKUP.DISTR.PRDDLY.V&SOURCE..D050612.TEST, >// DSORG=PS,TRTCH=COMP,UNIT=MAN3590, >// VOL=(,RETAIN),DISP=(NEW,CATLG,DELETE), >// LABEL=(&LB,SL) >//SYSPRINT DD SYSOUT=* >//SYSIN DD DISP=SHR,DSN=SYS3.FLASHCPY.PROCLIB(#FCCOPY) >//* > >The message I get is : >IEF645I INVALID REFERBACK IN THE REF SUBPARAMETER OF THE VOLUME FIELD > >I cannot spot my error. Can someone help me out? > >Thanks in advance. > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: JES/2 Proc SYSIN Concat Error??
Chip, I replicated your process and had the following ERROR message in my JES MSG LOG from z/OS V1.12 IEF694I DDNAME REFERENCE TO DD CONCATENATION REFERS ONLY TO FIRST DD Explanation: THE JCL DDNAME keyword has been used to refer to a DD concatenation. When the object of a DDNAME reference is a concatenation of multiple DDs, only the first DD in the concatenation is actually referenced. System Action: The system issues message IEF677I and continues processing the job. The first DD in the referenced concatenation is associated with the referencing DD. The remaining (unlabeled) DDs in the referenced concatenation are concatenated to the labeled DD immediately preceding the concatenation. User Response: If the DDNAME reference was intended to refer to the entire concatenation, move the concatenated DDs to follow the referencing DD rather than the referenced DD. This will ensure that the concatenation is correctly defined to the system. So you need to have your input last. Lizette > >I'm wondering if anyone else has seen this phenomenon. Doesn't seem right >to me. > >I have a proc that looks like this > >//SHOWIT PROC >//STEP010 EXEC PGM=IEBGENER >//SYSPRINT DD SYSOUT=* >//SYSUT1DD DDNAME=INPUT >//SYSIN DD DUMMY >//SYSUT2DD SYSOUT=* >//SHOWIT PEND > >in the dataset ISCLG.JCL(SHOWIT) > >I execute it with JCL like >//ISCLGTES JOB 3432000, >// 'CHIP GRANTHAM X7382', >// CLASS=S, >// MSGCLASS=X >// JCLLIB ORDER=ISCLG.JCL >//STEP010 EXEC SHOWIT >//INPUT DD * > * -- * > * THIS IS THE PROC YOUR EXECUTING* > * -- * >//DD DISP=SHR,DSN=ISCLG.JCL(SHOWIT) > >I only receive the DD * data in SYSUT2, not the copied ISCLG.JCL(SHOWIT) >proc. > * -- * > * THIS IS THE PROC YOUR EXECUTING* > * -- * > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: How to suppress Message in REXX App
Scott Yes the output is going to a outdsn HLIST DSN('"dsnvar"') MCDS ODS('"tmpdsn"') I have set TSO PROF NOINTERCOM NOPAUSE NOMSGID NOMODE NOWTPMSG NORECOVER I have added the turning off of MSG prior to the HLIST and restore it after HLIST. I think the problem as pointed out is a TPUT. Which means I may not be able to suppress it from the user's session. Lizette -Original Message- >From: Scott Ford >Sent: Jun 1, 2012 1:03 PM >To: IBM-MAIN@bama.ua.edu >Subject: Re: How to suppress Message in REXX App > >Lizette, > >Are you trapping the messages ? > >Scott ford >www.identityforge.com > >On Jun 1, 2012, at 12:43 PM, Lizette Koehler wrote: > >> Cross Posting to IBM Main and TSO-REXX >> >> >> I have a Rexx process that issues the HLIST command. I have been successful >> in trapping the output from the HLIST but have an issue when the message >> >> ARC0138I is issued. >> >> I have tried turning off all of the TSO PROF functions (MSGID, INTERCOM, >> etc) >> I have tried turning off message for that section of the code MSG('OFF') >> >> Any yet it keeps getting produced so the user has to keep hitting enter >> until they are cleared. >> >> This message can be overwhelming if my user requests 100's of datasets that >> do not have an MCDS entry. >> >> Does anyone know if this message can be suppressed from a TSO session? IF >> so, suggestions? >> >> Thanks >> >> Lizette Koehler >> -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
How to suppress Message in REXX App
Cross Posting to IBM Main and TSO-REXX I have a Rexx process that issues the HLIST command. I have been successful in trapping the output from the HLIST but have an issue when the message ARC0138I is issued. I have tried turning off all of the TSO PROF functions (MSGID, INTERCOM, etc) I have tried turning off message for that section of the code MSG('OFF') Any yet it keeps getting produced so the user has to keep hitting enter until they are cleared. This message can be overwhelming if my user requests 100's of datasets that do not have an MCDS entry. Does anyone know if this message can be suppressed from a TSO session? IF so, suggestions? Thanks Lizette Koehler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: SMS Dataset Alloc Issue
> Hello, >Thanks for help. But I still have once confusion is, When I am trying to delete > the Data component of these datset, for which cluster part is not visible , system is not > allowing me to delete. I get error " DATASET not Found". > > I think, I am getting this error because that particular datset is not part of current > master catalog. But if Still I want to delete the data component I created, Can you > please help to perform this task. > > Regards > Saurabh > Some questions 1) Is the catalog where this SYS1.SMS.SCDS is cataloged a USER CAT on the system you are trying to do the display? 2) Is the system where the SYS1.SMS.SCDS is cataloged - up or able to be IPL'D? If you have system up with MCATA and MCATB is a usercat in MCATA then you may be able to delete the dataset with the CATALOG parm in IDCAMS DEL. If you can bring up the system where MCATB is the Master Cat then you can do the changes from the running system IIRC SETSMS command can point SMS to different SCDS or ACDS datasets. So if you have a running system that you can logon, then you can fix from that system. Or could you create a new SYS1.SMS2.SCDS dataset to the correct MCAT and then update the SYS1.PARMLIB member to point to the new SCDS dataset and IPL? You may have several options to correct this issue. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Anyone using MASH (Multiple Address Space HSM)
Mark, >From the IBM Presentations the biggest boost would be that one HSM address space (HSMA) is the main that runs only RECALLS. Then an aux (HSMB) could run PSM or SSM, then another aux could run DUMP/BACKUP. Then each HSM could be in a different WLM class. This could offload the work as well as the priority processing. The three HSM address spaces (HSMA, HSMB and HSMC) all share the xCDS, Journal, and CRQ. They have separate PDA and LOGs Other than memory, system resources, it appears this might be an acceptable setup if you are having issues with recalls, or want to separate out the functions of HSM under different WLM classes. Some documentation is found in Glen Wilcox's HSM presentation from Share. Also in the DFHSM Primer. I am working on a conversion doc that IBM is helping with. There is not a lot of detail in the manuals/presentations. And as always, no tables to show the HSM parms and the various environments. Lizette > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of > Mark Jacobs > Sent: Wednesday, May 23, 2012 4:17 AM > To: IBM-MAIN@bama.ua.edu > Subject: Re: Anyone using MASH (Multiple Address Space HSM) > > Can I ask under what situations would that be appropriate? > > Mark Jacobs > > On 05/22/12 18:21, Lizette Koehler wrote: > > Thanks Allan, but that is not what I was asking about. > > > > In an HSMPlex you can setup what is called MASH (Multiple Address Space HSM). > This is where one LPAR can have upto 39 DFHSM address spaces running all doing > different functions. The MAIN is doing RECALLS but the others can be doing other > functions. > > > > I am curious to know if any other shop has actually setup the MASH and what issues > they might have come across. > > > > Lizette > > > > > > > > -Original Message- > > > >> From: "Staller, Allan" > >> > >> Look in the Setting up a SYSPLEX manual. It will talk about HSMplex's > >> etc. Should be helpful. > >> I am running a single HSMplex at this time. > >> > >> The only gotcha I recall is be careful with any ADDVOL commands for > >> non-SMS managed volumes. > >> > >> HTH, > >> > >> > > -- > > For IBM-MAIN subscribe / signoff / archive access instructions, send > > email to lists...@bama.ua.edu with the message: INFO IBM-MAIN > > > > > > > -- > Mark Jacobs > Time Customer Service > Tampa, FL > > > The Doctor: You know when grown-ups tell you everything's going to be fine, and you > think they're probably lying to make you feel better? > Young Amy: Yes. > The Doctor: Everything's going to be fine. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Anyone using MASH (Multiple Address Space HSM)
Thanks Allan, but that is not what I was asking about. In an HSMPlex you can setup what is called MASH (Multiple Address Space HSM). This is where one LPAR can have upto 39 DFHSM address spaces running all doing different functions. The MAIN is doing RECALLS but the others can be doing other functions. I am curious to know if any other shop has actually setup the MASH and what issues they might have come across. Lizette -Original Message- >From: "Staller, Allan" > >Look in the Setting up a SYSPLEX manual. It will talk about HSMplex's >etc. Should be helpful. >I am running a single HSMplex at this time. > >The only gotcha I recall is be careful with any ADDVOL commands for >non-SMS managed volumes. > >HTH, > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Anyone using MASH (Multiple Address Space HSM)
I am working on a conversion document to change our HSM from a single to multiple address space Has anyone done this? Any concerns or comments? I have been reading the Share Proceedings and Manuals, but there does not appear to be any user experience info on this yet. Thanks Lizette Koehler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Retiring after 43+ years with IBM
Frank, enjoy your retirement. You will be missed. And know that DFSORT is in very good hands. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Z/OS TELNET SERVER SCANINTERVAL TIMEMARK
If you have not done so, you may also wish to join the TCPIP newsgroup For IBMTCP-L subscribe / signoff / archive access instructions, send email to lists...@vm.marist.edu with the message: INFO IBMTCP-L Lizette > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of > Bernard Coeytaux > Sent: Wednesday, May 16, 2012 5:33 AM > To: IBM-MAIN@bama.ua.edu > Subject: Z/OS TELNET SERVER SCANINTERVAL TIMEMARK > > Hello, > Is the timemark packet send to the particulary client tn3270 port or is it just a ping to > the client ipaddr ? > I other words if we have a server with many sessions (like websphere with HATS), is > the timemark sent to every client hats-hod client or is it just the presence of the > server that is checked ? > > Thanks and regards > Bernard Coeytaux > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Compiled SYSTEM Rexx exec
> >Hi List. > >We are zOS 1.12 shop. >I compiled and linked a Rexx exec which is supposed to run under AXR (system >Rexx), >compile and link finished OK. After System Rexx server restated with the load >dataset >concatenated, I got: > >AXR0113I DATA SET S00.RCGAURD.SAXRLOAD ACCESSED THROUGH VOLSER(VPMVSE) >HAS INCORRECT RECORD FORMAT > >How can I compile a Rexx exec that will run under the system Rexx server ? > >Thanks in advanced. > >Ed. > Does the dataset you create S00.RCGAURD.SAXRLOAD match the dataset attributes of SYS1.SAXREXEC? Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Old timer question
Mark, it should be, but I have heard of shops that may not allow this to be in place. So I erred on the side of caution. ;-D Lizette -Original Message- >From: Mark Zelden >Sent: May 4, 2012 1:55 PM >To: IBM-MAIN@bama.ua.edu >Subject: Re: Old timer question > >On Fri, 4 May 2012 13:48:16 -0700, Lizette Koehler >wrote: > >>If it is setup in your shop, set blksize to 0 and let the system determine >>block size figure it out. >> >>Lizette >> > >Is there a way to not have it set up? I do remember an MVS system long ago >in a galaxy far far away where there was a JES2 exit that changed the >internal text from your JCL to have half track blocking for DASD. But >BLKSIZE=0 has worked since... well, for so long I don't even remember. >MVS/XA? Or was it DFSMS V1 with MVS/ESA or MVS/XA 2.2.3? > >Mark >-- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Old timer question
If it is setup in your shop, set blksize to 0 and let the system determine block size figure it out. Lizette -Original Message- >From: John Norgauer >Sent: May 4, 2012 1:44 PM >To: IBM-MAIN@bama.ua.edu >Subject: Old timer question > >We have a dataset that is as follows: > >Management class . . :,**None**, ,,Allocated cylinders :,114 >Storage class . . . :,**None**, ,,Allocated extents . :,4 >,Volume serial . . . :,SGP103, , ,,, , >,Device type . . . . :,3390, ,, , >Data class . . . . . :,**None**, ,, , >,Organization . . . :,PS , ,Current Utilization, >,Record format . . . :,FA, ,,Used cylinders . . :,80 >,Record length . . . :,133, ,,Used extents . . . :,1 >,Block size . . . . :,133 , ,,, , >,1st extent cylinders:,90 ,,, , >,Secondary cylinders :,8,,Dates, >,Data set name type :, , ,,Creation date . . . :,1996/08/01 >,SMS Compressible. . :,NO , ,,Referenced date . . :,2012/05/04 > >Truly an ugly dataset... 133 by 133 and FA recform created in the 1996. > >I wanted to re-block the dataset for obvious reasons. I thought that 13300 >blksize would work but DFP did not like that size. > >it said " Record length is inconsistent with block size for this record >format" > >What would be a good blksize? > > > >John Norgauer >Senior Systems Programmer >Mainframe Technical Support Services >University of California Davis Medical Center >2315 Stockton Blvd >ASB 1300 >Sacramento, Ca 95817 >916-734-0536 > > SYSTEMS PROGRAMMING.. Guilty, until proven innocent !! "JN 2004 > >"Hardware eventually breaks - Software eventually works" anon > > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
How to limit HRECALLs by USER request
I have not seen a good answer on this, so I thought I would throw this out. We have on occasion users submit 1000's of recalls at one time. They use a variety of processes from TSO Batch HRECALL to a REXX process. Of course this can impact other users who are looking to just get one or two datasets back. Other than writing an exit, is there any simple approach to prevent user's from submitting more than X recalls at one time? Or a way to ensure that any recalls submitted are grouped together by migration tape? For example, if I submit 100 recalls that will actually need 40 different migration tapes. Is there any way to get DFHSM to force the recalls to be done by migration volume rather than FIFO? We are z/OS V1.12 and are using CRQ processing in DFHSM. thanks for any insights Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: 1.12 1.13 JES2 toleration PTF APPLY problem
> > Hi > > I have received the UA59435 JES2 toleration PTF , but for the APPLY check I got > GIM37903E ** APPLY PROCESSING FAILED FOR SYSMOD UA59435 BECAUSE IT HAS NO > APPLICABLE ++VER MCS. > Maybe somebody has seen this ? > Typically this means that version of the software (JES2 in this case) is not in the zone. The PTF UA59435 only applies to the following * USERS AFFECTED: All users of HJE7750, HJE7760, and HJE7770 * * who plan to run an HJE7780 version of JES2 * * in the same MAS If one of these FMIDs is not in your target zone then it is you probably do not need to install this fix. If you want this particular fix, then you need to find the correct version of this ptf for your level of JES2. Can you search IBMLINK to see which version would apply to your system? If the fix is for different versions of JES2 then there will be different versions of the same PTF. You just need to find the one that matches your environment. If you do not find a PTF for your version of JES2 then you either cannot install this type of fix/toleration or it is not needed. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Have you ever done this using FTP?
> >FTP a PDS from one Mainframe to another mainframe connected through TCPIP? > >If so how is it done? > > > >John Norgauer I typically either use TRSMAIN, TSO XMIT, or DFDSS to dump the PDS to a seq file, then do the FTP. I think TRSMAIN can actually have the PDS as input and produce the seq file as output. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Panel date validation
You may wish to join the ISPF Newsgroup. ISPF discussion list Lizette > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of > Munif Sadek > Sent: Thursday, April 19, 2012 4:06 AM > To: IBM-MAIN@bama.ua.edu > Subject: ISPF Panel date validation > > Dear Listers > > I have been requested to modify a panel to verify that user input a valid date > (MM/DD/YY) and the input date is no more then 3 months away (roughly speaking). > > Body section of my panel is > + START DATE %===>_STRT + REVOKE DATE %===>_RVK + > > and in the PROC, for Date validation i have coded > VER (&RVK,NB,PICT,99/99/99) > &WKMM = TRUNC(&RVK,2) > &WKDD = TRUNC(&RVK,3) > &WKSTR = .TRAIL > &WKDD = TRUNC(&WKSTR,2) > VER (&WKMM,RANGE,1,12 MSG=DT102E) > VER (&WKDD,RANGE,1,31 MSG=DT101E) > > IF (&STRT NE '') >VER (&STRT,NB,PICT,99/99/99) >&STMM = TRUNC(&STRT,2) >&STDD = TRUNC(&STRT,3) >&WKSTR1 = .TRAIL >&STDD = TRUNC(&WKSTR1,2) >VER (&STMM,RANGE,1,12 MSG=DT102E) >VER (&STDD,RANGE,1,31 MSG=DT101E) > > Now my question is Do I have to call REXX / CLIST proc to validate 3 months date limit > or is it possible to do it within the PROC section. > > Any pointers in the right direction Please. > > regards > Munif. > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Batch utility to show DCB info for files
>Hello! > >Is there a standard IBM batch utility that can show the DCB and Space >atributes for a file? I tried LISTCAT, but it didn't give me this data. > >I would like to generate a report for a whole list of files, so as we shift >these to another location, we can have the metadata, too. > >Coding a Rexx or other program is not an option...the requirement is to use >standard, already existing utilities. > >Thanks! >Billy Try looking at LISTDS that you can run under TSO in batch. It may do what you want. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: HSM to open systems
On 4/11/2012 3:41 PM, Uriel Carrasquilla wrote: > My company is in the process of sun setting our MF. > We have about 40 TBytes of data under HSM control. > I have been tasked with the responsibility to pull the data and put it under a Unix/Linux system as an archived data. > The only time we will need to reference it (without the MF) is in case some of our users need to retrieve one of the files (not to update), just to look at. > We are supposed to keep the data for up to 15 years. > Any suggestions will be greatly appreciated. > Uriel > Uriel, So what time frame are you looking to decommission your mainframe. Any solution you choose to get data from HSM to the server for storage will take time. Yes SAS and ISPF (WS Client) could probably do what you want. Implementing HSM exits to place data in Unix/HFS files is also possible. Your question was reading HSM data in a server environment. So if you could provide more details on what your requirements are, we can come up with other solutions. Information that would be helpful are 1) Time frame to move data to server? 2) Efforts involved? Do you have a large staff, small staff? Do you have time to write exits for HSM and redirect the HSM data? 3) Is the 40 TB all of the data or is the information you need to place on the server a smaller number? 4) Will you have a dedicated server for your mainframe storage? Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: HSM to open systems
My company is in the process of sun setting our MF. We have about 40 TBytes of data under HSM control. I have been tasked with the responsibility to pull the data and put it under a Unix/Linux system as an archived data. The only time we will need to reference it (without the MF) is in case some of our users need to retrieve one of the files (not to update), just to look at. We are supposed to keep the data for up to 15 years. Any suggestions will be greatly appreciated. Uriel Uriel, I think there are two options. 1) Unload all the data from HSM into the original format and then FTP to a Server. Loadlibs maybe an issus. 2) Contract with a 3rd party to be able to store your HSM data there for access only. I am unaware of any server product that could read Mainframe HSM data. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: DB2 DDL
There is a DB2 newsgroup. They can probably answer you better. Goto www.idug.org and join up Lizette -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Lim Ming Liang Sent: Saturday, April 07, 2012 9:33 AM To: IBM-MAIN@bama.ua.edu Subject: DB2 DDL Hi, I am new in DB2. Looking for the reference documentation on DB2 DDL, I am looking for the syntax of Creating Storgrp. I am searching through the IBM DVD Docs on DB2, no luck. -- Regards Lim ML -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: End of Support for Encryption Key Manager (EKM)
> >I know all that, but we were floored by the statement made by IBM on the >call yesterday. I'm trying to get it confirmed. > >Mark Jacobs >>> >> I was on a conference call with an IBM storage specialist yesterday and >> he mentioned that end of support for EKM is April 2012. >> >> I've never seen this statement from IBM, or heard anything about it >> until that conference call. Can anyone confirm? >> >> -- >> Mark Jacobs >> Time Customer Service >> Tampa, FL >> >> >> Mark, I think that IBM is being obtuse on this issue. We hear just bits and pieces and slowly see the process going away. I have no confirmation of EOS. However, from this list I know that any JAVA from 1.6.0.1 and above EKM is gone. If you hold onto the JAVA 1.6.0 or 1.5 then you can continue to run EKM. I have not seen or heard any specific details that EKM is no longer supported. I think they still do it if pushed. I agree that IBM should be upfront and say what their intent is, rather than making the user community fret. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Doing a little research on Performance Modeling
If you have MXG, then look for the SOURCLIB dataset. This is where the MXG manual is located (chapter by chapter) and you should find the wonderful details Dr. Merrill put into the MXG code and how things work. Lizette -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Hylton Tom P Sent: Friday, April 06, 2012 7:36 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Doing a little research on Performance Modeling Much to our chagrin, MICS went away about a decade ago. Still have MXG and SAS, and a few others.We do a lot of reporting and lots of system level capacity/hardware planning, just trying to wrap my head around more broad based performance modeling approach on a large project basis: critical path, simulation, forecasting, what/if etc.. Anyone members of acm.org as well as cmg? They had a few special interest groups that seemed worthwhile: SIGMETRICS: http://www.sigmetrics.org/ SIGSIM: http://www.sigsim.org/ SIGMIS: http://www.sigmis.org/ I casually checked into them a few months ago to see about organization memberships and such akin to how Share and IDUG work, but all I could find was a yearly fee for their digital library and it seemed a bit salty so I didn't look much further. But looking, CMG is individual based with yearly fees as well, so maybe I'll have to look again. If you could choose only one for performance modeling , cmg or acm? If you could choose only one for capacity/hardware planning? Thanks again, tom -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Lizette Koehler Sent: Thursday, April 05, 2012 4:41 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Doing a little research on Performance Modeling Tom Do you have SAS and (MICS or MXG)? if so, that is a good starting point. CMG is also a good place to go look for info if you are a member. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Doing a little research on Performance Modeling
Tom Do you have SAS and (MICS or MXG)? if so, that is a good starting point. CMG is also a good place to go look for info if you are a member. Lizette -Original Message- >From: Hylton Tom P >Sent: Apr 5, 2012 1:20 PM >To: IBM-MAIN@bama.ua.edu >Subject: Doing a little research on Performance Modeling > >Hi, > >I've recently moved over from long time system programmer to performance >modeling on an enterprise scale. > >My trouble is that I've spent most of my career "monitoring" and performance >tuning on a much smaller subsystem (DB2), database, and application level, >so I'm way more familiar with the real time tools and knobs that help me >solve a problem rather than actual long term modeling of new project systems >on a macro level. > >Any statistical modeling I learned was in college long ago, so I'm pretty much >out of touch. > >So, I'm looking to do a little research on the current standard tools of the >trade, any must read texts or white papers, and any solid current trends >or standards in the field. I'm looking at forecasting, simulation, what if >analysis, etc.. > > >I'm familiar with a few tools but I'd be curious to know what other prefer, >and why. > >And just like DB2, or ALC, or any other field, there's usually a definitive >book or paper or two.I've been doing a little browsing on the Redbooks >site, but everything is a bit long in the tooth, especially the ones on the >ZOS performance modeler tool, and the TDSz ones. > >I'm not looking to buy so please go easy on the sales pitch if you're a >vendor. You're welcome to send me info on your product, but I'd much rather >hear from users. > >You may drop me a private note if you'd prefer. > >TIA, >tom > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Sclm
You might want to join the SCLM newsgroup. Lizette -Original Message- >From: Scott Ford >Sent: Apr 4, 2012 10:10 AM >To: IBM-MAIN@bama.ua.edu >Subject: Sclm > >All, > >I am considering the usage of IBM's SCLM to manage software products. >Since we are 'pure' development ,I thought we might be a good candidate for >the >Product. I have downloaded the IBM Redbook and i am reviewing it. > >My question is does anyone have exposure to SCLM and are there any gotchas? > >Sent from my iPad >Scott Ford >Senior Systems Engineer >www.identityforge.com > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: FRBACKUP Still Not Working...
> >Since I now know that the problem is NOT hardware related, I've tried >everything to figure out what the problem is. I've installed the patch that >helps in problem determination (PATCH .FRGCB.+9 BITS(.1..)) and what I >get follows: > >ARC1809I VOLUME CP00AA IS NOT A FAST REPLICATION CANDIDATE FOR L0 VOLUME >PPRD46, VER=0012, RC=0002 > >and the RC=0002 says: > >volser1 is already paired with another source volume > >but when I did the FlashCopy query against the target volume CP00AA it says >that there's no other relationships on the target volume. > >ICKDSF - MVS/ESADEVICE SUPPORT FACILITIES 17.0 > > FLASHCPY QUERY DDNAME(FCVOL) >ICK00700I DEVICE INFORMATION FOR 81DE IS CURRENTLY AS FOLLOWS: > PHYSICAL DEVICE = 3390 > STORAGE CONTROLLER = 2107 > STORAGE CONTROL DESCRIPTOR = E8 > DEVICE DESCRIPTOR = 0A > ADDITIONAL DEVICE INFORMATION = 483C > TRKS/CYL = 15, # PRIMARY CYLS = 3339 >ICK04000I DEVICE IS IN SIMPLEX STATE >ICK03091I EXISTING VOLUME SERIAL READ = CP00AA > >FLASHCOPY VOLUME CAPABILITY INFORMATION TABLE > MAXIMUM MAXIMUM > *EXISTING* ALLOWED RELATIONS > *RELATIONS*RELATIONSEXCEEDED CAPABILITY > *-*---- > *0* 50099 NO SRC CAP >ICKDSF - MVS/ESADEVICE SUPPORT FACILITIES 17.0 > TGT CAP > >I even ran it against the source volume: > >ICKDSF - MVS/ESADEVICE SUPPORT FACILITIES 17.0 > > FLASHCPY QUERY DDNAME(FCVOL) >ICK00700I DEVICE INFORMATION FOR 833B IS CURRENTLY AS FOLLOWS: > PHYSICAL DEVICE = 3390 > STORAGE CONTROLLER = 2107 > STORAGE CONTROL DESCRIPTOR = E8 > DEVICE DESCRIPTOR = 0A > ADDITIONAL DEVICE INFORMATION = 483C > TRKS/CYL = 15, # PRIMARY CYLS = 3339 >ICK04000I DEVICE IS IN SIMPLEX STATE >ICK03091I EXISTING VOLUME SERIAL READ = PPRD46 > >FLASHCOPY VOLUME CAPABILITY INFORMATION TABLE > MAXIMUM MAXIMUM > *EXISTING* ALLOWED RELATIONS > *RELATIONS*RELATIONSEXCEEDED CAPABILITY > ----- > *0* 50099 NO SRC CAP >ICKDSF - MVS/ESADEVICE SUPPORT FACILITIES 17.0 > TGT CAP > >Any help is appreciated! >* >* George, Have you checked out (I always search the internet for messages you post) the REDBOOK z/OS Version 1 Release 13 Implementation It has the following section: 6.21 Fast replication ARC1809I messages Fast replication backup processing issues excessive ARC1809I messages when reporting the reason why a target volume cannot be paired to a source volume. The ARC1809I RC2 message indicates that a source and target cannot be paired because the target volume has already been matched with a different source. For a single FRBACKUP command, the ARC1809I RC2 can be issued many times for each target volume. In previous releases, a patch command can be used to turn off all ARC1809I messages. In z/OS V1R13 a new SETSYS command called FASTREPLICATION will replace the existing patch to enable or disable the redundant ARC1809I messages. This enhancement will decrease the number of ARC1809I RC2 messages such that the message will be issued no more than once per target volume for each storage group in the copy pool. If you currently have PATCH .FRGCB.+9 BITS(.1..) in your ARCCMDxx parmlib member, you should replace the patch with the desired command as follows: SETSYS FASTREPLICATION(VOLUMEPAIRMESSAGES(YES|NO)) YES YES indicates that the ARC1809I RC2 messages should be issued when a target volume cannot be paired with a source volume. NO NO indicates that the ARC1809I RC2 messages should not be issued. You might want to see if the ARC1809I is reasonable or not. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Volumes Not Fast Replicating
> I have 8 volumes that won't fast replicate, but I don't know why. The error message is > ARC1803E and the messages that I get follows: > > ARC1803E (CONT.) FAST REPLICATION BACKUP OF COPY POOL CPY001 ARC1803E > (CONT.) PPRD38, ADR ARC1803E (CONT.) PPRD39, ADR ARC1803E (CONT.) > PPRD40, ADR ARC1803E (CONT.) PPRD41, ADR ARC1803E (CONT.) PPRD42, > ADR ARC1803E (CONT.) PPRD43, ADR ARC1803E (CONT.) PPRD44, ADR > ARC1803E (CONT.) PPRD45, ADR > > Prior to these messages I also get: > > ARC1807I NO ELIGIBLE COPY POOL BACKUP STORAGE GROUP ARC1807I (CONT.) > VOLUME FOUND FOR VOLUME PPRD46, 0451 VOLUMES IN COPY ARC1807I (CONT.) > POOL BACKUP STORAGE GROUP, 0180 NON ELIGIBLE VOLUMES ARC1807I (CONT.) > FOUND, NON CANDIDATE VOLUMES, 0271 VOLUMES ARC1807I (CONT.) ALREADY > SELECTED > > Can anyone point me in the right direction of what is causing this problem and what > can be done to solve it? > > Thanks for the help... Have you looked at the REDBOOK DFSMShsm Fast Replication Technical Guide SG24-7069-01 It has a section with the following information Source to target volume pairing Initial setup of the environment for DFSMShsm Fast Replication may not be trivial depending on your configuration. One example would be completing the Source to Target volume pairing for hundreds or thousands of volumes. Message ARC1806E points to message ARC1807I, which gives useful information when pairing fails. If more information is needed, the patch will provide detailed information in the form of ARC1809I messages for every target that fails to be paired with a particular source volume HTH Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: SMF30 Question
> > Hi, > > is it possible to find out how long a single JES job has run (Start-Time&-Date -> End- > Time&-Date)? I had a look into the SMF30 record but haven't found a field / fields > where this information's seems to be in. Perhaps I haven't seen the field but it would > be perfect if someone can write me 2 sentences probably with some hints and tips > about "Batch quality" analyses. What fields do you use for consumption / accounting? A > CPU-Time field or the SU fields? Duration? I/O ? I know a lot of questions but every > sentence helps. :) > > Thx in advance for your help. > > Regards from Germany, > Uwe > If you are interested in formatting SMF Type 30, if you go to www.cbttape.org there are a couple of files (one REXX one COBOL) that can create a report on SMF Type 30 records. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: calling all Vtam old-timers(or heavy-weights)
> -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of > John Norgauer > Sent: Thursday, March 22, 2012 5:27 PM > To: IBM-MAIN@bama.ua.edu > Subject: calling all Vtam old-timers(or heavy-weights) > > I am trying to get rid old an VTAMLIB dataset. > > We have in the vtam PROC a DD that has a VTAMLIB. > > A different VTAMLIB exists in our LNKLST. > > My question is: does VTAM use the VTAMLIB from the LNKLST? > > My gut feeling is that it does not. > > What does a D GRS,RES=(*,SYS1.VTAMLIB) Show you? I still set SYS1.VTAMLIB used by my VTAM STC JCL. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: SMPe Receive Error
i Lizette/All, > > When I check the JESSYSMSG I see the below allocation is at volume SCRTC1 which is > a sms managed volume but with 99% free Space. > > IGD101I SMS ALLOCATED TO DDNAME (SYSUT4 ) > > DSN (SYS12080.T152458.RA000.FEK2RCVE.R0100148) > > STORCLAS (SCRTCH) MGMTCLAS () DATACLAS () > > *VOL SER NOS= SCRTC1* > > IEF237I 101F ALLOCATED TO SMPPTS > > IEF237I 101F ALLOCATED TO SMP1 > > IKJ56245I DATA SET SMPE.RDZ.HHOP801.F1 NOT ALLOCATED, NOT ENOUGH SPACE ON > VOLUM IKJ56245I USE DELETE COMMAND TO DELETE UNUSED DATA SETS > > IEF285I A255209.IBM.HHOP801.F1 KEPT > > IEF285I VOL SER NOS= RDZVOL. > > IEF285I SMPE.RDZ.SMPPTS KEPT > > IEF285I VOL SER NOS= RDZVOL. > > IEF142I FEK2RCVE RECEIVE - STEP WAS EXECUTED - COND CODE 0008 > > Can I make this allocation to happen over NON-SMS volume to overcome this error ? Jags, The SCRTC1 is not the volume. The allocation is going to IEF285I A255209.IBM.HHOP801.F1 KEPT IEF285I VOL SER NOS= RDZVOL. So what is the VTOC, VTOCIX, like for RDZVOL? How much space will be required to allocation the A255209.IBM.HHOP801.FI file? So you need to answser 1) What is the volume type (MOD3, MOD9, other)? 2) What is the size of the VTOC? 3) What is the size of the VTOCIX? 4) How many datasets are already on this volume RDZVOL? 5) How large is the A255209.IBM.HHOP801.FI (Get this form the Program Directory)? Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: SMPe Receive Error
> > Jags, > > Try going through your JES Messages sections of output of your job and find the > dataset names. See what volumes they were allocating at the time. > > Lizette > Also, see how big this Relfile is. Maybe there truly is not enough space for this file. Meaning: More space was requested than is available on the DASD volume, or the DASD volume's VTOC is full, or the DASD volume's VTOC Index (VTOCIX) is full. (environmental error) Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: SMPe Receive Error
> > Good Day ! > > I am encountering the below error while performing the Receive step. Even though i > have given dedicated Volumes but I am getting a insufficient volume. > > My JCL : > > //FEK2RCVE JOB MSGCLASS=X,MSGLEVEL=(1,1),CLASS=B, > // REGION=0M,NOTIFY=&SYSUID > //RECEIVE EXEC PGM=GIMSMP,REGION=0M > //SMPCSI DD DSN=SMPE.RDZ.CSI,DISP=OLD > //SMPPTFIN DD DSN=A255209.IBM.HHOP801.SMPMCS,DISP=SHR > //*SMPTLIB DD UNIT=3390,SPACE=(TRK,(1,1)),VOL=SER=RDZVOL > //SMPHOLD DD DUMMY > //SMPCNTL DD * > SET BOUNDARY(GLOBAL) . > RECEIVE SELECT(HHOP801) > SYSMODS > RFPREFIX(A255209) > LIST . > /* > > *JESMSGLG :* > IKJ56245I DATA SET SMPE.RDZ.HHOP801.F1 NOT ALLOCATED, NOT ENOUGH SPACE ON > VOLUMES+ > IKJ56245I USE DELETE COMMAND TO DELETE UNUSED DATA SETS > > SMPOUT: > GIM35306E ** SMPTLIB SMPE.RDZ.HHOP801.F1 WAS NOT ALLOCATED BECAUSE ERROR > CODE 4714 WAS ISSUED BY BY DYNAMIC ALLOCATION. > GIM54701E ** ALLOCATION FAILED FOR SMPTLIB - IKJ56245I DATA SET > SMPE.RDZ.HHOP801.F1 NOT ALLOCATED, NOT ENOUGH SPACE ON VOLUMES+. > GIM54701E ** ALLOCATION FAILED FOR SMPTLIB - IKJ56245I USE DELETE COMMAND > TO DELETE UNUSED DATA SETS. > > > jags Jags, Try going through your JES Messages sections of output of your job and find the dataset names. See what volumes they were allocating at the time. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Trying to capture JES2 Job Log
> > I'm attempting to save started task output in our output management database. We > use EOS. I changed the JOBCLASS(STC) MSGCLASS to the class EOS uses and I get > the JESJCL and > > JESYSMSG files and that's all. Any clues what else I might need to alter to capture the > JESMSGLG file? > > > You need to have your MSGCLASS and SYSOUT Class go to the same place. Are they both coded the same? I typically see the following JESMSGLG JES2 This is the JOBLOG JESJCL JES2 This the JCL with substitutions JESYSMSG JES2 This is each step statistics (datasets, ucb, etc...) If you set MSGCLASS=X, all three should go to output class X unless you have exits. Or do you have a JOBCARD added to your STC that uses a different MSGCLASS? Is the STC being started with a MSGCLASS other than what you want? You can issue S STCNAME,MSGCLASS=Y Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Error Message ARC0744E MCDS COULD NOT BE BACKED UP, RC=0036
George, Did anyone suggest the tech doc? ARC0744E RC36 RSN0 During CDS Backup to DASD Technote (FAQ) This problem can occur if there was a problem with the creation of a CDSBU version, or if CDSBU is going to DASD and the earliest backup version couldn't be located because the MHCR record is deleted or out of sync. Answer CDS BACKUP to DASD relies on locating the oldest CDS backup copy and using this copy to write the newly created CDS BACKUP copy into it. The ARC0744E RC36 RSN0 scenario usually involves HSM not being able to locate or use the oldest CDS BACKUP copy data set. Users will need to verify the LAST FINAL QUALIFIER and BACKUP VERSIONS KEPT via HSEND QUERY CDSV. As an example, a user keeps 4 versions and the last final qualifier is 10, there should be CDS backup versions 007, 008, 009, and 010 cataloged. This can be verified in ISPF 3.4 by doing a list for the CDSBACKUP dataset names. If any of the above required versions are not present, users will need to allocate those datasets with the same DCB attributes of an existing version and then run CDS backup again. This condition sometimes occurs when a customer increases the number of CDS backup copies but fails to pre-allocate the additional CDS backup copy datasets. EXAMPLE: Customer is currently saving 4 CDS backup copies and currently has versions 007 through 010. Customer increases CDS backup copies to 5 but fails to allocate the additional CDS backup copy dataset. The next time CDS backup runs, HSM will attempt to find version 006 to write the newly created backup copy into, but will fail to find it and will generate the ARC0744E. The customer needs to preallocate the additional CDS backup copy dataset with the version number of 006. Still using the above example, if the user currently has backup versions 0007 - 0010 but the LAST FINAL QUALIFIER from the QUERY CDSV command is shows 000, then the MHCR needs to be patched to correctly refelect the latest CDSV backup version. To do this, issue the following patch: HSEND FIXCDS S MHCR PATCH(X'B1' nnn) where nnn is the correct last final qualifier of the cataloged CDSBACKUP datasets. Don't include the preceding alpha character ('V', 'D', or 'X'). If the user's condition is not listed above, keep in mind the objective is to get the correct sequential number of cataloged backup versions allocated and listed based on what the current final qualifier is and the number of version of kept. If there is an Xnnn version listed then this is simply an indication that CDS BACKUP failed for that version. HSM will still recognize this version and write over it once the problem is corrected and CDS BACKUP is run again. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Endevor(Change Management Software)
> > Is anyone out there using CA-Endevor? Do you manage your system changes using > Endevor? If so, how are you doing this and was it hard to setup? > > We are looking into this, but there are so many system libraries that could be changed, > it needs a lot of thought to get it right. > > Thanks > > -- We have Endevor but only use it for application changes. We also have PDSMAN and I use that for monitoring changes in system libs (like SYS1.PARMLIB and SYS1.VTAMLST). I keep backups of changed members. Currently I have 40 gens I keep of last changes. PDSMAN can keep 99 versions. If you have PDSMAN and want to know more, write me offlist. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: JES2 displays captured via batch
> > Can a batch job capture the results of a JES2 command into a sequential dataset > > > > $dq > > > > > > $HASP647 6 XEQ S ZOS1 > > $HASP644 8 OUT ZOS1 > > $HASP643904 PPU LOCAL ANY > > $HASP646 15.8046 PERCENT SPOOL UTILIZATION > > > Tim, You will need to use the SDSF REXX interface to invoke the console or use the SDSF Batch function that captures SYSLOG. I am not sure there are other options. The other option is to scan syslog after it is written to dasd. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: VTAMLST - Who needs to read it
Chris, I have reviewed my JCL for TPX and it has an allocation for the SYS1.VTAMLST in it. How or why it is in the STC JCL, I am unclear. But thanks for checking further. Lizette > > Lizette > > After posting I realised that I had an example - other than VTAM - of a program which > needs to read members of VTAMLST partitioned data sets. This is the NetView > STATMON component pre-processor program. Just as VTAM has its ATCCONxx > member which provides the names of members as dreamed up by the responsible > system programmer so the NetView STATMON component pre-processor program has > its CNMCONxx member providing a similar service. > > Knowing that proposing that a program might need access to VTAMLST based on a > vague feeling that it sort-of might was just wrong, I was forced to realise that knowing > the member names was the key. The NetView STATMON component pre-processor > program is the proof! > > Thus, if a program requires that you provide it with a list of member names, you can > safely say that it requires access to VTAMLST partitioned data sets. > > Chris Mason > > On Sat, 10 Mar 2012 12:19:19 -0600, Chris Mason > wrote: > > >Lizette > > > >> I can say that ..., TPX, ... might need READ access. > > > >What evidence do you have that TPX actually needs to "read" members of the > VTAMLST partitioned data set? Are you obliged to provide the major node names, that > is, the actual member names? If not TPX - or any other program - would be "all at > sea" when faced with the requirement to read the members - or I guess such a > program could "read" the directory and make guesses based on the names it found ... > > > >Alternatively, a program like TPX could have "programmed operator access" and > discover the member names that way. However I wonder what information, additional > to what is can be derived from the messages in reply to a DISPLAY command, might > be needed. > > > >> I can say that ... a few other things might need READ access. > > > >Would you be so kind as to divulge the "other things" and apply the same test as I > just outlined for TPX? > > > >> I know as a sysproc, I ... > > > >While I'm here, I can't resist mentioning that I would tend to look for a "sysproc" in a > partitioned data set rather than sitting in a chair in front of a screen editing one! > > > >Chris Mason > > > >On Fri, 9 Mar 2012 13:05:42 -0500, Lizette Koehler > wrote: > > > >>... > >>I can say that VTAM, TPX, and a few other things might need READ access. I know > as a sysproc, I would need UPDATE authority to make changes. > >> > >>Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: VTAMLST - Who needs to read it
>Hi: > >We currently have our VTAMLST libraries protected with UACC(READ). IBM >suggests UACC(NONE) for them (RACF Security Administrator Guide, apendix D- >Security for system datasets) . I want to make the change, but of course i >know i must be extremely carefull with this change. I need to detect all users >needing read access to VTAMLST. Human users are not my problem, my worry is >about non-human ones (users of system tasks, started tasks, etc.). > >What users need read access of VTAMLST? >Does any userid associated with a VTAM application need to read VTAMLST? > >Thanks in advance for your help, > >Juan Mautalen > Juan, I might put an audit on the file. Then you could see who accessed it. I can say that VTAM, TPX, and a few other things might need READ access. I know as a sysproc, I would need UPDATE authority to make changes. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: A stupid idea? Using "twitter" like service for z/SO, et al., event notification.
>I'll admit that my mind is not running quite right today. But something that >is bouncing around is notification of events happening on "servers", >especially z/OS. Would it be helpful, or stupid, to set up a "twitter" type, >secured, server. Then have the appropriate people from work, who have >smartphones or even PCs, be able to "follow" specific topics, which may be >things such as individual server names, or "z/OS product job status", or >"abended jobs". Or are some companies doing something similar using SMS? We >use SMS messages via CA-Unicenter for monitoring CA-Unicenter "tickets" >assigned to our group. But we cannot individually decide if we would like >more. And we don't generate tickets for things like "production job >completed successfully on 2012-03-10 at 13:58" or "Event ... has not completed >successfully yet." On weekends, we are totally "dark" and the on-call >Production Support person must periodically logon to z/OS in order to check >statuses. I thought it migh! t! > be easier if they got "tweets" about things. > >Of course, for all I know, this may be impossible due to software patents. > Of course there could be other software to do this. Things like CA Spectrum, eHealth, OPS/MVS, and Automation point, could possible handle this type of request, if set up. I believe the magic new word is MIB MIB Description: MIB = Management Information Base a) A collection of objects that can be accessed by means of a network management protocol. b) A definition for management information that specifies the information available from a host or gateway and the operations allowed. c) In OSI, the conceptual repository of management information within an open system. Then SMTP or similar could be used to "tweet". Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: issuing console command via CONSOLE+GETMSG without occurring in the syslog
> > hi all, > > is it possible to issue a console command via CONSOLE+GETMSG in a rexx without the > resulting messages occurring in the syslog? > > thanks for your help > stephen > > > --- > Dr. Stephen Fedtke > Enterprise-IT-Security.com > I am not sure about your environment, but in mine we have CA OPS/MVS which can suppress most things from SYSLOG if we set it up. So, yes it is possible from an automation tool. What command was issued and what was the response that is not in SYSLOG? It helps to have a fuller picture. Or do you want your rexx to not display the command and response in syslog? Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: TAPEMAP generator
>Hello, >I need to do a tapemap for about 100 tapes (virtual volumes), I've jcl: > >//V1 EXEC PGM=IEBGENER >//SYSPRINT DD SYSOUT=* >//SYSOUT DD SYSOUT=* >//SYSUT1 DD DISP=OLD, >//DSN=AL2999.SOMETH, >//DCB=(RECFM=FB,LRECL=80,BLKSIZE=800,BUFNO=50), >//UNIT=(VTS),LABEL=(1,BLP,EXPDT=98000), >//VOL=SER=V1 > >and I've volume list in format: > >V1 >V10001 >V10002 >... > >what is the best way to generate 100 jcls ??? rexx ? icetool ? And yes, a simple REXX,CLIST using ISPF Skels will be very easy to generate the needed JCL. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Structure of PL/I V2.3-generated load modules?
Try this bookshelf http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/Shelves/IBMOSH05 Lizette > On Mon, 5 Mar 2012 09:17:12 -0600, Craig Schneiderwent wrote: > > PL/I documentation is available at > > http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/Shelves/IBMSH320 > > [2]. > > Indeed it is - for almost all releases *after* V2R3 :-( > > Did the V2R3 documentation make it into softcopy? If so, does anyone have a > copy > they could send? Client is a properly licensed user etc. > etc. > > > You might want to contact the Edge folks at > > http://www.edge-information.com/ [3]. they have a product that > > analyzes executable code. I believe File-Aid also does some of this, > > and Roland Schiradin's COBANAL (in File 321 on the CBTTAPE site at > > http://www.cbttape.org/ [4]) does too. The latter originally just > > did COBOL but now does much more. > > I started out using COBANAL but found it too, er, quirky. I've got a > self-written > analyzer here that reflects my view of how to do the job; I've not had much > PL/I to > play with before so I'm dotting the i's and crossing the t's, if you like. > Most of it works > quite well, even if I do say so myself. > > Thanks for the reply! > > Pete. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Migrating to Z196
> > > > > Hello, > > > > We are planning to migrate from Z10 to Z196. So are there any manuals > which speaks > > more on PSP bucket changes that is required during this migrations ? > > > > > > Jake > > > > Jake, very simply, go and down load your HOLDDATA and Receive all current RSU > maint. Then run the FIXCAT for your device level, run the IBM Health Checker. > > Do your research. Go to the IBM website and look a the PSP buckets for your > version/level of z/OS and other environmental variables (eg. Other > hardware/software). Check with your ISVs and go for it > > Lizette > One thing I forgot to mention. You Service rep installing the z196 should be able to help you with this process as well. And if you are not sure what to do, then perhaps your organization can provide you the training you need to do these types of tasks. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Migrating to Z196
> > Hello, > > We are planning to migrate from Z10 to Z196. So are there any manuals which speaks > more on PSP bucket changes that is required during this migrations ? > > > Jake > Jake, very simply, go and down load your HOLDDATA and Receive all current RSU maint. Then run the FIXCAT for your device level, run the IBM Health Checker. Do your research. Go to the IBM website and look a the PSP buckets for your version/level of z/OS and other environmental variables (eg. Other hardware/software). Check with your ISVs and go for it Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: IKT100I USERID CANCELED immediately after TN3270 connection fail
Since the posting included the use of PCOMM (if I recall) then perhaps there are some settings in PCOMM that might reduce the Likelihood of cancelling the tso id. Connection Timeout This value specifies the number of seconds that Personal Communications should wait for a connection to the host. The default value is 6 seconds. The allowed range of values is 1 through 600 seconds. Or perhaps Auto-reconnect If the session is disconnected from the host, and if this box is checked, you will be reconnected automatically. The default is "not checked". Note: When the SLP option is enabled, using auto-reconnect causes a search for available SLP servers. If such a server is found, auto-reconnect will attempt to connect to that server. If the connection attempt is not successful, auto-reconnect will attempt to connect to another SLP server, if additional servers are found. I am not sure if these will help the IKT100I issues and cancelling of the TSO session or not. Lizette > >Networks have failures. On some networks they occur more frequently than >others. It's just a fact of life. Some network support organizations are >more helpful than others in resolving the cause of these failures. That too >is a fact of life. > >You were the one who mentioned that a major impact of these failures was the >data lost by users. We can't solve the failure problem for you but many have >suggested ways to minimize the impact the failures have. You are free to >follow any of the suggestions you choose but you seem to be expecting somethng >else from this group. > >By the way, none of the five items you mention below seem to my untrained eye >to be related to connection failures. > > >This thread has nothing to do with ISPF. I just want to know why my TSU >address space was canceled duo to connection failure. > >But thank you all the same. I had checked following point that may be >related to this problem. >1, JWT in SMFPRMxx >2, RECONLIM in TSOKEYxx >3, INACTIVE, KEEPINACTIVE and DISCONNECTABLE in TN3270 profile >4, LU definition of TSO USERS >5, MODETAB and DLOGMOD > >About this subject, look forward that I can get more help and can get it >over at end. > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: JES2 STCCLASS and TSUCLASS - documented
> > Folks > > Anyone know in which manual can I find the STCCLASS and TSUCLASS initialisation > parameters documented please? > Not in 1.12 JES2 Init & Tuning. I suspect that they are synonymous with > JOBCLASS(STC) and JOBCLASS(TSU). I have inherited support for a JES2 system that > has STCCLASS and TSUCLASS specified in the init deck, so just looking for definitive > description. > > STCCLASSAUTH=ALL, > BLP=YES, > COMMAND=EXECUTE, > MSGCLASS=W, > MSGLEVEL=(1,1), > REGION=512K, > TIME=(60,0) > > TSUCLASSAUTH=ALL, > BLP=YES, > COMMAND=EXECUTE, > MSGCLASS=W, > MSGLEVEL=(1,1), > REGION=512K, > TIME=(60,0) > > Also commands $DSTCCLASS and $DTSUCLASS don't appear to be documented. > First answer - Yes the JOBCLASS(TSU) and JOBCLASS(STC) is what you want to look at. Second Answer: $D JOBCLASS(n) - Display job class characteristics $T JOBCLASS - Set job class characteristics To modify the characteristics associated with one job, all started task (STC) jobs, or time-sharing user (TSU) classes. JOBCLASS(STC) or JOBCLASS(TSU) initialization statements. TSU and STC are subparms of $D/$TJOBCLASS Liette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: IKT100I USERID CANCELED immediately after TN3270 connection fail
> > YES, this is one option. But some user have the habit that do a lot of edition in view > mode, then create a new member on behalf of it. So if the user can reconnect to the > remain session after connection failure, this should be the best choice. > > thanks. > Do you have a session manager like TPX or SuperSession? Or is this more like LOGON APPLID() Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: IBM Main Forum
Graham, I would create a new entry, then contact the admins about the old one. Lizette > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of > Graham Hobbs > Sent: Wednesday, February 29, 2012 8:10 PM > To: IBM-MAIN@bama.ua.edu > Subject: IBM Main Forum > > http://ibmmainframeforum.com/index.php is where I found an interesting site. Seems > I was a member years ago. When I registered I got an automated response .. > > Your account is currently inactive and will need to be approved by an administrator > before you can log in. Another email will be sent when this has occurred. > > .. might anybody know anything about who/where/when, have been waiting three days -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: ISMF/REXX interface.
> > Hi All/Lizette, > > My Logic of automating the ISMF thing is like below : > > Step 1 : Choosing the ISMF panel option then , > > Selecting Option 1 : 1 Data Set - Perform Functions > Against Data Sets > > Step 2 : > > Then , > > DATA SET SELECTION ENTRY PANEL Page 1 > of 5 > > > For a Data Set List, Select Source of Generated List . . 2 (1 or 2) > > > >1 Generate from a Saved List Query Name To > > List Name . . Save or Retrieve > > > >2 Generate a new list from criteria below > > Data Set Name . . . 'KGC08630.**' = == > T*his is > where I put userid HLQ.** to retrieve their DASD space utilizatio*n. > > Enter "/" to select option Generate Exclusive list > > Specify Source of the new list . . 2(1 - VTOC, 2 - Catalog) > > 1 Generate list from VTOC > >Volume Serial Number . . . * (fully or partially > specified) >Storage Group Name . . . .(fully specified) > > 2 Generate list from Catalog > >Catalog Name . . . > >Volume Serial Number . . .(fully or partially > specified) >Acquire Data from Volume . . . . . . . Y (Y or N) > >Acquire Data if DFSMShsm Migrated . . Y (Y or N) > > Step 3 : Then : > > I get a List of dataset like below : > >Panel List Dataset Utilities Scroll Help > > > -- > DGTLGP11 DATA SET LIST > > Entries 1-5 of 5 > > Enter Line Operators below: Data Columns 3-5 > of 42 > > > LINEALLOC ALLOC % NOT > > OPERATOR DATA SET NAME SPACE USED USED > > ---(1) (2) ---(3)--- ---(4)--- -(5)- > > KGC08630- ---- > > KGC08630.CIC.LOAD 55K55K 0 > > KGC08630.CICS.LOAD 1660K 664K 60 > > KGC08630.TESTING.COBOL55K55K 0 > > KGC08630.TESTING.SEQ 221K 0K100 > > -- -- --- BOTTOM OF DATA --- -- > > > > > > > > > > > > > > Step 4 : Then I print the above by choosing the option "LIST" Option 9 to > Print. > > Step 5 : Then After the above step 4 I get the screen like below : > >Panel Utilities Scroll Help > > > ss > DGTDPR11 DATA SET PRINT ENTRY PANEL Page 1 > of 2 > > > Select Format Type . . . . . 1 (1 - Standard, 2 - Roster) > > Report Data Set Name . . . . KGC08630 - USERID > HLQ > Replace Report Contents . . . y (Y or N) Lines/Page . . . 55 (12 to 99) > -- > Specify Tags to be Printed: > > ===> 4 > > > > Line Operator(40) CF LOCK Structure Name > > Data Set Name(36) CF Status Indicator > >(3) Allocated Space (24) Change Indicator > >(9) Allocation Unit (6) Compressed Format > > (14) Block/CI Size(20) Creation Date > > (16) Block Unused (25) Data Class Name > > (35) CCSID Description(30) Data Set Name Type > > (39) CF CACHE Set Name(34) DDM Attributes > > (38) CF CACHE Structure Name (19) Device Type > > (37) CF Monitor Status(29) DS Environment > > (41) CF LOCK Set Name (11) DS Organisation > > Command ===> > > > After the above a PS file is created with our ID prefixed like : > MYID.KGC08630. > > > So If I can automate the above thing using REXX then I print almost any > number of > HLQ DASD utilization thing in a PS file. > > Jags > > Jags, So you are looking to create a listing of datasets with used space functions? If you can use CBTTAPE.ORG, you will find some entries that do just that. As going into ISMF and doing a LISTPRT the Tag number 4 is for Used Space However, if you have other requirements, please LIST those. The way you could have asked for this request is: I need a space used mapping of VSAM datasets, or Space used of all datasets on a given pack. The longer explanation was not needed. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: ISMF/REXX interface.
Subject: ISMF/REXX interface. > > Hi All, > > Is there a ISMF/REXX interface ? Since I am trying to automate few repeating task > which are done via ISMF. I tried googling with the keyword " > ISMF/REXX" but no Luck > > Any suggestions or References would help me in implementing my automation. > Jags, Please describe what you want to automate. It will help in determine the technique to use. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: User datasets wrongly catalogued under Master Catalogue
> > Hi, > > Recently We have installed a new system Z/OS 1.13. During migration the Users > datasets were restored and unfortunately all the user datasets are catalogued under > Master catalogue. I agree that this happens when a userid is defined with alias relating > to user catalog. I am just trying to understand if it is possible to move all the users > dataset catalogued under master catalogue to a user catalogue since the Number of > datasets are in big number. > > Jake > If the datasets are not migrated, then you can use DFDSS to dump/delete, create the alias, restore the files with CATALOG. If they are migrated, then recall them, DFDSS dump/delete, create the alias, restore with CATALOG option. If they are migrated and you cannot recall them, then keep the list of migrated files, and recover them with DFHSM after you correct the alias. I do not think you can do a repromergcat if the alias does not already exist. This should work. I have used this technique in the past. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: DFSORT question - How to combine several records to one record
> > Yaeger-san, > > thank very much for telling me the way what I sould code DFSORT control cards. > > But unfortunately KEYBEGIN parameter became 'OPERAND DEFINER ERROR' on my > z/OS V1.12 (ADCD system) . > Then I have checked DFSORT Application Programming Guide for z/OS V1.12, I could > not find out KEYBEGIN parameter. > > Is KEYBEGIN a new keyword provided by new PTF? > > Is there another way to do same things without KEYBEGIN parameter? > Because we don't have a chance to apply the PTF, if the KEYEGIN is provided by PTF. > > I appreciate your support. > > Minoru Massaki (M*M) > > Minoru-San A search with DFSORT and KEYBEING shows PTF UK90025 for z/OS DFSORT V1R10 and PTF UK90026 for z/OS DFSORT V1R12 (Oct, 2010) provide important enhancements to DFSORT and DFSORT's ICETOOL for resizing records (RESIZE operator); updating the trailer record (IFTRAIL); processing subsets (ACCEPT); translation of ASCII to EBCDIC (TRAN=ATOE), EBCDIC to ASCII (TRAN=ETOA), EBCDIC hex to binary (TRAN=UNHEX), and more; date field arithmetic (ADDDAYS, ADDMONS, ADDYEARS, SUBDAYS, SUBMONS, SUBYEARS, DATEDIFF, NEXTDday, PREVDday, LASTDAYW, LASTDAYM, LASTDAYQ and LASTDAYY); timestamp constant with microseconds (DATE5); group functions (KEYBEGIN); use of SET and PROC symbols in control statements (JPn"string" in EXEC PARM); more information in reports; larger fields; easier migration from other sort products, and more. Hope this helps Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Format not found
Well the .txt files seemed to make it. Lizette -Original Message- >From: Ed Finnell >Sent: Feb 27, 2012 3:30 PM >To: IBM-MAIN@bama.ua.edu >Subject: Re: Format not found > >Maybe .txt. I'll try it with this post. > > >In a message dated 2/27/2012 6:01:45 A.M. Central Standard Time, >stars...@mindspring.com writes: > >I do not think attachments are allowed. > > > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Duplicating SYSOUT output to another DD/DSN in realtime ? (JCL)
That's right. I'm about to process DB2 REBIND en masse and need to see in realtime that it executes ok (if in error it needs to be stopped) and at the same time save it for processing in a later step. As the execution can take >30 minutes I don't want to wait until end. (Using the DSN command under IKJEFT01.) Then why not put a REXX around it and then inspect the SQL as it is produced? You can use a REXX to invoke the DSNREXX or use DSN natively. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Duplicating SYSOUT output to another DD/DSN in realtime ? (JCL)
> > Is there any possibility to duplicate the output to SYSOUT to another Ddname/DSname > in realtime ? > I want to follow the execution by inspecting the output but at the same time save it for > processing in a following step. > Preferably by JCL means. > I do a similar process, I write the SYSOUT to a dataset, then pass it to IEBGENER step to put it back to the JOB. Then I can use the SYSOUT DSN that was created for inspection later. I do not know of a process in JES that would create both a DSN and SYSOUT at the same time. If you have control over the program, then you could create 2 DCBs - one for SYSOUT and one for a DSN. Unfortunately I do not think that is what you want to do. And I know of no mechanism in JES that will do this. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Format not found
> > Hi > > When i am trying to open my pds member. i put E against pds member.I am able to > view edit the member.i got the msg like format not found.herewith i am attaching the > snap of the error..Please help me to sortout the problem > I do not think attachments are allowed. Please include the entire messages text you see in upper right hand corner. Then use PF1 key and include that information as well. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Confused on concatenated parmlib and IEASYSxx
> Subject: Confused on concatenated parmlib and IEASYSxx > > If IEASYSNV in VENDOR.PARMLIB specifies PROG=VN and IEASYSLX in LVL0.PARMLIB > specifies PROG=LV and when I IPL I state: > > SYSP=(LX,NV) > > What PROG members will be executed? > First, I would suggest if you have not done so, get Mark Zelden's IPLINFO Rexx. It will display after an IPL what parms are in place from IEASYSxx. This may help with this type of question. Next, the IEASYSxx member used at IPL Time is what controls PROGxx. So what does your LOAD parm show for IEASYSxx? IPLPARM = 7328Z9 1 (merged) IPL load parameter data set name: SYS1.IPLPARM IPL load parameter data set device address: 7328 HWNAME=SRM1 LPARNAME=LPARXX1 VMUSERID= LOADxx parameters from the IPA (LOADZ9): *---+1+2+3+4+5+6+7 ARCHLVL 2 IEASYM (PS,L) IODF 03 SYSH LPARXX1 00 NUCLEUS 1 PARMLIB SYS1.MYCOMP.PARMLIB DCMCAT PARMLIB SYS1.IBM.PARMLIB Z1BRS3 PARMLIB SYS1.PARMLIB SYSCAT DCMCAT123CCATALOG.MYCOMP.MASTER SYSPLEX MYCOMP So from my environment using Mark's IPLINFO. You can see I have nothing specified in col 10-11 on SYSPARM statement, therefore that defaults to 00. During system initialization, NIP first processes the IEASYS00 parmlib member to establish parameters. Then it determines, from the suffixes specified on the SYSPARM statement in LOADxx, the SYSPARM parameter in IEASYMxx, or by the operator, which IEASYSxx members are to be used. See "Step 2. Determine where to specify system parameters" in topic 2.3.2 for a description of how the system determines which IEASYSxx members are to be used. >From there I go to SYS1.MYCOMP.PARMLIB and pick up IEASYS00. Since I have multiple PARMLIBs specified, it will seach them to find the first occurrence of IEASYS00. I then go to the PROG section in Mark's IPLINFO and see that I have coded: PROG=(AP,01,H8,02),IEASYS00 This matches my coding in IEASYS00 PROG=(AP,01,&SYSCLONE,02),APF AND LNKLST ACTIVATION Does this help? Depending on how your LOAD data is coded, is how the system will load your values. 1) Identify your LOADxx member in your IPL Parms (SYSx.IPLPARM typically) 2) Identify you IEASYSxx in the LOADxx member ( there may be a SYSPARM xx specified in your load deck) 3) Go to that IEASYSxx member in your PARMLIB dataset. 4) See how the PROGxx entry is coded Get IPLINFO and analysis is a little easier. Mark's Rexx is either on his Website or on the CBTTAPE.ORG website. Check out the MVS Init and Tuning Reference - the section on LOADxx Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Mentor for an Assembler User Exit in CA-1
Thanks to all who offered and the ones I accepted the desktop check from. It appears I did not do too badly. My coded was almost dead on. Of course after all that work, my boss said we may not need it any more. Oh well. You all have been supportive as always. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: VVDS with no catalog pointers
> > A VSAM dataset was never created on that volume. > > On Fri, Feb 24, 2012 at 3:33 AM, Buckton, T. (Theo) wrote: > > Hi There, > > > > Please explain why not all VVDSs catalog pointers. When doing a listcat, the return is > as follows: > > > > IDC3012I ENTRY SYS1.VVDS.VAPBPC7 NOT FOUND+ IDC1566I ** > > SYS1.VVDS.VAPBPC7 NOT LISTED IDC0014I LASTCC=4 IDC3009I ** VSAM > > CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42 > > *** > > Apparently this is normal. > > > > I want to see the logic here. > > Mike, If you allow the system to allocate/create the VVDS dataset, that is correct, The OP did not say how they create volumes so I am not sure if they let the system allocate the file or if they allocate the file after INIT a pack. I prefer to do the DEFINE VVDS after I init a volume. That way I control the size of the file. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: HSM Recall Failure
> > Hi There, > > I'm trying to recall a data set migrated to ML2. The recall fails due to errors found in > either the VVDS or VTOC. Is there somebody that would be able to point me in the > right direction of investigation > > PAGE 0001 5695-DF175 DFSMSDSS V1R12.0 DATA SET SERVICES 2012.055 > 11:55 > ADR035I (SCH)-PRIME(06), INSTALLATION EXIT ALTERED BYPASS FAC CLASS CHK > DEFAULT > TO YES > RESTORE INDDNAME(SYS79943) CAT SPHERE - > BYPASSACS(PNGG00.IT3PCK.CSDITB.D0.KS250 ) - > MGMTCLAS(@959 ) - > STORCLAS(B2B26 ) - > DATASET(INCLUDE(PNGG00.IT3PCK.CSDITB.D0.KS250 )) > ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'RESTORE ' > ADR109I (R/I)-RI01 (01), 2012.055 11:55:12 INITIAL SCAN OF USER CONTROL > STATEME > NTS COMPLETED > ADR050I (001)-PRIME(01), DFSMSDSS INVOKED VIA APPLICATION INTERFACE > ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK > ADR006I (001)-STEND(01), 2012.055 11:55:12 EXECUTION BEGINS > ADR780I (001)-TDDS (01), THE INPUT DUMP DATA SET BEING PROCESSED IS IN > LOGICAL DATA SET FORMAT AND WAS CREATED BY DFSMSDSS VERSION > 1 RELEASE 12 MODIFICATION LEVEL 0 ON 2011.270 06:45:10 > ADR711I (001)-NEWDS(01), DATA SET PNGG00.IT3PCK.CSDITB.D0.KS250 HAS > BEEN ALLOCATED USING STORCLAS B2B26, DATACLAS @KS250, AND > MGMTCLAS @959 > ADR788I (001)-TDUNL(01), PROCESSING COMPLETED FOR CLUSTER > PNGG00.IT3PCK.CSDITB. > D0.KS250, 16552872 RECORD(S) PROCESSED > ADR477E (001)-TDRF1(01), VVDS/VVR/CELL ERRORS ENCOUNTERED FOR CLUSTER > PNGG00.IT > 3PCK.CSDITB.D0.KS250 > ADR417W (001)-TDRF1(05), COPY/RESTORE OF DATA SET > PNGG00.IT3PCK.CSDITB.D0.KS250 > IS INCOMPLETE, 05 > ADR415W (001)-TDLOG(01), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED > FROM ANY > VOLUME > ADR480W (001)-TDLOG(01), THE FOLLOWING DATA SETS WERE NOT PROCESSED > FROM THE LO > GICALLY FORMATTED DUMP TAPE DUE TO ERRORS: > PNGG00.IT3PCK.CSDITB.D0.KS250 > ADR006I (001)-STEND(02), 2012.055 12:11:00 EXECUTION ENDS > ADR013I (001)-CLTSK(01), 2012.055 12:11:00 TASK COMPLETED WITH RETURN CODE > 0008 ADR012I (SCH)-DSSU (01), 2012.055 12:11:00 DFSMSDSS PROCESSING > COMPLETE. HIGHES > T RETURN CODE IS 0008 FROM: > TASK001 > ARC1001I PNGG00.IT3PCK.CSDITB.D0.KS250 RECALL FAILED, RC=0069, REAS=0477 > ARC1169I RECALL/RECOVER FAILED DUE TO AN ERROR IN DFDSS > *** > > > Hi There, > > Please explain why not all VVDSs catalog pointers. When doing a listcat, the return is as > follows: > > IDC3012I ENTRY SYS1.VVDS.VAPBPC7 NOT FOUND+ > IDC1566I ** SYS1.VVDS.VAPBPC7 NOT LISTED > IDC0014I LASTCC=4 > IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42 > *** > Apparently this is normal. > > I want to see the logic here. > > BTW, these are sms-managed volumes. > First look at the ADR477E message. There are actually 3 reasons why it could happen. An error was encountered processing a VVR. If there was an I/O error, message ADR231E precede this message. An error was encountered on a catalog request. Message ADR497E precede this message. There be insufficient storage for internal processing. Messages ADR008E, ADR018I, or ADR376E precede this message. Looking at your DFDSS output I did not see any of the targeted messages. However, this seems to be a huge file ADR788I (001)-TDUNL(01), PROCESSING COMPLETED FOR CLUSTER PNGG00.IT3PCK.CSDITB.D0.KS250, 16552872 RECORD(S) PROCESSED So you need to 1) make sure there is sufficient space in the SMS Pool 2) make sure the VVDS and VTOC are large enough for the volumes in your pool I am curious as to why you focused on this one volume and the VVDS. I did not see any error messages targeting that volume or a vvds issue. IIRC - VVDS is done with a DEFINE command so should be cataloged. However, if there are a dasd moves or renames (volumes clipped), that might be some of the issue. Go to Option 3.4 in ISPF and just list the contents of the volume. Also do a VTOC list with 3.4. Or use ISMF to review the information about the volume and VTOC, VVDS and VTOCIX sizes. See if the volume APBPC7 has a large enough VVDS and that the VVDS exists on the volume. If so, you may need to recatalog or recover the VVDS After recovery, a BCS might not contain entries for all the VVDSs on volumes where the BCS has data sets. In this case, you might want to recatalog the VVDS so that the BCS contains entries for all connected VVDSs. If you want to recreate the BCS entry for a VVDS, use the access method services DEFINE CLUSTER command with the RECATALOG option. Specify the name, volume of the VVDS, and NONINDEXED. The BCS entry is rebuilt using information in the VVDS and the command. A VTOC entry for the VVDS must also exist. Before recovering a VVDS, decide if the VVDS is systematically damaged, or if only certain entries in the VVDS are damaged. If you cannot
Re: What are these facility classes
Thanks all for confirming my suspicions. I tried BING. Maybe Next time I use many search engines before I give up. I just did not think that Xpediter needed a programmer to have access to ADD an LPA Module dynamically. I will do more research. Lizette > Compuware Xpediter, according to my pals at Google. > > Thomas Ambros > Operating Systems and Connectivity Engineering > 518-436-6433 > > > > > I have two facility classes defined for dynamic LPA. > > CSVDYLPA.ADD.XPMDRVR > CSVDYLPA.ADD.XPMMAIN > > I cannot find the program names or product associated with XPMDRVR or XPMMAIN. > > Any clues where I should go for them? > > Thanks -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
What are these facility classes
I have two facility classes defined for dynamic LPA. CSVDYLPA.ADD.XPMDRVR CSVDYLPA.ADD.XPMMAIN I cannot find the program names or product associated with XPMDRVR or XPMMAIN. Any clues where I should go for them? Thanks Lizette Koehler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: JES2 OFFLOAD - requesting help, ideas, etc.
> > Hello IBM-MAIN people, > We recently have installed a new IBM Tape Library (without a VTS) to replace a > very old STK Silo; so we are migrating our tape usage from 3490's to 3590's - about a > hundred-fold increase increase in capacity per cartridge (and will have many fewer > cartridges!)! This change in technology has forced us to change all of our tape jobs - in > some cases, like backups, it is very straight forward (take 40 odd jobs, create one job > that "stacks" all of backups onto a single tape); some jobs/processes are not so easy! > One of our difficult processes is the JES2 OFFLOAD. Every weekday night (at 18:30) > we start the offload of production output to tape (with PURGE). Before the new tape > library, this would take less than a full 3490 cartridge (and it still takes less than a full > 3590 cartridge - a very small fraction of a cartridge and a lot of waste). >From my > reading of the JES2 commands, it seems that JES2 OFFLOAD can not deal with file > sequence numbers (more than one file per tape). Currently, we keep the offload on > tape for 60 days. I would like to get some feedback from others on the list as to what > they do for JES2 OFFLOAD. Is anyone using the OFFS= parameters in commands, and > how (I would like to see command sequences). > >One of the questions I have is, can JES2 append to an existing OFFLOAD tape? I > would like to be able to mount the same tape for month (roughly 20 working days). I > know that as job numbers roll over to 1 I might get into the slim possiblity of > JOBNUM/JOBNAME conflicts on restoring the output. > In my shop we use an External Writer to do this. We have a process that we can run against the tape to extract the jobs back off into SYSPRINT. Not sure if this is something you want to look at or not There is on the CBTTAPE.ORG File 575 to combine Offloaded files 358 SYSOUT Archive process (Eric Biefield) 790 Sysout Retrieval Services These might be worth looking at. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Mentor for an Assembler User Exit in CA-1
If someone could assist me in reviewing my changes for a CA-1 user exit, I would be very grateful. I just need someone who is familiar with the exits in CA-1 to review what I have coded to see if I did it correctly. I would hate to put the code in and then blow something up. Thanks Lizette Koehler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: IPOUPDTE / CPPUPDTE Download
> > Hi list, > > I want to download IPOUPTE or CPPUPDTE. > > Is urgent. > > Thanks and regards, > > -- > Un saludo. > Álvaro Guirao You can also go to the CBTTAPE.ORG website and find IPOUPDTE there. Also, you might want to look for alternatives to using this function. There are many ways to do PDS member updates with other utilities. For example, if you have COMPUWARE MVS product, a pds update funciont is in there Or if you have CA PDSMAN a PDS update function is in there. Hope that helps. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Batch process VS Started task
> > Hi list. > > We have a daily betch job that is processing as input records which has been collected > all day. > volume of records is about 5 millions for 24 hours. > > In order to make systems more "online" we are looking for a way to run the process > for each record all day long instead of a daily run, and doing so with minimum as > possible application changes. > > One idea that came up is to convert the process to a "self developed" STC which will be > triggered by a record on an MQ queue and will run as STC all the batch process > programs > > To me it seems like a bad idea because having a "self developed" STC in production > create a maintenance gap (and where there is one STC a second one will soon to > follow...)... > > Are there other advantages / dis-advantages regarding a "self developed" STC ? > > Are there any "self developed" STC's at your shop? > > Any other ideas on how to approach this issue? > > Thanks in advanced. > > Magen > Perhaps you could review the BATCH PIPES process in z/OS or if you have MQ, perhaps that could support what you need. Other options could be IMS solution MQ solution CICS solution DB2 Solution We currently have a need to send out orders when a DB2 table is updated. To do this we use our CA-ESP Scheduling software to monitor the DB2 table, when there is a row change, it triggers the process to action the order. If there were some more details on your problem, we might be able to come up with more specific answers? Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Hrlp with Activate issue IODF Resolved
Yes it does, now I have the info to work further on this issue. 2am and I never looked at HCD messages. Only IOS messages. Thanks very much > Lizette > > Does this help?(it is from the HCD messages manual) > > * CBDA817I Processors proc_id1 and proc_id2 are of different type. > * > * Explanation: The target processor must be the same type as the source > processor.System Action: None. HCD processing is ready to continue. > Programmer Response: None.User Response: Respecify a target processor > ID so that both, the source and the target processor are of the same type.* > > ** > *Mike* > > > On Sun, Feb 19, 2012 at 11:54 AM, Lizette Koehler > wrote: > > > On z/OS V1.11 > > > > I did the following command > > > > ACTIVATE IODF=02,TEST > > > > IOS500I ACTIVATE RESULTS 593 > > TEST DETECTED CONDITIONS WHICH WOULD RESULT IN ACTIVATE FAILURE > > REASON=A817,PROCESSORS DCM1 AND DCM1 ARE OF DIFFERENT TYPE. > > COMPID=SC1XL > > > > Does anyone know what he A817 code is trying to tell me? I cannot > > find documentation on it. > > > > Lizette Koehler > > > > -- > > For IBM-MAIN subscribe / signoff / archive access instructions, send > > email to lists...@bama.ua.edu with the message: INFO IBM-MAIN > > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Hrlp with Activate issue IODF
On z/OS V1.11 I did the following command ACTIVATE IODF=02,TEST IOS500I ACTIVATE RESULTS 593 TEST DETECTED CONDITIONS WHICH WOULD RESULT IN ACTIVATE FAILURE REASON=A817,PROCESSORS DCM1 AND DCM1 ARE OF DIFFERENT TYPE. COMPID=SC1XL Does anyone know what he A817 code is trying to tell me? I cannot find documentation on it. Lizette Koehler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: zSeries Manpower Sizing
> >tyvm, Timothy, for your expert analysis. > >Please pardon my ignorance, but what is a PCI? > > > PCI has to do with Payments for Credit Cards and their security. The PCI Security Standards Council offers robust and comprehensive standards and supporting materials to enhance payment card data security. These materials include a framework of specifications, tools, measurements and support resources to help organizations ensure the safe handling of cardholder information at every step. The keystone is the PCI Data Security Standard (PCI DSS), which provides an actionable framework for developing a robust payment card data security process -- including prevention, detection and appropriate reaction to security incidents. For device vendors and manufacturers, the Council provides the PIN Transaction Security (PTS) requirements, which contains a single set of requirements for all personal identification number (PIN) terminals, including POS devices, encrypting PIN pads and unattended payment terminals. A list of approved PIN transaction devices can be accessed here. To help software vendors and others develop secure payment applications, the Council maintains the Payment Application Data Security Standard (PA-DSS) and a list of Validated Payment Applications. The Council also provides training to professional firms and individuals so that they can assist organizations with their compliance efforts. The Council maintains public resources such as lists of Qualified Security Assessors (QSAs), Payment Application Qualified Security Assessors (PA-QSAs), and Approved Scanning Vendors (ASVs). Large firms seeking to educate their employees can take advantage of the Internal Security Assessor (ISA) education program. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: zSeries Manpower Sizing
> > I am trying to find out how much staff, numbers and titles, eg z/OS, z/VM, > VTAM/TCPIP, CICS, etc, are needed to run a large zSeries mainframe shop. > > Would some of you be so kind as to share that information with me. > > > -- > George Henke > (C) 845 401 5614 > George the only answer I can give is - It Depends What is the hardware layout, how many mips, SLAs, software mix, external contacts (vendors, business partners), transmission types (NJE, MQ), and so on. You can find titles like z/OS System programmer, z/OS System Administrator, Security officer, Application developers, Network Security, Network Administrators, and so many more. I know of no concise list that would give you information for such a broad question. Could you narrow it down a bit? What is your definition of LARGE. From my vantage point, it is like asking some one what is a tall person. If you are 3ft tall, then 5ft is tall. If you are 6ft tall, then 5ft is small. All is relative. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: HSMLOG file format
> > I found the below information in the archives, but I did not see an answer, > > where can i obtain the format of HSMLOGX/Y ? > using ARCPRLOG, the output shows a lot of ID=xx (where xx is numeric), but nowhere > can i find the complete list. > > can i use my little utility (like SAS) to read HSMLOG directly ? What information are you seeking in the HSMLOGX/Y? If you have sas and MXG at your shop, I think (I am not sure) that MXG might have a format. Though I could be wrong on that. I typically just use the tools that IBM provides to format the records. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Change of Ownership for a Job
&PWFI, > XX'&APARM',&LOCKMAX,&APPLFE, > XX&ENVIRON,&JVMOPMAS) > XX* > IEFC653I SUBSTITUTION JCL - PGM=DFSRRC00,REGION=512K,TIME=1440,DPRTY=( > ,,,6,5,IMS1,DC,,Y,'') > 5 XXSTEPLIB DD DSN=IMSEXE11.&SYS2.PGMLIB,DISP=SHR > IEFC653I SUBSTITUTION JCL - DSN=IMSEXE11.PGMLIB,DISP=SHR > 6 XX DD DSN=IMS1110.&SYS2.SDFSRESL,DISP=SHR > IEFC653I SUBSTITUTION JCL - DSN=IMS1110.SDFSRESL,DISP=SHR > 7 XXPROCLIB DD DSN=IMS1110.&SYS2.PROCLIB,DISP=SHR > IEFC653I SUBSTITUTION JCL - DSN=IMS1110.PROCLIB,DISP=SHR > 8 XXSYSUDUMP DD SYSOUT=&SOUT, > XX DCB=(LRECL=121,BLKSIZE=3129,RECFM=VBA), > XX SPACE=(125,(2500,100),RLSE,,ROUND) > //* > //* OVERRIDE PROC DD STATEMENTS > //* > //* --NONE-- > //* > //* ADDITIONAL DD STATEMENTS > //* > IEFC653I SUBSTITUTION JCL - SYSOUT=*,DCB=(LRECL=121,BLKSIZE=3129,RECFM > 9 //DFSSTAT DD SYSOUT=* > //* > > JESSYSMSG : > O. MESSAGE > > 2 IEFC001I PROCEDURE DFSMPR WAS EXPANDED USING SYSTEM LIBRARY > IMS1110.PROCLIB > > One thing I found IBMUSER reads a proclib called MEMBER = DFSINTDC : > > Member DFSINTDC has just IEFBR14 coded. > > Jags > > > > > On Thu, Feb 16, 2012 at 6:04 PM, Lizette Koehler wrote: > > > > > > > Hello, > > > > > > Recently we have installed a IMS system. We have a requirement of > > changing > > all the > > > started task userid for which I was able to do it easily, but there > > > are > > some Jobs which > > > generates automatically when the IMS region starts up for which the > > > OWNER > > for the > > > JOB is IBMUSER. > > > > > > Is it possible to change the Ownership of the IMS batch Jobs which > > > starts > > automatically > > > when IMS region is Bounced. > > > > > > Regards, > > > Jags > > > > Jags, > > What version of z/OS, IMS and what SAF (ACF2, RACF, or Top Secret)? > > > > Could you provide a sample of a generated job? What Owner is it > > getting when it is submitted? > > > > You SAF product should be able to assign and owner. If not, then you > > may need to code an exit. I think that the owner is assigned at > > submission, so there are a couple of places this could be done. > > > > Lizette > > > > -- > > For IBM-MAIN subscribe / signoff / archive access instructions, send > > email to lists...@bama.ua.edu with the message: INFO IBM-MAIN > > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Change of Ownership for a Job
> > Hello, > > Recently we have installed a IMS system. We have a requirement of changing all the > started task userid for which I was able to do it easily, but there are some Jobs which > generates automatically when the IMS region starts up for which the OWNER for the > JOB is IBMUSER. > > Is it possible to change the Ownership of the IMS batch Jobs which starts automatically > when IMS region is Bounced. > > Regards, > Jags Jags, What version of z/OS, IMS and what SAF (ACF2, RACF, or Top Secret)? Could you provide a sample of a generated job? What Owner is it getting when it is submitted? You SAF product should be able to assign and owner. If not, then you may need to code an exit. I think that the owner is assigned at submission, so there are a couple of places this could be done. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: [TSO-REXX] Debug TSO through ISPF panels installation
Cross Posting to IBM Main and TSO-REXX groups > > > > > Hi List, > > > > I'm installing a product in a client and when I invoked the primary > > panel > of the > > installation, one of the selections don't do anything when I select it > with an 's'. > > > > I have test it in my systems and functions, so, I think there is > > something > trhough their > > logon procedures that is causing the problem, but I cannot determine it. > > > > I want to debug the TSO navigation, I see once how to activate a trace > online with a > > TSO command, do you know what is? > > > > If you have any other suggestions will be much appreciated. > > > > Thanks and regards, > > > > -- > > Un saludo. > > Álvaro Guirao > > > > Alvaro - > > First, I think the ISPF Newsgroup may be better. If you have not joined, you can go > here ISPF discussion list > > Internet ISPF Discussions > > Lively discussions of ISPF-related matters are held regularly on the Internet. Check into > the ISPF-L discussion list to hear the latest questions and answers from customers > around the world. (This is not an IBM-maintained forum, and IBM participates in the > discussion list on an informal basis.) Subscribe to the ISPF discussion list > > To subscribe to the discussion list, create a file where the subject and the first line of > the text are: > > SUBSCRIBE ISPF-L yourname > > Send the file to the discussion list administration server: > > lists...@listserv.nd.edu > > This will enable your subscription to the ISPF-L discussion list. For further information > about the discussion list, send a file with the HELP command, and listserv will return all > kinds of other administrative information. > > You will soon start getting e-mail from the discussion list. To append your note to the > list, direct your response to: > > isp...@listserv.nd.edu > > > > Second - TSO is a native interface also indicated by word READY prompt. I think you > mean trace in ISPF for an ISPF application. > > To trace ISPF there are a couple of options > > 1) Use the ISPF Trace function. If you do not have a customized primary panel then > look for an option on the main panel option 7. Here you can setup tracing functions. > The ISPF USER'S GUIDE Vol II will be helpful. > 2) Startup ISPF with TRACE - this removes many trap functions. If there is an abend, > you will get a dump. > 3) Try using ISPVCALL (Enter TSO ISPVCALL on the command line to activate. > Go into your application. When done, issue it again to unload the TRACE > data) > > I use the ISPF Option 7 for most of my debugging requirements when diagnosing ISPF > applications. > > Hope this helps. I am not aware of a manual dedicated to how to debug ISPF > applications. > > Lizette > Also, this link may help - http://home.roadrunner.com/~pinncons/ISPF%20Tips%20and%20Free-for-All.pdf This is a Share Presentation on ISPF Debugging. Also, you could try removing the ISPF Profile member for that user. The one specific to that application. If you do not know what it is, then 1) Have the user logoff 2) Rename the user's PROFILE datasets. Allocate for the user a new PROFILE dataset. 3) Have the user Logon. If the problem goes away, then it was in their Profile dataset. If you know the application name used by this process, just rename that member. ISPF will create a new default when either the PROFILE is new, or the application does not find its Profile member. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: [TSO-REXX] Debug TSO through ISPF panels installation
Cross Posting to IBM Main and TSO-REXX groups > > Hi List, > > I'm installing a product in a client and when I invoked the primary panel of the > installation, one of the selections don't do anything when I select it with an 's'. > > I have test it in my systems and functions, so, I think there is something trhough their > logon procedures that is causing the problem, but I cannot determine it. > > I want to debug the TSO navigation, I see once how to activate a trace online with a > TSO command, do you know what is? > > If you have any other suggestions will be much appreciated. > > Thanks and regards, > > -- > Un saludo. > Álvaro Guirao > Alvaro - First, I think the ISPF Newsgroup may be better. If you have not joined, you can go here ISPF discussion list Internet ISPF Discussions Lively discussions of ISPF-related matters are held regularly on the Internet. Check into the ISPF-L discussion list to hear the latest questions and answers from customers around the world. (This is not an IBM-maintained forum, and IBM participates in the discussion list on an informal basis.) Subscribe to the ISPF discussion list To subscribe to the discussion list, create a file where the subject and the first line of the text are: SUBSCRIBE ISPF-L yourname Send the file to the discussion list administration server: lists...@listserv.nd.edu This will enable your subscription to the ISPF-L discussion list. For further information about the discussion list, send a file with the HELP command, and listserv will return all kinds of other administrative information. You will soon start getting e-mail from the discussion list. To append your note to the list, direct your response to: isp...@listserv.nd.edu Second - TSO is a native interface also indicated by word READY prompt. I think you mean trace in ISPF for an ISPF application. To trace ISPF there are a couple of options 1) Use the ISPF Trace function. If you do not have a customized primary panel then look for an option on the main panel option 7. Here you can setup tracing functions. The ISPF USER'S GUIDE Vol II will be helpful. 2) Startup ISPF with TRACE - this removes many trap functions. If there is an abend, you will get a dump. 3) Try using ISPVCALL (Enter TSO ISPVCALL on the command line to activate. Go into your application. When done, issue it again to unload the TRACE data) I use the ISPF Option 7 for most of my debugging requirements when diagnosing ISPF applications. Hope this helps. I am not aware of a manual dedicated to how to debug ISPF applications. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Question about XDC BATCH and automation
> > Hello List, > > We need all days here, Access the SYSOUT from CICS under SDSF , then, give the > XDC command, to save the sysout on DASD, next, Edit this file, for locate all abends, > save this file on another file, and send this information to development people. > > So, we want know, if is possible, made a automation in this process, first , using XDC > running a BATCH JOB, this is possible ? > If, Yes, have a way, that I know, what is the last CICS JOBS on SYSOUT, because, > today, We enter, manually in this SYSOUT, for locate the last report. > The remainder, I know how to do. > With a sample REXX program, I can extract what We need from the SYSOUT. > > Thanks very much. > > Sergio > Sergio do you have SDSF in Shop? And are you at z/OS V1.9 or greater? Then you could use SDSF Rexx. Otherwise if you have SDSF, then you can run SDSF in batch and extract the data from JES (JES2?) and put that to a dataset. Similar to using the XDC command. If this is not real time, how often do you cycle your CICS Region? Would it be possible to send that SYSOUT to a GDG that is created when CICS comes down and then extract information you need? Or do you have Compuware product Abendaid for CICS? Does this help? Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Archaic allocation in JCL (Was: Physical record size query)
> > > > But, this is precisely what SMS and DATACLAS are for. It does > > accomplish, for the most part, SPACE=ANY. > > Not fully using SMS is so 80s' > > If so, do You really see everyone that creates and submits JCLs to create/change > DATACLAS/STORCLAS instead of editing the SPACE= parms ? > Or do You envision DATACLAS/STORCLAS's with very generous SPACE allocations (for > every allocation) ? > > > > Regards, > Thomas Berg So the question becomes where to define space? The system cannot "think" like a human. It usually needs a place to start. So IBM provided some solutions. The LIKE parm in JCL The SMS DataClas functions The JCL SPACE parm I think it was amazing that IBM was able to eliminate the need for DCB=(x) and just let us use the subparms. For SPACE you are looking at old code that needs to be altered in CONVERTER, JES, ALLOCATION, IOS and probably more. It is old code and not likely to change in our lifetimes. I am also sure that if the developers in the 60's and 70's had any clue where computing was going, they might have thought harder on their designs. Remember when this was evolving we had restrictions that needed to be spelled out to the operating system. Therefore, this process (Space Allocation) needed to be definitely set. Remember, this came to us from MFT, MVT, SVS, and then MVS. And developers had to know what they were using and conserve the space usage. Everything was expensive back then. Instead maybe you need to look at a homegrown process that generates your JCL using META Data. Then if you have space problems, you can adapt your META Data or use products like SRS (DTS Software) or BMC Mainview SRM to monitor and dynamically grow or shrink a file as needed. Wait - we are back to your issue. Having to monitor and change something for space issues. That is where products like SRS and SRM are helpful. They monitor your system and if a space issue is about to happen, dynamically change the data allocations on the fly. Remember the old STOPX37? But, you also have issues because now you need to monitor the monitors and adjust them as space issues arise. Seems to me to be an infinite loop. Not one with a solution with today's tools. The issue of space is one of limitation of DASD space. If you have infinite storage, then over allocate everything in a Dataclass and not worry. If you have a constricted dasd environment, then keeping tight allocations will lead to space issues. So what do you want to manage - JCL or SMS code? Most shops review their allocations periodically and adjust their process. Either through SMS Dataclas or JCL. I know most shop would love to have a "human thinking universe", however the computer is still fairly rudimentary. No Star Trek environment yet. ;-D If you truly want to see this type of issue resolved, then perhaps a SHARE requirement or Change request to IBM would be more effective? Just my $0.02 worth. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: IPLTEXT query
> > Hi All, > > How to know that a specific SYSRES volume has the IPLTEXT in it ? > > Apology if my question doesn't makes any sense and it requires more information. > > Regards, > Jakes > So what have you found so far in your research? What specifically are you trying to find out? You might have several volumes with IPLTEXT on them. Which one are you looking for - SADUMP or IPL? For a current live environment or one not used any more? What process do you have in place to implement your IPLText? What version of z/OS (the dataset names have changed slightly over time)? I would use an Internet Search engine for IBM IPLTEXT and VOLUME. It should provide several entries to help you. For example this thread is interesting http://www.mail-archive.com/ibm-main@bama.ua.edu/msg22134.html Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Abend S0C4 in an internal sort
> > I can't get my head around this one, I'm 100% sure the answer is starring at me but I > just don't see it. I'm writing an assembler program that invokes SORT using LINK. > There are E15 and E35 exits to handle records going in and out of the sort, but it keeps > abending with S0C4 and sometimes S0C1, depending on whether the exit routines are > half or fullword aligned :( To eliminate other possible causes I created the following > very simple program where the E15 exit returns RC=16 to tell SORT just to terminate > without doing anything. But it also abends in the same way. The PSW seems to point at > an unrelated ISPF module in the LPA, but I haven't investigated that further. This is the > code: > > TEST60 CSECT > TEST60 AMODE 31 > TEST60 RMODE ANY > SAVE (14,12) > LR12,15 > USING TEST60,12 > > LA11,SAVEAREA > ST11,8(,13) > ST13,4(,11) > LR13,11 > > LA1,SORTPARM > LINK EP=SORT > > L 13,4(,13) > ST15,16(,13) > LM14,12,12(13) > BR14 > > DS0F > SAVEAREA DS18F > SORTPARM DCA(SORTSTMT) > DCA(E15_EXIT) > DCA(E35_EXIT) > DCF'-1' > SORTSTMT DCAL2(SORTEND-SORT) > SORT DCC' SORT FIELDS=(1,1,CH,A)' > DCC' RECORD TYPE=F,LENGTH=80' > SORTEND EQU * > > E15_EXIT DS0F > LA15,16Terminate SORT > BR14 > E35_EXIT DS0F > LA15,8 > BR14 > END TEST60 > > It can't be more simple than this, like any piece of "Hello World" code. I've tried linkedit > as either RENT or NORENT, same result. The sort program produces diagnostic > messages on SYSOUT as expected, so it gets called OK. So, who is the first to spot the > obvious flaw that I can't see? Thanks for helping out. > > Staffan > Is the load module in an APF authorized library? Also, as others have pointed out, the Regs and PSW summary dump would be very helpful. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Archaic allocation in JCL (Was: Physical record size query)
> > I can't understand why we STILL need to specify SPACE= (etc) for an allocation of a > dataset. > You normally don't do that in other OS (platforms), You always (both principally and in > practice) want to allocate as much as is needed during execution > > If for backward compatibility it can't be done automatically, why not introduce a new > keyword like e g "SPACE=ANY" ? > > Thomas, IIRC - if you force a DATACLAS on a dataset in SMS, you can specify the Space requirements there. Then the JCL does not require Space. Have you looked at that? However, then that makes your storage admin responsible for ensuring the space is enough. And if needed alter the dataclass if there are space issues. And it would require all such datasets be SMS managed. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Question on Job Scheduling
>I have a meeting with a customer next week to talk about z/OS batch job >scheduling. They claim to have about 20 scheduling employees. In my past >experience, that seems about 4x too high. So I thought I'd ask the group >the following question: > >How many job schedulers do you have, and how many MIPS is the environment? > >I promise not to reveal where I got any of this information from, I only >want the statistics. > >Thanks, >Dan Gillis >System z Client Architect, IBM I think it depends on the complexity of the schedule. How many request jobs vs. scheduled jobs. Type of scheduling software (home grown, CA ESP, CA Scheduler, IBM Tivoli, etc) And whether or not you include distributed scheduling in the mix. We have 3 schedulers running about 5000 jobs a day in CA-ESP both mainframe (1 plex) and distributed. The schedules are simple. The calender is simple. We are small. In a previous life I worked in a shop with 15 Sysplexes and about 100 schedulers. for Mainframe Only. With very complex schedules. Very little adhoc. Lizette >I have a meeting with a customer next week to talk about z/OS batch job >scheduling. They claim to have about 20 scheduling employees. In my past >experience, that seems about 4x too high. So I thought I'd ask the group >the following question: > >How many job schedulers do you have, and how many MIPS is the environment? > >I promise not to reveal where I got any of this information from, I only >want the statistics. > >Thanks, >Dan Gillis >System z Client Architect, IBM -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Acceptable paging
> > Can someone please help me determine what the 'acceptable paging' should be on a > system? We are having issues with MQ and broker. Thanks. > Could you describe your environment a little? CPU(s) (z10, z9 , etc) Amount of dasd space allocated to Page Datasets? Number of Page Datasets Real Memory available Number of MQ and Brokers? Connection types (IMS, CICS, Distributed systems) Many elements can play into tuning a system. This will help in answering the question. Now, when you ask about acceptable paging in relationship to MQ, is anything else in play? CICS, IMS, DB2, heavy batch, etc. or is MQ the only thing running on that system? Or perhaps I misunderstood your acceptable paging in relationship to MQ. Thanks Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Inventory the back end tapes of a VTS
I was wondering if there was a way to identify what files/datasets are on a back end tape in a VTS B20 3494? I think there might be a panel on the specialist B20 but not sure. I am going through the manuals now but just not seeing it. I am hoping to get a listing into a file on the mainframe for review. So any tool or tricks to do that will be helpful. I are researching moving to different media for the back end and was looking at doing an inventory of back end to see what we would need to accommodate. And I do need it at the file level (basically HLQ) and length of time the file has been there. Probably want to look at cleanup if possible. Lizette Koehler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: CA LMP Key Validation Resolved
> > >Never Mind, I found Mark Zelden's code in my notes files. > >Thanks anyway. > >Lizette > > >-Original Message- >>From: Lizette Koehler >>Sent: Feb 7, 2012 4:46 PM >>To: IBM-MAIN@bama.ua.edu >>Subject: CA LMP Key Validation >> >>Has anyone written a tool that could help in reoncilling all of my CA Keys. >> >>For example I have 2 Physical Boxes. Running 6 Lpars. >> >>However, CA Keys do not seem to match. I need a pair of keys, one for each >>box. >> >>So rather than doing IEIBALL, is there any tool that would help me validate >>the Prod_Key, CPU >> >>I can write a Rexx but thought if someone had something to share, that would >>be great. >> >>Lizette >> >>-- >>For IBM-MAIN subscribe / signoff / archive access instructions, >>send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: CA LMP Key Validation
Never Mind, I found Mark Zelden's code in my notes files. Thanks anyway. Lizette -Original Message- >From: Lizette Koehler >Sent: Feb 7, 2012 4:46 PM >To: IBM-MAIN@bama.ua.edu >Subject: CA LMP Key Validation > >Has anyone written a tool that could help in reoncilling all of my CA Keys. > >For example I have 2 Physical Boxes. Running 6 Lpars. > >However, CA Keys do not seem to match. I need a pair of keys, one for each >box. > >So rather than doing IEIBALL, is there any tool that would help me validate >the Prod_Key, CPU > >I can write a Rexx but thought if someone had something to share, that would >be great. > >Lizette > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
CA LMP Key Validation
Has anyone written a tool that could help in reoncilling all of my CA Keys. For example I have 2 Physical Boxes. Running 6 Lpars. However, CA Keys do not seem to match. I need a pair of keys, one for each box. So rather than doing IEIBALL, is there any tool that would help me validate the Prod_Key, CPU I can write a Rexx but thought if someone had something to share, that would be great. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Simple iinventory control products?
> I am being asked if there are relatively simple source-and-JCL inventory control > products available for z/OS. I found one myself (XREF product at dcmsi.com), but > management wants to know if any other software vendors provide such a product. > > We're not interested at the moment in full life cycle management products like > Endeavor or ChangeMan. We just need a simple inventory control product that could > answer interactive queries (E.G., What JCL uses this file? Where is this program > used?) by programmers and technical support staff. > > TIA for any product or company names or links you can provide. > > Peter > -- If it has not been offered, SEA (Software Engineers of America) has a suite of products including !JCLPLUS. They have a suite to do what you are looking for. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Mainframe Testing
As others have pointed out - there are many. Perhaps you can tell us what you want to test? Or how this information is to be used? Is this COBOL, JAVA, CICS, IMS, DB2, MQ, ASSEMBLER, PL/1, etc that will be tested? Do you need interactive testing or batch? Also what software vendors do you have for testing. For example there is Xpediter by Compuware. Is it for load testing, regression testing, SDLC, ITIL,? Do you use a change control package like Endevor or Changeman? Will the testing be done between distributed and mainframe systems or just mainframe? As you can see all of these areas have tools for testing. It just depends on where you want to go. The more information you can provide, the better the answers we can come up with. ;-) Lizette > > Hi Friends, > > Can anybody tell me about Mainframe testing, what are the tools are used for > Mainframe system testing > > -- > *Mohd Rizwan -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: z/OS compiling COBOL/CICS pgms
> > Hello, > > Questions again please! On Dallas VIC z/OS R13 I need to: > > - compile/link a COBOL/CICS pgm, VSAM KSDS (no DB2) > - compile/link a COBOL/CICS/DB2 pgm > > From google/docs I tried COBMCIC4 for a non DB2 and DB2CICSC for a DB2 pgms but > both procs were not found. Did a COBMCIC 'srchfor' against the DFH420 HLQ(?) .. > produced nothing. > > .. e.g. the non DB2 compile JCL was .. > > //CMPP01 JOB (CONRAD-A),'GH', > // CLASS=A,MSGCLASS=0,MSGLEVEL=(1,1) > //PROCLIB JCLLIB ORDER=DFH420.CICS.SDFHPROC > //COMPILEC EXEC COBMCIC4 > //TRN.SYSIN DD DSN=IBMUSE1.MFSY(MFSYP01),DISP=SHR<= IP PGM > //COB.SYSLIB DD DSN=IBMUSE1.MFSY,DISP=SHR <=COPY LIBRARY > /* > //LKED.SYSLMOD DD DSN=VENDOR.LINKLIB.SECOND(MFSYP01),DISP=SHR > <=LOADLIB > // > > So what/where are the relevant procs? Greedy but better still .. real live JCL:-)! > Solution should not include making any changes to the procs. > > As always, TIA > Graham Hobbs > > .. am about to start my CICS 4.2 for the first time for years .. can't remember how to > logoff, shut down or both .. could somebody please remind me? > Graham, Depending on the version of Cobol you are using - the precompiler, IIRC, should be built in. So a normal IGY complier proc might work. Next, VSAM vs. DB2 only means precompile or regular compile. The DB2 would create DBRM out of the compiled Cobol program. This is documented in the DB2 Programmer manuals. Next, as for CICS, check out the CESN, CESF, and CEMT commands. Again documented in the CICS manuals. One big watch out - you do need a CLEAR SCREEN Key on your keyboard. Make sure one is mapped on your keyboard. If you Google CICS DB2 COMPILE you should find lots of good examples. Like this link: http://www.mainframegurukul.com/tutorials/database/db2_tutorials/sample-db2- cobol-compile-jcl.html Or at IBM this link will describe the process: http://publib.boulder.ibm.com/infocenter/dzichelp/v2r2/index.jsp?topic=%2Fco m.ibm.db2.doc.apsg%2Fqchp8b.htm Good luck. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
VIRTUAL PRINTER INTERFACE FOR CICS PRINTERS by Candle
Cross posting to CICS and IBMMAIN. Does anyone have a command for the old Candle CL/SUPERSESSION VIRTUAL PRINTER INTERFACE FOR CICS PRINTERS I need to find a command that will free a printer from VPrint Interface for CICS. We seemed to have misplaced our manuals for the product and now have a need to remove a printer from this Started Task. Thanks. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Finding 'empty' GDG's
> > Hi, > > Does anyone know of a simple way to find GDG's that have no GDS's attached? > > Thanks > > Gadi > I could use LISTC ENT('gdgbase') GDG Or Use something like a TSO ALLOCATE for a 0 gen and see what it returns? (I have not tried this) If zero rc then you have entries. If greater than zero then no entries then check the output for the ASSOCIATION entries. If there were none, then it would be empty. I usually do this in a REXX then it is easier to extract the data I might want. Possibly the Catalog Search Interface could also be helpful. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Finding 'empty' GDG's
Another thought would be REXX LISTDSI. Might be easier. By using the gdgbase(0) it should tell you if there is one GDG out there. Lizette > > > > > Hi, > > > > Does anyone know of a simple way to find GDG's that have no GDS's attached? > > > > Thanks > > > > Gadi > > > > I could use > LISTC ENT('gdgbase') GDG > > Or > > Use something like a TSO ALLOCATE for a 0 gen and see what it returns? (I have not > tried this) If zero rc then you have entries. If greater than zero then no entries > > > then check the output for the ASSOCIATION entries. If there were none, then it > would be empty. > > I usually do this in a REXX then it is easier to extract the data I might want. > > Possibly the Catalog Search Interface could also be helpful. > > Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN