How to convert these IMS unload files from EBCDIC to UTF-8 encoding.
Dear Micael and all Thank you very much for your response and the valuable information provided. Over the past few days, I discussed the DBD definitions with our IMS DBA, and we have a similar setup where “The only fields that are required to be defined in a DBD are the keys, indexed fields, and any other fields that the application wants to be able to reference in Segment Search Arguments (SSAs). In the IMS system I work on, 99% of the segment fields are not defined in the DBD.” We are considering moving away from the mainframe, and our historical data is preserved on tape in IMS unload format and IMS IC. Initially, we wanted to convert the IMS database to a DB2 and then into a MySQL database to facilitate the migration of backup data from the mainframe to linux. Now, we are only planning to transcode the IMS unload files to make them readable on the Linux platform. We have all the necessary copybooks and are currently looking to convert these IMS unload files from EBCDIC to UTF-8 encoding. Here are a few questions regarding the conversion process: 1.For fields in the copybook defined as PIC A, PIC X, and PIC 9, these require conversion, but for numeric fields like PIC 9(4) COMP-1, no conversion is needed, correct? 2 How do we handle the conversion if the database has multiple copybooks? 3 What is the process for converting variable-length fields? 4 If we choose not to convert anything, are there any tools available on Linux that can read these IMS unload files in EBCDIC encoding? 5.Does the IMS unload file include information about segments, and how are they encoded? Furthermore, we do not have access to Broadcom IMS tools or File Manager. Could you please inform me if IBM has any utilities that can create the unload format file from an image copy input? Any advice or suggestions you can provide would be greatly appreciated. Best regards, -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Assistance with Converting IMS DB to MySQL DB
Dear Andrew, Thank you for your suggestion. I have some thoughts on the IMS segment layout and defining SQL columns, and I’d like to confirm with you: If I have the DBD (Database Description), is it sufficient to correctly define the SQL columns? Or do I need the application copybook in addition to the DBD? If the SQL columns are defined correctly, is it possible to do the following: a. Unload Data from IMS using PGM=DFSURGU0 b. Define DB2 Tables c. Load Data into DB2 using PGM=DSNUTILB The above are some of my ideas, and I’m not sure if they are correct. I hope to get your guidance. Thank you very much for your help! Best regards, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Assistance with Converting IMS DB to MySQL DB
Dear all, We are currently undertaking a project to convert some 15-year-old IMS database, for which we have some full image copy on tape, to a MySQL database on a Linux platform. To ensure the success of this migration, we would greatly appreciate your expertise and guidance on the following matters: Is it feasible to recover the IMS full image copy without an IMS DB system, or is the presence of an IMS DB system an absolute necessity for this migration process? Once we have successfully restored the IMS database files to disk, we are considering two potential approaches: a) Utilizing the IMS unload utility to convert the database files into a PS format, followed by developing a program to read the PS file and import the data into MySQL. b) Directly reading the IMS database files and writing the data into DB2, and then subsequently converting the data from DB2 to MySQL. Are there any specific constraints or limitations that we should be aware of, such as the mandatory requirement of an IMS DB system for this migration? Are there any relevant tools or utilities available that could assist us in this process and help streamline the migration? We would be immensely grateful if you could provide your insights on which of the two approaches mentioned above would be more feasible, given our current situation. Additionally, if there are any alternative methods or strategies that you believe might be suitable for our specific case, we would greatly appreciate your suggestions. Your expertise and knowledge in this area are highly valued, and any advice or recommendations you can offer to help us navigate this complex migration process effectively would be sincerely appreciated. Thank you in advance for your time and consideration. We eagerly await your response and look forward to benefiting from your guidance. Best regards, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Inquiry Regarding Sudden Increase in DFSMSrmm CDS Utilization
Dear all We have encountered a situation that requires your expertise and guidance. Today, we have noticed a sudden increase in the utilization of our DFSMSrmm Control Data Set (CDS) by 20%, from 55% to 75%, exceeding our warning threshold of 70%. This surge is puzzling since our daily data backup volume remains unchanged. Our question revolves around the possible DFSMSrmm activities, other than backup operations, that could contribute to an increase in the RMM CDS utilization. Currently, we only have the RMM journal . Could you kindly advise us on which messages we should be looking into to identify the potential cause of this issue in the RMM journal? We would greatly appreciate any suggestions or recommendations that you could provide. Thank you in advance for your time and assistance. Kind Regards, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Consultation on the Potential Risks of Deleting Specific Datasets
A safer approach would be to alter the mgmt. class to (e.g. delete after 1 year of non use). -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: [EXTERNAL] Re: Consultation on the Potential Risks of Deleting Specific Datasets
Dear clarification regarding the deletion or HSM migration of datasets with the attribute ‘lastref=none’. It is my understanding that one must first execute a REXX routine capable of reading the list to open/close the datasets before one can proceed with the deletion or migration of these datasets. Is my understanding correct? Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Consultation on the Potential Risks of Deleting Specific Datasets
Dear It is a good idea to use HSM. Our system currently has a number of datasets marked with ‘lastref=none’ and a list of datasets slated for deletion. As I am not familiar with HSM, I would appreciate your assistance in understanding how to instruct HSM to migrate the aforementioned datasets targeted for deletion. Could you please provide detailed steps or direct me to the relevant documentation that could assist me in executing this task? Any additional tips or best practices you could share would also be greatly appreciated. Thank you for your time and assistance. Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Consultation on the Potential Risks of Deleting Specific Datasets
Dear The phrase ‘Delete the dataset, however, and you will end up with a JCL error’ is not entirely clear to me. Could you please provide an explanation? If I attempt to delete a dataset with the attribute ‘lastref=none’ using JCL, will it result in an error? Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Consultation on the Potential Risks of Deleting Specific Datasets
Dear all I am reaching out to discuss a specific operation we are considering for our z/OS DCOLLECT reports. Currently, we are planning to delete all the datasets where LASTREF=NONE and DSORG=PS. This operation seems crucial for system maintenance and optimization, yet I wanted to clarify any potential risks associated with this action. As far as I understand, LASTREF refers to the last accessed date of the file. Hence, LASTREF=NONE implies that the file has not been accessed since its creation. Could you confirm if my understanding is correct? Additionally, I have been attempting to search for more information about LASTREF=NONE in the IBM manual, but my efforts have yielded limited success. If possible, could you kindly guide me on how to navigate the manual to find specific information like this one or recommend any reliable resources where such details may be more readily available? Lastly, does IBM have any specific requirements regarding the closure of PS datasets? By this I mean if a PS has been opened and never closed, would the LASTREF also be none? Any advice or insights you have on this matter would be highly appreciated. Looking forward to your helpful response. Best regards, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
How to keep the act upon mode unchanged for 1 minute in MSGFLDxx
Hi all The following is our definition of MSGFLD00: REGULAR MSGTHRESH=150, JOBTHRESH=50, INTVLTIME=1 REGULAR SYSIMTIME=2, JOBIMTIME=2 DEFAULT LOG, AUTO, NODISPLAY, NOCMD DEFAULTCMD '&,CANCEL & -- CANCELLED BY MESSAGE FLOOD AUTOMATION' JOB XCFAS DISPLAY JOB SA390 DISPLAY ACTION MSGTHRESH=50, JOBTHRESH=20, INTVLTIME=1 ACTION SYSIMTIME=2, JOBIMTIME=2 DEFAULT LOG, NOAUTO, NODISPLAY, NOCMD, NORETAIN DEFAULTCMD '&,CANCEL & -- CANCELLED BY MESSAGE FLOOD AUTOMATION' JOB XCFAS DISPLAY JOB SA390 DISPLAY SPECIFIC MSGTHRESH=50, INTVLTIME=1 SPECIFIC SYSIMTIME=2 SPECIFIC MSGIMTIME=2 SPECIFIC MSGLIMIT=20 DEFAULT LOG, NOAUTO, NODISPLAY, NORETAIN MSG IOS001E MSG IOS003A MSG IOS050I MSG IOS051I MSG DFHDU0201 ... After reading the IBM manual, we learned that there are three modes for MSGFLDXX: 1. Normal Mode 2. Intensive Mode 3. Act Upon Mode A. To Intensive Mode: If the number of messages counted is greater than or equal to MSGTHRESH and the time to count is less than INTV, then go to intensive mode. Intensive Mode - extra processing B. To Act Upon Mode: If there are JOBTHRESH/MSGLIMIT number of messages within INTVLTIME for any address space, then that address space or message is subject to the specified action (act upon mode). C. End Act Upon Mode: At the end of each MSGTHRES, if the time since the last message is greater than JOBIMTIME or MSGIMTIME, then end the act upon mode. D. End Intensive Mode: At the end of each MSGTHRESH, if the time since the last message is greater than SYSIMTIME, then end the intensive mode. We wants to stay in the act upon mode for 1 minute without ending the act upon mode for specific messages. They made the following modification to their MSGFLDxx: from SPECIFIC MSGTHRESH=50, INTVLTIME=1 SPECIFIC SYSIMTIME=2 SPECIFIC MSGIMTIME=2 SPECIFIC MSGLIMIT=20 to SPECIFIC MSGTHRESH=50, INTVLTIME=1 SPECIFIC SYSIMTIME=60 SPECIFIC MSGIMTIME=60 SPECIFIC MSGLIMIT=20 We performed testing for a special message, and throughout the testing process, this message consistently had 60 messages per second. After transitioning to the intensive mode and then to the act upon mode,we noticed that it returned to the normal mode after a few seconds, but immediately entered the intensive mode and act upon mode again. They couldn't maintain the act upon mode for a full minute. Please let us know if this behavior is normal, and if there is any way to keep the act upon mode unchanged for 1 minute. Any suggestions is highly appreciated! Thank you! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Question about RMF III Device Resource Delay
Dear all, I have a question about the RMF III Device Resource Delay report I noticed that the DLY% value of one disk is 100 every 6 minutes. This disk has HyperPAV enabled. ACT RATE = 5.1,RESP TIME=200 ACT%=2 CON%=1 DSC%=1 USG%=0 DLY%=100 According to the IBM manual, DLY% means "Percentage of time when the job was waiting to use the data set because of contention for the volume were the data set resides". I would like to know how to identify the cause of this contention. What command should I use? Do I need to enable GRS MONITOR? Any suggestions would be greatly appreciated! Thank you for your attention and assistance. Sincerely, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Inquiry about extracting and counting msgid from operlog using sort program
Dear Max, Thank you very much for your effort and help to provide me with a complete solution for my problem using SORT. That is exactly what I needed. I appreciate your expertise and generosity in sharing your sample JCL. It was very helpful and clear. I will use it as a reference and tailor it to fit my specific needs. Thank you again for your assistance. You are very kind and professional. Best Regards, Jason Cai == Jason, for you first question I could say experience. All my customer sites have different "hot messages" to look at. Others are only warning, others (the most of) are simply ignored. I cannot simply share them. I could give you some "generic hints" like: - JES Spool over x% then add a spool volume - IRA* messages that warn about critical memory issues - . sorry for that. About SORT, I can give you a sample to approximate what you need even though it must be tailored to fit your big picture. Assuming my input, SYSLOG (VBM), and no more than 28 words after the MSGID and single word max 30 characters. If some words are separated by more than one blank the multiple spaces will be reduced to one. I'm sure Sri can give you something better. OPTION VLSCMP INCLUDE COND=(6,1,SS,EQ,C'M') INREC IFTHEN=(WHEN=INIT, PARSE=(%00=(ABSPOS=5,FIXLEN=59), %01=(ENDBEFR=C' ',FIXLEN=30,REPEAT=29)), BUILD=(1,4,%00,%01,%02,%03,%04,%05,%06,%07,%08,%09, %10,%11,%12,%13,%14,%15,%16,%17,%18,%19, %20,%21,%22,%23,%24,%25,%26,%27,%28,%29)), IFTHEN=(WHEN=(904,3,CH,GE,C'000',AND,907,1,CH,EQ,C' '), OVERLAY=(904:30X)), IFTHEN=(WHEN=(874,3,CH,GE,C'000',AND,877,1,CH,EQ,C' '), OVERLAY=(874:30X)), IFTHEN=(WHEN=(844,3,CH,GE,C'000',AND,847,1,CH,EQ,C' '), OVERLAY=(844:30X)), IFTHEN=(WHEN=(814,3,CH,GE,C'000',AND,817,1,CH,EQ,C' '), OVERLAY=(814:30X)), IFTHEN=(WHEN=(784,3,CH,GE,C'000',AND,787,1,CH,EQ,C' '), OVERLAY=(784:30X)), IFTHEN=(WHEN=(754,3,CH,GE,C'000',AND,757,1,CH,EQ,C' '), OVERLAY=(754:30X)), IFTHEN=(WHEN=(724,3,CH,GE,C'000',AND,727,1,CH,EQ,C' '), OVERLAY=(724:30X)), IFTHEN=(WHEN=(694,3,CH,GE,C'000',AND,697,1,CH,EQ,C' '), OVERLAY=(694:30X)), IFTHEN=(WHEN=(664,3,CH,GE,C'000',AND,667,1,CH,EQ,C' '), OVERLAY=(664:30X)), IFTHEN=(WHEN=(634,3,CH,GE,C'000',AND,637,1,CH,EQ,C' '), OVERLAY=(634:30X)), IFTHEN=(WHEN=(604,3,CH,GE,C'000',AND,607,1,CH,EQ,C' '), OVERLAY=(604:30X)), IFTHEN=(WHEN=(574,3,CH,GE,C'000',AND,577,1,CH,EQ,C' '), OVERLAY=(574:30X)), IFTHEN=(WHEN=(544,3,CH,GE,C'000',AND,547,1,CH,EQ,C' '), OVERLAY=(544:30X)), IFTHEN=(WHEN=(514,3,CH,GE,C'000',AND,517,1,CH,EQ,C' '), OVERLAY=(514:30X)), IFTHEN=(WHEN=(484,3,CH,GE,C'000',AND,487,1,CH,EQ,C' '), OVERLAY=(484:30X)), IFTHEN=(WHEN=(454,3,CH,GE,C'000',AND,457,1,CH,EQ,C' '), OVERLAY=(454:30X)), IFTHEN=(WHEN=(424,3,CH,GE,C'000',AND,427,1,CH,EQ,C' '), OVERLAY=(424:30X)), IFTHEN=(WHEN=(394,3,CH,GE,C'000',AND,397,1,CH,EQ,C' '), OVERLAY=(394:30X)), IFTHEN=(WHEN=(364,3,CH,GE,C'000',AND,367,1,CH,EQ,C' '), OVERLAY=(364:30X)), IFTHEN=(WHEN=(334,3,CH,GE,C'000',AND,337,1,CH,EQ,C' '), OVERLAY=(334:30X)), IFTHEN=(WHEN=(304,3,CH,GE,C'000',AND,307,1,CH,EQ,C' '), OVERLAY=(304:30X)), IFTHEN=(WHEN=(274,3,CH,GE,C'000',AND,277,1,CH,EQ,C' '), OVERLAY=(274:30X)), IFTHEN=(WHEN=(244,3,CH,GE,C'000',AND,247,1,CH,EQ,C' '), OVERLAY=(244:30X)), IFTHEN=(WHEN=(214,3,CH,GE,C'000',AND,217,1,CH,EQ,C' '), OVERLAY=(214:30X)), IFTHEN=(WHEN=(184,3,CH,GE,C'000',AND,187,1,CH,EQ,C' '), OVERLAY=(184:30X)), IFTHEN=(WHEN=(154,3,CH,GE,C'000',AND,157,1,CH,EQ,C' '), OVERLAY=(154:30X)), IFTHEN=(WHEN=(124,3,CH,GE,C'000',AND,127,1,CH,EQ,C' '), OVERLAY=(124:30X)), IFTHEN=(WHEN=(094,3,CH,GE,C'000',AND,097,1,CH,EQ,C' '), OVERLAY=(094:30X)), IFTHEN=(WHEN=(064,3,CH,GE,C'000',AND,067,1,CH,EQ,C' '), OVERLAY=(064:30X)) SORT FIELDS=COPY OUTFIL FNAMES=SORTOUT, OUTREC=(1,4,5,59, 64,870,SQZ=(SHIFT=LEFT,MID=C' ')) Best regards. Max -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Inquiry about extracting and counting msgid from operlog using sort program
Dear Kevin, Thank you very much for your time and effort to help me find useful tools for log analysis. I appreciate your detailed and informative response. I will try each of the tools you suggested and see which one works best for me. By the way, I have a question about IBM Z Operational Log Analytics and IBM Z Anomaly Analytics with Watson. Are these tools free or do they require a license fee? How can I get access to them if I want to try them out? Thanks a lot! Jason Cai == Found it. The tool that should do what you want, with a bit of figuring out the syntax of the JCL, is https://github.com/IBM/IBM-Z-zOS/tree/main/zOS-Tools-and-Toys/msglg610. Among other things, given a syslog, it will print out the number of times each message ID appears in the syslog. Note that this is provided with absolutely no support or warranty or anything else from IBM. And I would urge you to look at one of the other log monitoring tools, so you’re not having to do all the monitoring / analysis yourself. -- Kevin McKenzie External Phone: 845-435-8282, Tie-line: 8-295-8282 z/OS Test Services - Test Architect, Provisioning z/OS Hardware/Software Interlock From: IBM Mainframe Discussion List on behalf of Kevin Mckenzie Date: Thursday, July 27, 2023 at 12:12 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [EXTERNAL] Re: Inquiry about extracting and counting msgid from operlog using sort program Hi, Jason. If all you’re looking to do is summarize log data, I can give you some options, at least. There was/is a tool that Kevin Kelley, since retired, wrote to help clients do log analysis that would do exactly what you want, on platform, in batch; I’m trying to find it again. It was available on testcase.boulder.ibm.com, and may well still be there in some subdirectory; I’ll spend a bit of time searching for it again. Links to it have apparently been lost. I believe it was mentioned in some Redbooks as well. If I can find it, I’ll put it in the z/OS github repository. It was intended to help clients do message suppression and the like. I have a python library, zoslogs (https://pypi.org/project/zoslogs/ ), that I built to do very basic log parsing. So if you wanted to, you could use it as a basis for something like what you’re trying to do; you at least wouldn’t have to worry about doing the initial parsing yourself. There are some tools that might give you an easier interface to gather the syslog data, such as the z Common Data Provider, or the z/OSMF REST API. I believe zoau does something similar. There are also things like IBM Z Operational Log Analytics and IBM Z Anomaly Analytics with Watson that will do realtime/almost realtime analysis of the logs for you, and try to warn you about potential issues. As others said, however, I don’t think using something like DFSORT will meet your needs, without a lot of work. At the least I’d suggest using a pre-processing tool to handle the initial log parsing before you sort/summarize the data. -- Kevin McKenzie External Phone: 845-435-8282, Tie-line: 8-295-8282 z/OS Test Services - Test Architect, Provisioning z/OS Hardware/Software Interlock -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Inquiry about extracting and counting msgid from operlog using sort program
Dear Max I am writing to you regarding two questions that I have. The first question is about how to monitor and alert the system issues. We can monitor most of the issues and send alerts to our phones. However, when we cannot provide a complete list of msgids to the monitoring system, some critical alerts may be missed. How can we minimize the missing of critical alerts and also reduce the false alarms? This is our biggest challenge. We want to analyze the operlog every day to find out if there are any potential risks in the system and also to locate the problem when it occurs. I wonder how your shop handles this situation. The second question is a simplified one. Can dfsort delete the last word if the first position is M and the last word is a number? I appreciate your time and attention. Sincerely, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Inquiry about extracting and counting msgid from operlog using sort program
Dear Massimo and Kolusu, Thank you for your help. I got the results I wanted. The results are as follows. MSGID NUMREC $HASP000 20 $HASP001 10 .. >DISTINCT COUNT: 530 I also appreciate Kevin McKenzie's reply. The reason why I counted how many times each unique msgid appeared in a day is to compare today's operlog with yesterday's operlog and see which msgids are new and which ones increased more than yesterday, such as by 30%. I got a list of msgids that need special attention. I used this list to extract the specific content of today's OPERLOG to find out the possible risks of the system in time. I have two questions: 1.The first question is whether there is a better way or tool to analyze operlog. 2. The second question is whether sort can delete the numbers marked by line breaks in the multi-line records of MSGID to facilitate deduplication of multiple lines. See the information below: •M 0090 HZS0002E CHECK 423 •E... 423 0090 IXCH0602E The sysplex couple data set has insufficient The second line 423 indicates a line break of the first line 423.. I want to delete 423 of the first line. REXX processing is very easy but too slow because my operlog for one day is very large. Can sort or other tools handle it? Any suggestions is greatly appreciated Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Inquiry about extracting and counting msgid from operlog using sort program
Dear All, I am writing to inquire about how to use the sort program on the mainframe to extract and count msgid from a day's operlog. I would appreciate your guidance and advice on this matter. Msgid is a keyword that identifies system messages. It usually consists of 7 letters and a number, such as IEA001I or CSV003E. However, some msgid may have up to 10 characters. I need to extract all msgid from the operlog, and remove any duplicates. Then, I need to count the number of occurrences of each msgid and generate a report. I have tried to use the following statement to extract msgid, and it seems to work well. However, I am not sure if there is anything missing or if it can be written more simply. SORT FIELDS=(58,7,CH,A) INCLUDE COND=((58,7,SS,NE,C' ',AND, 65,1,CH,EQ,C' ',AND, (63,1,SS,EQ,C'0,1,2,3,4,5,6,7,8,9'),AND, (64,1,SS,EQ,C'ABCDEFGHIJKLMNOPQRSTUVWXYZ')),OR, (58,8,SS,NE,C' ',AND, 66,1,CH,EQ,C' ',AND, (64,1,SS,EQ,C'0,1,2,3,4,5,6,7,8,9'),AND, (65,1,SS,EQ,C'ABCDEFGHIJKLMNOPQRSTUVWXYZ')),OR, (58,9,SS,NE,C' ',AND, 67,1,CH,EQ,C' ',AND, (65,1,SS,EQ,C'0,1,2,3,4,5,6,7,8,9'),AND, (66,1,SS,EQ,C'ABCDEFGHIJKLMNOPQRSTUVWXYZ')),OR, (58,10,SS,NE,C' ',AND, 68,1,CH,EQ,C' ',AND, (66,1,SS,EQ,C'0,1,2,3,4,5,6,7,8,9'),AND, (67,1,SS,EQ,C'ABCDEFGHIJKLMNOPQRSTUVWXYZ')) But I do not know how to count the number of occurrences of each msgid and eliminate duplicates. Thank you for your time and attention. Sincerely, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
which configuration members were used when a zos system ipl
Hi all I need to know which configuration members were used when a zos system IPL, of course I can confirm them one by one with my eyes, is there any other way to find them faster such as tools, rexx code and what good ideas. Any suggestions are greatly appreciated. Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
A question about IXGLOGR and RRS CPU usage
Dear all, I have a question about IXGLOGR and RRS CPU usage that I hope you can help me with. Due to a large number of transactions that update DB2 and query DB2 (query transactions from DRDA), the IXGLOGR usage has increased significantly, and the RRS allocate logstream offline datasets have also increased significantly, but the RRS CPU usage is not high. Is this normal? I would like to know how to reduce the IXGLOGR CPU usage. Any suggestions are greatly appreciated. Thank you for your time and attention. I look forward to hearing from you soon. Sincerely, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
A question about CPU usage on z/OS
Dear all, I have a question about CPU usage on z/OS that I hope you can help me with. Many years ago, we increased the CPU of a mainframe from one to four, but the batch jobs at night became slower. The explanation at that time was that a batch job could only use one CPU, and the single CPU performance decreased because of the increase to four CPUs. I accepted that explanation at that time. Now, twenty years later, is z/OS still the same that an address space like IXGLOGR can only use one CPU at most? Thank you for your time and attention. I look forward to hearing from you soon. Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IEF211I
Hi Kolusu Thanks for your reply ! We will print this smf type today. Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IEF211I
HI Shmuel DSN is an alias name(a loadlib dataset). Could you tell me how to find which another user reserved this alias? Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
IEF211I
Hi all Production job gets this message - IEF211I jobname [procstep] stepname ddname[+ xxx] - DATA SET RESERVATION UNSUCCESSFUL Could you tell us which SMF type could diagnose this problem? Thanks a lot Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Is there any way to reserve a primer DASD or a secondary DASD?
Hi all We want to do some testing for MIH and DASD Long Busing. Is there any way to reserve a primer DASD or a secondary DASD? Any suggestions are highly appreciated! Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Whether MSGFLD handle IOS050I,SUP(NO) in MPFLST.
Hi all IOS050I is defines in MPFLST as below: IOS050I,SUP(NO) IOS050I is defines in MSGFLD as below: SPECIFIC MSGTHRESH=50,MSGLIMIT=20,INTVLTIME=1 SPECIFIC SYSIMTIME=0.25 SPECIFIC MSGIMTIME=0.25 MSG IOS050I NOLOG,NOAUTO,NODISPLAY,NORETAIN,NOIGNORE Could you tell us whether MSGFLD will handle ISO050I message or not ? What is diffenent for MSGFLD between SUP(YES) and SUP(NO) msgid in MPFLST? Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
how long will wait to vary the bad path offline
Hi all We had a situation with a bad FICON Director that resulted in a huge performance impact due to the default way that z/OS handles error recovery on FICON paths. The symptoms were many (thousands) of IOS050I or IOS051I messages in the task's joblog, followed by IOS001E, IOS2001I, IOS080I, and IOS450E messages. We want to know how long will wait to vary the bad path offline In our shop HIM DASD=00:15,IOTDASD=2,MSGONLY=YES From IBM's manual, Bad paths can encounter elongated recovery times I/O timeout is 15 seconds + 2 retries are performed = 45 seconds Q1. It seems to be 45 seconds. is it correct? Q2 Is there any message which could tell us an I/O started or timeout or interrupt or retry? Q3 How to know whether it is 45 seconds correct or not in operlog or in logrec? Any suggestions are greatly appreciated! !! Thanks a lot! Janson -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
more locks in IRLM
Hi all If there are more locks in IRLM by TRANS, will it make CICS address space or DB2 address space CPU increases or decrease? Any suggestions is great appreciated! Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
How to reconfigure the STP role by HMC or By GDPS
CCB wants to reconfigure the STP role Site1: BPC1,BP01,BP02 Site2:BPC2,BP03,BP04 Current STP role : PTS and CTS are in BPC1 BTS is in BPC2 Arbiter is in BP01 Target STP role: PTS and CTS are in BPC2 BTS is in BPC1 Arbiter is in BP03 The modification of the STP role is currently operated on HMC, and the menu is managed system time. Could we directly modify the role as the target without intermediate transition steps when z/OS and subsystem are running? we are worried about data loss during reconfiguring the STP role will this modification affect the operation of the host? Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: how to IPL z/OS by JCL
Hello Steve Thanks for your help! We have other three questions : Q1. Could we load all z/OS LPARs at the same time? Q2.If the anwser to Q1 is no, how to load the lpar one by one in one script/jcl? Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
how to IPL z/OS by JCL
HI all In our shop, there are many z/OS members with GDPS and SA. we need to logon HMC to IPL z/OS members Could you tell us how to IPL z/OS by JCL or script? Any suggestions are highly appreciated! Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to monitor all red messages
Hello Steve Thanks for your reply! Best Regards, Cai Jin Song -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
How to monitor all red messages
If we want to monitor a special message, we could specify the message-id in SA. Could you tell us how to define all red messages in SA? Any suggestions are highly appreciated! Thanks a lot! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to simplify IODF activation
>I would write an ISPF script using file tailoring to submit 20 jobs, and test >everything very thoroughly before going live. Hello Metz Thanks for your reply! Could you give me a sample for the ISPF script ? Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to simplify IODF activation
> There is a way to activate an IODF in batch. >Look here >https://www.ibm.com/docs/en/zos/2.1.0?topic=string-activate-production-iodf >for an example. >You can create a file with this job and use ftp to run it on all of your >systems. Hello Gadi Thanks for your reply! Could you give me a sample FTP JCL to submit the activating IODF JCL? I have an other question: How to verify whether the activating IODF JOB is successful or not after it is submitted? Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
How to simplify IODF activation
Hi all In our shop, there are more than 20 single image systems. When we want to activate a production IODF, we have to logon to these 20 systems. Could we logon to one z/OS system to submit JOBs to activate the IODF for these 20 systems. Any suggestions are greatly appreciated!!! Thanks a lot! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to get APAR number
Thanks all for your suggestions! If we have a lot of PTF numbers,is there any way to get APAR numbers relation to these PTFs quickly? Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
How to get APAR number
Hi all If we know a PTF number, how to get the APAR number relation to the PTF number ? Any suggestion is greatly appreciated! Thanks a lot ! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
is there any document for using shopz
Hi all I just am authorized to access IBM shopz. I had never accessed IBM shopz before. Is there any document about how to order production or PTF by shopz. Any suggestion is greatly appreciated! Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: HOW to use dfsort to replace these dates and times with BLANK
Hello Kolusu and all I will sent you the real input with DCB on Monday .The input is in our z/OS . I couldn’t download it at home. When we compare two syslog from the same system for different days ,we find there are a lot of dates and times whose position from 58 to 133 in syslog. Before we compare these two syslog, we need to replace the dates and times with blank. We could use bitand to setup some pattern to ignore date and time. using REXX, but the performance is bad for a big syslog. In REXX, pattern could be setup as below : xx/xx/ bitand 001001 The real input : DCB=(RECFM=FBA,LRECL=133) ,the position of date and time is from 58 to 133. because date and time is always variable and which position is not fixed ,we don’t know how to setup some pattern to ignore date and time in syslog using dfsort before we compare them? Rexx really do everything ,but the performance is bad. Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
HOW to use dfsort to replace these dates and times with BLANK
Hi all There are many dates and times in the input. Please see it below input === 06/28/2018 2018.17 AA 18:07:46.51 BB 06/28/2019 16:07:46.50 = The issue is that the position of date and time isn't fixed. at the same time, the value of time and date is variable. We hope to use dfsort to replace these dates and times with BLANK to get the following output. output AA BB = We are migrating z/OS from 2.2 to 2.3 . Any suggestions are highly appreciated! Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to use dfsort to filter keywords that aren't fixed position
Hello Steve Log Analysis Program is free? Could you tell us where we could download it? I could not find the download website for it. Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to use dfsort to filter keywords that aren't fixed position
E B1 MR000 CUK118179 16:08:04.53 AWRK08 0090$HASP636 A2A2 DR B2B2 DR C2C2 ER D2D2 - Question 2 : Because the number of lines in a multi-line message is variable,could you help us to compare the operlog(2) with the operlog(3) to get the operlog(4) The compare's 'key' is also the position from 58 to 133. operlog(4): 120 58 133 +--+-.---+ N 4008000 CUK1 18179 16:08:06.12 STC00389 0090 AOF869I A3A3A3 N 800 CUK1 18179 16:33:58.48 0090 DSI064A A4A4A4A4 S B4B4B4B4 S C4C4C4C4 - Question3: If the number of lines in a multi-line message is fixed, the manual tells us how to merge multiple lines into a single line? Because the number of lines in a multi-line message is actually variable, Could you help us to use ICETOOL operator RESIZE to merge multiple lines into a single line for operlog(2) and operlog(3). After merging multiple lines into a single line for operlog(2) and operlog(3), we could compare them. Question4 : After comparing them , how to split a single line into multiple lines? Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to use dfsort to filter keywords that aren't fixed position
Hello Kolusu Q1 How to use DFSORT to select the first duplicate of multi-line messages in Syslog Below are multi-line messages from SYSLOG (PUSH=(140:ID=9)) INPUT Organization . . . : PSRecord format . . . : FB Record length . . . : 149 == N 800 CUK1 18179 16:07:46.47 0090 DSI556I DSILOG : VSAM DATASET 'OPEN' COMPLETED, DDNAME = 'DSILOGP' 1 S RETURN CODE = X'00', ACB ERROR FIELD = X'00' 1 N 800 CUK1 18179 16:07:46.50 0090 DSI556I DSILOG : VSAM DATASET 'OPEN' COMPLETED, DDNAME = 'DSILOGS' 2 S RETURN CODE = X'00', ACB ERROR FIELD = X'00' 2 N 800 CUK1 18179 16:34:09.58 0090 DSI556I DSILOG : VSAM DATASET 'OPEN' COMPLETED, DDNAME = 'DSILOGS' 3 S RETURN CODE = X'00', ACB ERROR FIELD = X'00' 3 N 800 CUK1 18179 16:34:10.92 0090 DSI556I DSISVRT : VSAM DATASET 'OPEN' COMPLETED, DDNAME = 'DSISVRT' 4 S RETURN CODE = X'00', ACB ERROR FIELD = X'00' 4 == We hope to get the following output == N 800 CUK1 18179 16:07:46.47 0090 DSI556I DSILOG : VSAM DATASET 'OPEN' COMPLETED, DDNAME = 'DSILOGP' 1 S RETURN CODE = X'00', ACB ERROR FIELD = X'00' 1 N 800 CUK1 18179 16:07:46.50 0090 DSI556I DSILOG : VSAM DATASET 'OPEN' COMPLETED, DDNAME = 'DSILOGS' 2 S RETURN CODE = X'00', ACB ERROR FIELD = X'00' 2 N 800 CUK1 18179 16:34:10.92 0090 DSI556I DSISVRT : VSAM DATASET 'OPEN' COMPLETED, DDNAME = 'DSISVRT' 4 S RETURN CODE = X'00', ACB ERROR FIELD = X'00' 4 == Q2. How to use DFSORT to compare two the Syslog depending on multi-line messages. The first input: == N 800 CUK1 18179 16:07:46.47 0090 DSI556I DSILOG : VSAM DATASET 'OPEN' COMPLETED, DDNAME = 'DSILOGP' 1 S RETURN CODE = X'00', ACB ERROR FIELD = X'00' 1 N 800 CUK1 18179 16:07:46.50 0090 DSI556I DSILOG : VSAM DATASET 'OPEN' COMPLETED, DDNAME = 'DSILOGS' 2 S RETURN CODE = X'00', ACB ERROR FIELD = X'00' 2 N 800 CUK1 18179 16:34:10.92 0090 DSI556I DSISVRT : VSAM DATASET 'OPEN' COMPLETED, DDNAME = 'DSISVRT' 4 S RETURN CODE = X'00', ACB ERROR FIELD = X'00' 4 == The second input : == N 800 CUK1 18179 16:34:10.92 0090 DSI556I DSISVRT : VSAM DATASET 'OPEN' COMPLETED, DDNAME =
Re: How to use dfsort to filter keywords that aren't fixed position
Hello Kolusu and all There are many duplicates multi-line messages in Syslog Could you tell us: 1 How to use DFSORT to select the first duplicate of multi-line messages in Syslog 2. How to use DFSORT to compare two the Syslog depending on multi-line messages. Thanks a lot! Jason Cai Sri h Kolusu wrote on 12/21/2021 13:54: >> I would like to ask one extension to this, if you please. I would like >> to be able to further screen the syslog by Jobname, but knowing that >> there could be multiple job numbers, I would need a way to capture >> those, too. >> > Billy, > > It is quite simple. The $HASP373 message contains the jobname and job > number which can be written to the output file quite easily. > >> So in using this example, I would want to see HASM* messages, but only >> if they were in any job ABCDE123. If so, it would be great to see all >> the ABCDE123 messages, but I suspect that this is now a two-step job of >> some kind. >> > It can be done using JOINKEYS. in a single step. Here is a sample job that > extracts a particular job which issued the message IEC988I > > //STEP0100 EXEC PGM=SORT > //SYSOUT DD SYSOUT=* > //INA DD DISP=SHR,DSN=Your.Input.FBM.133.LRECL.SYSLOG > //INB DD DISP=SHR,DSN=Same.Input.FBM.133.LRECL.SYSLOG > //SORTOUT DD SYSOUT=* > //SYSINDD * >OPTION COPY >JOINKEYS F1=INA,FIELDS=(39,8,A)$ Jobid >JOINKEYS F2=INB,FIELDS=(39,8,A)$ Jobid >REFORMAT FIELDS=(F1:1,141) >INCLUDE COND=(134,8,CH,EQ,C'ABCDE123') >INREC BUILD=(1,133) > /* > //JNF1CNTL DD * >INCLUDE COND=(58,8,CH,EQ,C'IEC988I') >INREC PARSE=(%01=(ABSPOS=66,ENDBEFR=C',',FIXLEN=8)), >OVERLAY=(134:%01) > /* > //JNF2CNTL DD * >INCLUDE COND=(58,8,CH,EQ,C'$HASP373') > /* > > > if you need further help, please send me a sample input file and rules to > extract the data, and I will come up with a solution. > > Thanks, > Kolusu > > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to use dfsort to filter keywords that aren't fixed position
Thanks for Kolusu and Massimo's help We used the following JCL to filter 'CHECK' and 'ERROR' keywords. It is fine. Is there an easy way to filter many keywords if we have many keywords? For example: Can we put these keywords in a dataset? Thanks a lot! Jason Cai --- OPTION VLSCMP INREC IFTHEN=(WHEN=GROUP, BEGIN=(21,5,CH,GT,C' '), $ IF DATE IS > ' ' PUSH=(140:ID=9)) SORT FIELDS=COPY OUTFIL FNAMES=SORTOUT OUTFIL FNAMES=CHECK,INCLUDE=(1,137,SS,EQ,C'CHECK') OUTFIL FNAMES=ERROR,INCLUDE=(1,137,SS,EQ,C'ERROR') copy ERROR and CHECK output to ERRORA //ST005 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //ERROR DD DSN=IBMUSER.LOG.ERRORA,DISP=SHR //ALL DD DSN=IBMUSER.LOG.ALL,DISP=SHR //SORTOUT DD DSN=IBMUSER.LOG.OK, // DISP=(,CATLG), // SPACE=(TRK,(300,300)) //SYSIN DD * JOINKEYS F1=ERROR,FIELDS=(140,9,A),SORTED JOINKEYS F2=ALL,FIELDS=(140,9,A),SORTED REFORMAT FIELDS=(F2:1,137,F2:140,9) SORT FIELDS=COPY /* -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to use dfsort to filter keywords that aren't fixed position
Thanks for Martin, Massimo, and Kolusu's help As Massino mention that a multiline WTO cannot be interrupted, we need to handle multiline messages in OPERLOG or SYSLOG that cannot be interrupted. for IBM manul Each SYSLOG record is prefaced by a two-character record type field. Valid first characters are: N - single-line message W - single-line message with reply WTOR messages are not processed by Message Flood Automation. M - first line of a multi-line message Message Flood Automation can only react to the first line of a multiline message, not to any of the label, data or end lines L - multi-line message label line D - multi-line message data line E - multi-line message data/end line S - continuation of previous line O - LOG command input X - non-hardcopy or LOG command source There are at least three kinds of groups. 1. N single-line message INREC IFTHEN=(WHEN=GROUP,BEGIN=(2,1,CH,EQ,C'N'), END=(2,1,CH,EQ,C'N') 2. M - first line of a multi-line message INREC IFTHEN=(WHEN=GROUP,BEGIN=(2,1,CH,EQ,C'M'), END=(2,1,CH,EQ,C'E') 3. S - continuation of previous line INREC IFTHEN=(WHEN=GROUP,BEGIN=(2,1,CH,EQ,C'N'), END=(2,1,CH,EQ,C'S') for example: N C00 CUK1 18179 16:07:33.83 0090 HSAM5400I HISTO N C00 CUK1 18179 16:07:33.85 0090 HSAM1003I ARM R S TYPE=HSAMGR RES If we put them together, the output isn't what we need. Please see the following statement. OPTION VLSCMP INREC IFTHEN=(WHEN=GROUP,BEGIN=(2,1,CH,EQ,C'M',OR,2,1,CH,EQ,C'N'), END=(2,1,CH,EQ,C'E',OR,2,1,CH,EQ,C'S',OR,2,1,CH,EQ,C'N'), PUSH=(140:ID=9)) Could you help us to handle multiline messages in syslog by dfsort ? Any suggestions are greatly appreciated! Thanks a lot! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
How to ignore dates and times depend on their format before comparing them
Dear all After I issue DISPLAY commands,I want to compare the output of commands. The output should have the current date and time. before comparing them,I want to ignore these dates and times. For a kind of DISPLAY command (for example display omvs,o),I could know where the dates and times are. I could write a rexx to ignore it. In this way I need to write a lot rexx for each DISPLAY command depend on their position. Is these any way to ignore these dates and times depend on their format (-MM-DD and HOUR.MINUTES.SECOND)? Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: how to compare active parameter with the parameter in member
Dear ITschak It is great that you do that in your production! I couldn't find Lionel Dyke's IPLINFO,could you tell where I can down it? You are right that we need to parse the the output from the display and compare same value in the parmlib. I know some Python . In Python we could define dictionary(key:value). The token you mean key and value? Could you share any code snips for parse and compare part ? Thanks a lot! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: how to compare active parameter with the parameter in member
Dear all You gave me many good ideas,many thanks! We want to develop this tool to compare them. Depend on system and subsystem,we could issue many D or $D command. Because there are mash of these output and the format of output is different with the parmlib members,how to compare them quickly? Is there any good way to convert output of command to the format of the parmlib members? Thanks! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
how to compare active parameter with the parameter in member
Hi all After some paramters were changed dynamically , these paremeters didn't be changed in members . Next IPL, we will lost these changes. Is there any way to compare active parameters with the parameters in members? Any thoughts/comments/suggestions would be greatly appreciated Best Regards, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: part of TSO commands are no RESPONSE from PGM=IKJEFT01
Hi The part of output is correct. the others of output is empty. Whether there are a lot of XQUERY in one job? Best Regards, Jason Cai From: Hobart Spitz Date: 2019-03-25 21:14 To: IBM-MAIN Subject: Re: part of TSO commands are no RESPONSE from PGM=IKJEFT01 I think you need to give us some more information. I'm not familiar with XQUERY and it's quirks. What kind of response are you expecting? Is the output dataset empty? That said, it's been so long since I've run anything in batch without REXX I don't recall if vanilla TSO reports non-zero return codes. You may want to find/tweak a mainframe version of REXXTRY, and add PARM=REXXTRY to your EXEC. Be sure to have a SYSEXEC DD for the library where you put REXXTRY. In addition to return code reporting REXXTRY let's you use most REXX features. E.g., you can set a variable to the DSN and/or VOL if the change between runs. Put your commands in quotation marks, and follow REXX syntax. It looks like you might benefit from writing a batch REXX EXEC to do that work. See these documents for more information. e741ba69-356d-4ffc-84dd-91ae1e883fb1.pdf <https://drive.google.com/file/d/1A3ZvcyAgh3reW0x0bGvSnkeB_7FXZNgX/view?usp=drivesdk> Modernizing z/OS Batch Processing <https://docs.google.com/document/d/1vwE-dAyxHg-PEXAZl1Odbf6-QWwA22a1GoSPlkJL5rI/edit?usp=drivesdk> On Sun, 24 Mar 2019, 8:43 pm Jason Cai, wrote: > > Hi all > > We issue a lot of TSO commands ( XQUERY NP2XRE DATASET('XXX.TST') > DISP(MOD) VOLUME(BJ2817) DETAIL ) > > by PGM=IKJEFT01 .The sample is blow: > > //S1EXEC PGM=IKJEFT01,REGION=0M > //SYSTSPRT DD SYSOUT=* > //SYSPRINT DD SYSOUT=* > //SYSTSIN DD * > XQUERY NP2XRE DATASET('XXX.TST') DISP(MOD) VOLUME(BJ2817) DETAIL > XQUERY NP2XRE DATASET('xxx.TST') DISP(MOD) VOLUME(BJ2897) DETAIL > XQUERY NP2XRF DATASET('xxx.TST') DISP(MOD) VOLUME(BJ2917) DETAIL > > > We found there are just part of this commands responsed. > > > > Any thoughts/comments/suggestions would be greatly appreciated > > > > > > Best Regards, > Jason Cai > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Moving a Catalog to a Different Volume
Hi all According z/OS DFSMS Managing Catalogs manual,we could move a Catalog to a Different Volume using the following key JCL. //NEWVOL EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=A //SYSINDD * IMPORT INDATASET(CATBACK.ICFCAT.USER.VSYS303) - OUTDATASET(ICFCAT.USER.VSYS303) - OBJECTS((ICFCAT.USER.VSYS303 - VOLUMES(SYSNEW))) - ALIAS - LOCK /* My question: 1. If we find any error in the catalog in the new volume(SYSNEW),How to recovery the catalog to the Original volume ? 2. before and after we will listc the catalog list,how to compare the two output of listc catalog to confirm that the original catalog in the old volume is the same as the catalog in new volume Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: part of MVS commands are no RESPONSE from REXXCDM
I try to get the output of these mvs commands and save these output to a DSN. Best Regards, Jason Cai From: Steve Beaver Date: 2019-03-25 09:38 To: IBM-MAIN Subject: Re: part of MVS commands are no RESPONSE from REXXCDM Have you tried to open a console? Sent from my iPhone Sorry for the finger checks > On Mar 24, 2019, at 20:35, Jason Cai wrote: > > Hi all > > We issue a lot of mvs commands ( RO *all,D U,x) by REXXCMD(REXX program) > > We found there arejust part of this commands responsed. > > > Is there any way to solve this problem? increase the time interval between > each command? > > or use PGM=SDSF? > > Any thoughts/comments/suggestions would be greatly appreciated > > Thanks a lot! > > Jason Cai > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
part of TSO commands are no RESPONSE from PGM=IKJEFT01
Hi all We issue a lot of TSO commands ( XQUERY NP2XRE DATASET('XXX.TST') DISP(MOD) VOLUME(BJ2817) DETAIL ) by PGM=IKJEFT01 .The sample is blow: //S1EXEC PGM=IKJEFT01,REGION=0M //SYSTSPRT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSTSIN DD * XQUERY NP2XRE DATASET('XXX.TST') DISP(MOD) VOLUME(BJ2817) DETAIL XQUERY NP2XRE DATASET('xxx.TST') DISP(MOD) VOLUME(BJ2897) DETAIL XQUERY NP2XRF DATASET('xxx.TST') DISP(MOD) VOLUME(BJ2917) DETAIL We found there are just part of this commands responsed. Any thoughts/comments/suggestions would be greatly appreciated Best Regards, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
part of MVS commands are no RESPONSE from REXXCDM
Hi all We issue a lot of mvs commands ( RO *all,D U,x) by REXXCMD(REXX program) We found there arejust part of this commands responsed. Is there any way to solve this problem? increase the time interval between each command? or use PGM=SDSF? Any thoughts/comments/suggestions would be greatly appreciated Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Each alias belongs which storage group
Yes we assign Storage Groups based on aliases in your ACS routines. Because there are so many alias in our system,is there a way to get the relationship by batch? Thanks a lot! Best Regards, Jason Cai There is no relationship between aliases and Storage Groups, unless you assign Storage Groups based on aliases in your ACS routines. Check your ACS SG routine. Kees. > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Jason Cai > Sent: 05 December, 2018 9:44 > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Each alias belongs which storage group > > Hi all > > There are many catalog in our shop. There are also many alias in each > catalog. > > Could you tell how to know each alias belongs to which storage group ? > > Thanks a lot! > > Jason Cai > > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
how to get the address and size(cylinders) for each volume
Hi all Is there a utility to get the address and size(cylinders) for each volume? Thanks a lot! Best Regards, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Each alias belongs which storage group
Hi all There are many catalog in our shop. There are also many alias in each catalog. Could you tell how to know each alias belongs to which storage group ? Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: descriptor code for iplcheck
Hi Steve and all Could you give us a sample program in REXX or assemble how to extract descriptor code by MDBG Thanks a lot! Best Regards, Jason Cai From: Steve Horein Date: 2018-11-08 20:44 To: IBM-MAIN Subject: Re: descriptor code for iplcheck https://www.ibm.com/support/knowledgecenter/SSLTBW_2.2.0/com.ibm.zos.v2r2.iead300/iead300611.htm "MDBCDESC" On Thu, Nov 8, 2018 at 1:44 AM Jason Cai wrote: > > > Hi all > > > https://www.ibm.com/support/knowledgecenter/SSLTBW_2.2.0/com.ibm.zos.v2r2.ieam100/iea3m1_Messages_sent_to_hardcopy_log_in_JES2_system.htm > > tcrrr sysname yyddd hh:mm:ss.th ident msgflags messaget :The first > character on the line indicates the record typeI make a mistake,so I post > it again. > In the above LINK you gave us,we could find Routing Code in oplerlog ,but > we couldn't find descriptor code. > > any IBM message has Routing Code and Descriptor Code shown below > ADY016E DATA SET ndsn, DOES NOT MATCH THE CURRENT SHARED DAE DATA SET: > > Routing Code: 1,2 > Descriptor Code: 3 > > Could you tell us Where we could find the descriptor code in oplerlog? > Thanks a lot! > > > > > Best Regards, > Jason Cai > > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: filter program
Hi all and John Below is the PS from SYSLOG M C04 ADCD113 18123 14:03:50.83 0090 $HASP478 D 112 0090 E 112 0090 N C04 ADCD113 18123 14:03:50.87 0090 *$HASP493 N C04 ADCD113 18123 14:03:50.87 0090 $HASP537 N 000 ADCD113 18123 14:03:51.20 0281 IEF196I I N 000 ADCD113 18123 14:03:51.33 0281 IEF196I I=The first character on the line indicates the record type: M:First line of a multiple-line message.D:Data line of a multiple-line message; this line may be the last line of the message.E:End line or data-end line of a multiple-line messageN:Single-line message that does not require a reply. We want to extract some important messages from syslog or operlog by filter MSGID If we use SORTs Or "ISREDIT find",we don't know how to extract multiple-line message Could you tell us how to use SORTs can extract on 'anything' using control cards or "ISREDIT find" any suggestions is very appreciated Best Regards, Jason Cai From: John Kelly Date: 2018-11-09 02:46 To: IBM-MAIN Subject: Re: filter program Since the various SORTs can extract on 'anything' using control cards, maybe that would give you the PS file(s) required? On Thu, Nov 8, 2018 at 2:12 AM Paul Gilmartin < 000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > On Wed, 7 Nov 2018 17:21:42 +0800, Jason Cai wrote: > > > > When we use filter command in oplerlog to show the messages that we want > ,it is very convenient. > > > >for example: > > > >filter msgid=IEF* or filter msgid=*E > > > >We want to code a filter program to do it for PS file, could you know how > to code it? > > > >How to make filter program support *? > > > grep > > ISRSUPC SRCHFOR > > -- gil > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- John Kelly -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: descriptor code for iplcheck
Hi all https://www.ibm.com/support/knowledgecenter/SSLTBW_2.2.0/com.ibm.zos.v2r2.ieam100/iea3m1_Messages_sent_to_hardcopy_log_in_JES2_system.htm tcrrr sysname yyddd hh:mm:ss.th ident msgflags messaget :The first character on the line indicates the record typeI make a mistake,so I post it again. In the above LINK you gave us,we could find Routing Code in oplerlog ,but we couldn't find descriptor code. any IBM message has Routing Code and Descriptor Code shown below ADY016E DATA SET ndsn, DOES NOT MATCH THE CURRENT SHARED DAE DATA SET: Routing Code: 1,2 Descriptor Code: 3 Could you tell us Where we could find the descriptor code in oplerlog? Thanks a lot! Best Regards, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: filter program
Hi This is a good idea. We use ADDRESS ISREDIT to filter the PS . Thanks again! Best Regards, Jason Cai From: retired mainframer Date: 2018-11-08 01:38 To: IBM-MAIN Subject: Re: filter program In ISPF, edit the dataset or file, then X ALL followed by F filter-text ALL > -Original Message- > From: IBM Mainframe Discussion List On > Behalf Of Jason Cai > Sent: Wednesday, November 7, 2018 1:22 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: filter program > > Hi all > > When we use filter command in oplerlog to show the messages that we > want ,it is very convenient. > > for example: > > filter msgid=IEF* or filter msgid=*E > > We want to code a filter program to do it for PS file, could you know how to > code it? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
filter program
Hi all When we use filter command in oplerlog to show the messages that we want ,it is very convenient. for example: filter msgid=IEF* or filter msgid=*E We want to code a filter program to do it for PS file, could you know how to code it? How to make filter program support *? Thanks a lot! Best Regards, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: descriptor code for iplcheck
Hi Steve You are right. I found it . Descriptor Code Type Code 1 W (wait) 2 A (action) or D (decision) 3 E (eventual action) 4 through 10 I (information) 11 E (eventual action) 12 and 13 I (information) Thanks a lot! Best Regards, Jason Cai From: Jason Cai Date: 2018-11-07 09:13 To: IBM-MAIN Subject: Re: descriptor code for iplcheck Hi Steve In the LINK you gave us,we could find Routing Code in oplerlog ,but we couldn't find descriptor code. any IBM message has Routing Code and Descriptor Code shown below ADY016E DATA SET ndsn, DOES NOT MATCH THE CURRENT SHARED DAE DATA SET: odsn Routing Code: 1,2 Descriptor Code: 3 Where we could find the descriptor code in oplerlog? Thanks a lot! Best Regards, Jason Cai From: Steve Horein Date: 2018-11-07 08:45 To: IBM-MAIN Subject: Re: descriptor code for iplcheck Maybe this? https://www.ibm.com/support/knowledgecenter/SSLTBW_2.2.0/com.ibm.zos.v2r2.ieam100/iea3m1_Messages_sent_to_hardcopy_log_in_JES2_system.htm -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: descriptor code for iplcheck
Hi Steve In the LINK you gave us,we could find Routing Code in oplerlog ,but we couldn't find descriptor code. any IBM message has Routing Code and Descriptor Code shown below ADY016E DATA SET ndsn, DOES NOT MATCH THE CURRENT SHARED DAE DATA SET: odsn Routing Code: 1,2 Descriptor Code: 3 Where we could find the descriptor code in oplerlog? Thanks a lot! Best Regards, Jason Cai From: Steve Horein Date: 2018-11-07 08:45 To: IBM-MAIN Subject: Re: descriptor code for iplcheck Maybe this? https://www.ibm.com/support/knowledgecenter/SSLTBW_2.2.0/com.ibm.zos.v2r2.ieam100/iea3m1_Messages_sent_to_hardcopy_log_in_JES2_system.htm -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
descriptor code for iplcheck
Hi all After system IPLed,we want to code rexx program to read syslog to check whether there is any error in the system. We use the following statement to get descriptor code Address SDSF "ISFLOG READ TYPE(OPERLOG)" if word(isfdesccode.ix,jx)='1' and so on === But isfdesccode don't support SYSLOG . Our questions: 1. If we want to process each member,how to get descriptor code from syslog? 2. everyday we backup our operlog, how to get descriptor code from it? any other way to check the system after IPLed. Thanks a lot! Best Regards, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
define a service class in wlm by batch
Hi all Could we define a service class in WLM by batch job? Thanks a lot! Best Regards, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
how to create a mini IPLable system
Hi all If a single image zos system can't be IPLed,we want to IPL other system to rescue it, Could you tell us how to create a mini IPLable system? Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
how to suppress the appliction highlighted console messages
Hi all The application program issue many highlighted messages on the console This shows up on the console as : @MESSAC002A: SIGN-ON We want to SUPPRESS it by the MPF list using: @MESSAC002*,RETAIN(NO),SUP(ALL),AUTO(NO) but it doesn't work,could you tell me how to suppress the appliction highlighted console messages Thanks a lot! Best Regards, Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
migrate from GDPS 3.12 to GDPS metro 4.1.
Hi all We want to migrate from GDPS 3.12 to GDPS metro 4.1. There are two migration procedures: 1. Big Bang migration and 2 Enhanced migration Could you tell us which migration procedure could be chosen to migrate from GDPS 3.12 to GDPS metro 4.1 directly. Is there any relevant migration documentation for reference? Any thoughts/comments/suggestions would be greatly appreciated! Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
arm police
hi all In our shop, DB2 is registered as an element of the automatic restart manage The detailed information is shown below.ELEMENT(elementname) RESTART_METHOD(SYSTERM,STC,'cmdprfx STA DB2,LIGHT(YES)')If we cancel db2 ,db2 will be restarted by arm . We don't hope db2 will be restarted by arm after issuing cancel db2.How to do it? Thanks a lot!Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
ESQA is exhausted
Hi all We found that ESQA is exhausted, it overflow to ECSA.We want to enlarge ESQA and ECSA . Because the common area is enlarged,the private area will be decreased. We wonder whether there is any risk to enlarge common area ? Thanks a lot! Jason Cai -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to reduce batch job's negative impact on the online transaction response time
Our environment : z/OS 1.13 +CICS 4.2(online system) +DB2 10.1 We don't use any web based functions.We aslo use WLM to classify all the service class under which production CICS runs as CPU CRITICAL. problem description: There will be some batch job which will update/insert records in db2 database based on some input from other system during the daytime,the height of on-line processing in the future. We hope the batch job don't impact on online transaction response time,so we maybe meet performance issues or contention issues Questions: 1. Is there anyway to control the batch to use the CPU ? for example :Only 5% cpu could be used by the batch job? 2. If the CPU was used by one batch job,the CICS online tran couldn't got the CPU immediately when the tran need more CPU even the tran with CPU CRITICAL. how to solve this problem. 3.How to solve contention issues Thanks for your help!!! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
How to reduce batch job's negative impact on the online transaction response time
Hi all Our shop is parallel system.We have some batch jobs which have to run in online window. Could you have any good experiences or ideas to reduce the batch job's negative impact on the online transaction response time ? . Thanks a lot! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN