Re: So Long, and Thanks for All the Fish!

Cheryl, Thanks for everything you did for the MF community. I learned so much from you. Enjoy. Max Il giorno dom 8 set 2024 alle ore 22:35 Cheryl Watson < che...@watsonwalker.com> ha scritto: > Hi All, > > I’m about to remove my IBM-Main registration. At 80, with 60 years of > mainframe behind m

Re: Regina rexx translate error

Hi, what version of Regina and platform are you using ? I've "regina: REXX-Regina_3.9.4(MT) 5.00 25 Oct 2021 (64 bit)" on Windows 10 and the command works properly. Best regards. Max Il giorno gio 1 ago 2024 alle ore 09:51 ITschak Mugzach < 05a7ced721d8-dmarc-requ...@listserv.ua.edu> ha scr

Re: DFSORT - Something I can't see.

Sri, it's true, indeed and it's outside of my control (this case I'm not the SYSPROG). Back to your explanation, I do understand DFSORT ... "So VLSHRT tells DFSORT to treat any comparison involving a short field as false." This case anyway I've two conditions in OR, one of the two is true and an

Re: DFSORT - Something I can't see.

Sri, thanks a lot it obviously (now :D) worked. I would have preferred an error. Thanks again. Max Privo di virus.www.avast.com

DFSORT - Something I can't see.

Hi everybody, I'm working on a dataset coming from LISTC LEV something ALL. I want to extract only a subset of records with the following SYSIN: //SYSINDD * *INCLUDE COND=(6,4,CH,EQ,C'DATA')COND #1 *INCLUDE COND=(71,7,CH,EQ,C'TRACKS-')COND #2 INCLUDE COND=(6,4,CH

Re: Inquiry on Powerful Sorting and Query Tools for Linux Platform

Jason, afaik Precisely distributes its own Syncsort product for Linux too. I don't know how many features are "the same" and how effective it is. Max. Privo di virus.www.avast.com

Re: REAL unused available storage

Bill, in BMC AMI for zOS, there're three views named STORAGE, STORAGET and STORAGEZ. In these views you can find "Available CS Frames" with an historical view if you set it up. Best regards. Max

Re: Assistance with Converting IMS DB to MySQL DB

Jason, in addition to all the previous comment, keep attention to the fact that it's not so unusual that programmers redefine fields into a DLI segment (or the entire segment itself) so fields can or can not be what they appear. You should have ALL the old programs accessing DLI data and double c

Re: Mainframe performance tool replacement

In a future software selection do not forget to evaluate EPV too. Best regards. Max Privo di virus.www.avast.com

Re: SYNCSORT question - how to specify different sorting parameters for JOIN input files F1/F2

Hi, AFAIK most of the directive can be used into a JNFxCNTL. For instance, I use INREC and SUM FIELDS as well. When in doubt, try and look at the messages in case of error. I'm pretty sure guys from Precisely could do better with manuals. Best regards. Max

Re: EBCDIC/ASCII - FTP

At some customer I use a java zip tool derived from IBM sample that can convert to a destination (e.g. IBM850, UTF-8 etc.) CCSID on the fly. Of course the whole byte sequence must be zoned character or you'll encounter issues reading file after unzipping at the destination. Best regards. Max

Re: dummy IDCAMS ALTER

Hi, I did a couple of tests. If the VSAM is allocated to CICS I receive a IDC3351I with reason 168 during the VERIFY. As far as I understand, ALTER with no parm does nothing but ensure the file is not allocated to any other user. Hope this helps. Max

Re: Big LPAR vs small LPAR and DataSharing.

. I think about 10-20 % of the total > > address space CPU was used for this CS instruction, because every thread > > was trying to get exclusive access to the field and the instruction had > to > > spin waiting for the buffer. The more CPUs the more spin - and so le

Big LPAR vs small LPAR and DataSharing.

Hi everybody, In a presentation at GSE I saw a slide with a graph about the advantage of having more small sysplex LPARs versus a bigger one. So for instance, it's better to have 5 LPARs with 4 processors than one with 20. There was a sentence: "It doesn't take an extremely large number of CPUs b

Re: Slow FTP's

XMIT??? ... They would probably exceed some limit long before the > transmission begins. > > Regards, > David > > On 2024-03-28 09:57, Massimo Biancucci wrote: > > Dave, > > > > did you try the basic PING and TRACERTE to see if there's anything > > diffe

Re: Slow FTP's

Dave, it becomes more interesting. Could it depend on the file data itself ? Have you tried a BIG file, EBCDIC with mostly the same data inside ? Same kind of transmission, MODE B and EBCDIC. Regards. Max. Il giorno gio 28 mar 2024 alle ore 15:09 Jousma, David < 01a0403c5dc1-dmarc-requ..

Re: Slow FTP's

Dave, did you try the basic PING and TRACERTE to see if there's anything different ? Is it a basic FTP ? SFTP ? FTPS ? Did you try with XMIT through JNE (if available) to measure any difference ? Best regards. Max Il giorno gio 28 mar 2024 alle ore 14:54 Styles, Andy (CIO GS&S - Core Infrastru

Re: CICS suspended wait time increased

Hi, let me joke a bit. A man went to the doctor saying: "Doctor if I use my finger and touch my head I feel pain, if I touch my arm I feel pain, if I touch my chest I feel pain, if I touch my leg I feel pain. What do you think the problem is ?" The doctor: "Your finger is the problem, maybe it's

Re: DFSORT and IPL Date

Jack, AFAIK SORT tools have no such capability. As Scott suggested you need to write yourself something or, only for instance, if you installed Mark Zelden IPLINFO tool you can invoke it and extract the information from its output. Regards Max Il giorno mer 20 mar 2024 alle ore 14:41 Jack Zukt <

Re: DFSORT JOINKEYS problem

Jack, I don't know the exact format of the two files. Did you check (I mean by eyes) the field position are ok ? Is the first SKIP correct ? Best regard. Max Il giorno gio 15 feb 2024 alle ore 16:35 Jack Zukt < 059cd493dd41-dmarc-requ...@listserv.ua.edu> ha scritto: > Hi all, > > I have tw

Re: Generating output in SORT with a time value

Billy, as Sri said there's no way to ask SORT tools to put a different TS on every record. Hereby a "try" to start with an arbitrary TS (in TOD format to generate as you like) and then generate a number of consecutive TS part (HHMMSSuu) with a distance of 1 us. It's a two steps and probably c

Re: SMF Interval

Ed, in my experience 15 minutes for the most. I've seen 10 minutes too. IMHO big SMF DATA producers are DB2, CICS, IMS, MQ etc. with their accounting records that are not SMF Interval related. Choosing a maximum of 15 minutes may be better to correlate issues. Best regards. Max Il giorno ven 29

Re: Inquiry about extracting and counting msgid from operlog using sort program

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 v

Re: Inquiry about extracting and counting msgid from operlog using sort program

Jason, as usually, it depends. About Operlog analysis, it depends on the response-time you need. At different customer sites I use automation product (BMC, IBM, Broadcom) in order to catch specific messages and react asap with specific actions or simply sending SMS/Mail. Some others use external

Re: Inquiry about extracting and counting msgid from operlog using sort program

Jason, you can try this: OPTION VLSCMP INCLUDE COND=(6,1,SS,EQ,C'NXWM',AND, 7,1,CH,EQ,C' ',AND, 64,1,SS,EQ,C'ABCDEFGHIJKLMNOPQRSTUVWXYZ') INREC PARSE=(%00=(ABSPOS=64,ENDBEFR=C' ',FIXLEN=15)), BUILD=(1,4,%00,X'0001') SORT FIELDS=(5,15,BI,A) SUM FIELDS=(20,4,BI) OUTFIL FNAMES=SORTOUT,VTOF,

Re: Cobol question

Rex, at this link you'll find an interesting thread: https://groups.google.com/g/bit.listserv.ibm-main/c/B04G-HasOd4 As somebody (who is at least 30K light years beyond me) probably the right way is to use TIMEUSED macro. It depends on how much you need to rely the info. I recently wrote an assem

SMT usage.

Hi everybody, I'm wondering if anybody of you has configured processor SMT and if has got any measure about any difference (gain ?). Thanks a lot in advance. Max Privo di virus.www.avast

Re: Virtual Storage Manager - LDA.

Have you looked at the documentation for RPTSTG? Have you tried the > process described? > > sas > > > On Wed, Mar 8, 2023 at 5:31 AM Massimo Biancucci > wrote: > > > Thanks to everybody for your support. > > As usual I learnt a lot. > > > > The pro

Re: Virtual Storage Manager - LDA.

Thanks to everybody for your support. As usual I learnt a lot. The problem was (as usual business) between my seat and my keyboard. The PLI FREE statement was not consistent with ALLOCATE. The size of the area to be free was not correct. I thought it was not so important and I was wrong. The manua

Re: Virtual Storage Manager - LDA.

z > > http://mason.gmu.edu/~smetz3 > > > > ____ > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf > > of Massimo Biancucci [mad4...@gmail.com] > > Sent: Friday, March 3, 2023 2:43 PM > > To: IB

Virtual Storage Manager - LDA.

Hi everybody, I've a PLI program who does ALLOCATE and FREE of some based areas in order to build and manage a dynamic tree. I'm debugging a problem where it runs out of memory. To control how much memory it's using I refer to LDA. To be sure I changed the ALLOC and FREE with explicit (via a ASM

Re: Using JCL variables with DFSORT

Jack, as you can see, lots of people try to help. If you want them to better help, include jobs output or similar. Best regards. Max Il giorno ven 4 nov 2022 alle ore 14:58 Sri h Kolusu ha scritto: > >> Is there any conversion function like Rexx C2D()? > Gil, > > As mentioned earlier, DFSORT g

Re: Using JCL variables with DFSORT

Jack, I usually use JCLVAR this way (I think you need at least zOS 2.3 or 2.4): // EXPORT SYMLYST=* // SET EXTNUM=200 //ST010 EXEC PGM=SORT //SYSIN DD *,SYMBOLS=JCLONLY INCLUDE COND=(INP_EXTNTS,GT,&EXTNUM) /* JES should change SYSIN before seeding SORT. Best regards. Max Il giorno gio 3 nov

Re: DFSORT / ICETOOL SPLICE function

Andreas, IFTHEN WHEN=GROUP is your best friend. I think Sri will give you the solution in a while. If he will not, at end of my workday I could try to provide a solution. Best regards. Max Il giorno ven 30 set 2022 alle ore 15:10 Andreas von Imhof < 02ba5d449f94-dmarc-requ...@listserv.ua.edu

Re: Enterprise Cobol 6.3.0, XML PARSE and zIIP usage.

and...@blackhillsoftware.com> ha scritto: > On 30/09/2022 6:15 pm, Massimo Biancucci wrote: > > I don't know how "trivial" can be "trivial". > > It's about 8K in bytes (lot of spaces as usual). > > It comes from a sample I took on the web, four nesting level

Re: Enterprise Cobol 6.3.0, XML PARSE and zIIP usage.

Timothy, I don't know how "trivial" can be "trivial". It's about 8K in bytes (lot of spaces as usual). It comes from a sample I took on the web, four nesting levels eight fields. After your hint I increased the size up to 60K (more entries same style) but nothing changed. Is there any documentati

Enterprise Cobol 6.3.0, XML PARSE and zIIP usage.

Hi everybody, I wrote a simple test program to parse XML. The program has been compiled with Enterprise Cobol 6.3.0 and XMLPARSE(XMLSS) option. I ran the program as a standard batch job and it seems it's not using zIIP processor (one zIIP is available). I had a look at SMF30(4) and all the "zIIP

Re: more locks in IRLM

Jason, your question is really generic and I think you're talking about DB2 locks. To obtain a lock DB2 must use CPU so the more locks the more CPU you need. This usually is related to a workload growth or application change. If the number of locks is quite the same and the number of lock conten

Re: Calculate deltas using DFSORT

Mario, I first tried with WHEN=GROUP but with no success. After that I hopefully succeeded with a JOIN. The main idea is to extract keys from file and number those simply by sequential number. So the STAMPA "view" at ST010 should show something like this: SUGAR100 01 SUGAR97000

Re: DFSORT INCLUDE COND - What am I doing wrong?

...2...{. NOT > LISTED > 09 IDC3014I CATALOG ERROR > > 10 IDC3009I ** VSAM CATALOG RETURN CODE IS 50 - REASON CODE IS > IGG0CLE0-6 > 11 IDC3009I FOR MPG004 > > > The file RECFM is VBA > > Regards > Jack > > On Mon, 29 Aug 2022 at 12

Re: DFSORT INCLUDE COND - What am I doing wrong?

Jack, I tried the same and IDC3014I does not disappear after inserting new OR conditions. A print screen with "cols on" on the first output could be helpful. Best regards. Max. Il giorno lun 29 ago 2022 alle ore 11:53 Jack Zukt ha scritto: > Hi all, > > I am trying to get all the IDC messages

Re: Format SMF records created by SYNCSORT MFX

Gadi, I wrote a REXX that formats most of the relevant fields. I'm not sure it's a so "common need", so contact me offline and I'll be happy to help. Best regards. Max Il giorno mar 26 lug 2022 alle ore 13:16 Gadi Ben-Avi ha scritto: > Hi, > Does anyone know of a, hopefully free, tool that c

Re: DFSORT/ICETOOL

Jack, for sure. I think at a PARSE + SUM FIELDS. Could you please add few records to better understand the data format ? I don't know RMM report, is it fixed or what ? Best regards. Max Il giorno mar 19 lug 2022 alle ore 11:25 Jack Zukt ha scritto: > Hi all, > > I have a file (rmm report) in

Re: AF/OPER replacement with BMC Mainview AutoOperator

Hi, in the past I did several replacement from different Automated Operator to BMC AutoOperator. IMHO, it's a good and reliable product. REXX is fully supported (with some extensions to share data with the main task too). It can react to messages and events, from console and more. Best regards.

Re: mainframe CPU swap

Jake, I don't know your specific configuration. If by DR you mean a BC site with two synchronous disks array (and tape), most of the customer I know periodically swap primary and secondary site. If DR is an offline (asynchronous) site maybe tests could have been performed less often then the numbe

SMF 64 parsing with SORT.

Hi everybody, some people asked me to share the SORT I use to evaluate the "need or use" of ACCBIAS. It's not so sophisticated and it could be better, anyway here it is. The output can be simply imported in Excel. Best regards. Max //youjobc JOB 000,J48017,CLASS=A,MSGCLASS=5, // C

Re: IBM BLSR subsystem

Hi, we changed many JCLs using " AMP=('ACCBIAS=DO')" and succeded in CPU and elapsed time reduction (up to 50% in few cases). We used SMF64 to choose the best candidates. If needed, I can share a simple SORT step to convert SMF64 to "readable" CSV file. Best regards. Max Il giorno lun 16 mag 20

Re: zEDC compression on z14 and z15 by using ADRDSSU

Renato, we've not faced this kind of behaviour. Is it generally visible ? You can look at SMF30 records and find out where the CPU usage is. Counter data and zEDC statistics usage sections could help. Best regards. Massimo

Re: Gzip for zOS

Peter, if I well understood, guys not paying can install such tool under miniconda environment (last entry on list). Look at it for further infos. Best regards. Max Il giorno gio 10 mar 2022 alle ore 09:30 Peter ha scritto: > Hello > > I am trying to download gzip for zOS in rocket software w

Re: CICS/TS 4.1 3270 question

John, in the past I saw something similar. That time it was a "magic binary string" application sent to the terminal. It was a kind of "dirty character" into a DB. Hope this helps. Max. Il giorno gio 10 feb 2022 alle ore 15:57 John McKown < john.archie.mck...@gmail.com> ha scritto: > According

Re: Having some challenges with a SORT Utility

Cameron, sorry for not fully understanding. For me it's not so simple to "see your dataset". I'm wondering why you specified the RECORDS= on WHEN=GROUP. If I well understand the manual: " If RECORDS is specified with BEGIN or KEYBEGIN, up to n records starting with the begin record belong to a gro

Re: SMF119 - Subtype 20 and Subtype 21. REXX.

SHIFT=LEFT,MID=C' '),C';', 520,160,SQZ=(SHIFT=LEFT,MID=C' '),C';', Best regards. Max Il giorno gio 30 dic 2021 alle ore 19:57 Paul Gilmartin < 000433f07816-dmarc-requ...@listserv.ua.edu> ha scritto: > On Thu, 30 Dec 2021 10:34:37 +0100, Massi

SMF119 - Subtype 20 and Subtype 21. REXX.

REXX: /*REXX*/ PARSE ARG BUFFER MAX_BUFFER . NUMERIC DIGITS 18 IF BUFFER = "" THEN BUFFER = 5000 IF MAX_BUFFER = "" THEN MAX_BUFFER = 0 EXECIO "0 DISKR SMF" /* OPEN INPUT */ EXECIO "0 DISKW OUT" /* OPEN OUTPUT */ I_BLK = 0 I_LETTI = 0 I_LETTI_119 = 0 I_ALTRI = 0 I_SCRITTI = 0

SMF119 - Subtype 20 and Subtype 21. JCL.

JCL: // EXPORT SYMLIST=* // SET SMFIN=MYSMF // SET SMFOUT=MYOUT //*---* //* * //*---* //ST010EXEC

SMF119 - Subtype 20 and Subtype 21. Basic.

Hi everybody, more than one guy asked for the solution so here the basic. Next msgs for JCL and REXX (can't go over 1000 lines). Take in count this is only a POC and I was not able to find out any 20 subtype nor subtype 21 with second and third section available (only first one). So the SORT step

Re: SMF119 - Subtype 20 and Subtype 21

Jake, I wrote a mix of REXX and Sort to do the task (CSV file as output) even though I've got only subtype 21 at my shop for the sample. I think it's not so difficult to do the same for 20 subtype. It's a long writing for such a thread. If I can use the mail I see I'll be happy to share it with yo

Re: How to use dfsort to filter keywords that aren't fixed position

Jason, sorry for me being a bit confused If it's true a ML WTO cannot be interrupted, if you need to recognize the WTO groups try this (the syslog dataset I used is a 137 VBM): //*---* //*

Re: How to use dfsort to filter keywords that aren't fixed position

Jason, I'm not sure I fully understood your question and I'm not really sure it works generally because I'm assuming that OPERLOG interleaves blanks on "WTO TIME" position when a multiline WTO happens and that a multiline WTO cannot be interrupted (not sure + not sure means not good :D). Try this

Re: conditional JCL - Reinvent the wheel?

Colin, adding to Sri example, we wrote a simple REXX who "understands" a parm like: ST EXEC PGM=XXCOND,PARM=('"&V1"comparison_operator"&V2"') where &OP can be =,>,<,<> like ('"A"="B"') ('"A">"B"') and so on The simple REXX pgm returns a step CC 1 if the condition is true or zero if not. So

Re: DFSORT- SORT OUT FILE Sequence is not in order

Ron, if I well understood, the task was to remove duplicate records maintaning the initial order. Maybe it could be done with a single instruction, anyway the following should work: //ST010EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //TEMP DD DSN=&&TEMP,DISP=(

Re: COBOL issue

Bernd, forget it ! :D Your code works on my zOS. Best regards. Il giorno ven 1 ott 2021 alle ore 17:55 Bernd Oppolzer < bernd.oppol...@t-online.de> ha scritto: > Many thanks to all who responded and especially to Peter for posting > this piece of ASSEMBLER > which solves the problem. > > I am v

Re: COBOL issue

I'm sorry, I'm not at a terminal so my idea had not been proven. Il giorno ven 1 ott 2021 alle ore 17:46 Massimo Biancucci ha scritto: > Bernd, > > AFAIK the SET ADDRESS OF is to set a pointer to address a piece of storage. > This is why Cobol doesn't you allow to do

Re: COBOL issue

Bernd, AFAIK the SET ADDRESS OF is to set a pointer to address a piece of storage. This is why Cobol doesn't you allow to do such a command. If you want to "grab" the ADDRESS OF your working storage variable, you should define a POINTER in LINKAGE then set it to the value and then move it to your

Re: COBOL and LE version question

Robert, as Charles said, there's "something strange" in the attempt. :D Anyway IBM gives the following statement about Cobol v6.3 compatibility: " Enterprise COBOL for z/OS, V6.3 requires z/OS V2.2 (5650-ZOS), or later. " This could (or could not ;D) mean that parmlist of external call to LE ro

Re: Communication between two computer systems (LPARS or physical)

Steff, it's not so simple to understand the scenario and the goal you need to achieve in terms of "response time and certainness" of the result. There're different ways, Sysplex Services (other guys already mentioned) or developing a STC that runs on every LPAR listening to IP stack. The problem

Re: Accessing deleted logstream data.

amp;utm_campaign=sig-email&utm_content=webmail> Mail priva di virus. www.avast.com <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail> <#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2> Il giorno gio 10 giu 2021 alle ore 09:03

Accessing deleted logstream data.

Hi everybody, I need to investigate a CICS transaction that updated a specific VSAM dataset. The log had been expired from a logstream point of view, anyway the physical logstream dataset is still alive. Using DFHJUP with OLDEST, shows how the first record is outside of the time window I'm looki

Re: Syntax for calling a program from REXX with parm

Bob, hereby a piece of code where I call AMATERSE to UNTERSE ... it's not important anyway I think it's what you're looking for. It allocs the needed DDNAMEs and then call AMATERSE and after reads SYSPRINT (output from AMATERSE) to evaluate the run. What you're interested in is the LINKMVS and i

Re: Syncsort merge question - How to report exact keys out of sequence?

va di virus. www.avast.com <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail> <#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2> Il giorno mer 31 mar 2021 alle ore 06:58 Massimo Biancucci < mad4...@gmail.com> ha scritto: > Pe

Re: Syncsort merge question - How to report exact keys out of sequence?

Peter, I don't know if you need a "general" solution or a way to diagnose the specific problem. WER068A tells you that the out of sequence record is on SORTIN02 (first tip) and specifically on block 56,917 (second tip). Depending on the block size of your file you could "point to the block" and t

Re: Creating XLS file

Peter, I fully agree with other guys advising you to use csv format. In this case Sort utility is your best friend. I massively use csv to feed some Excel documents to show data coming from SMF and more. I download csv to a common directory path and use Excel data import (automatic) to refresh dat

Re: Testing a New Dataset for SMS processing via TSO or ISPF?

Lionel, it seems you're looking for something that calls SMS and asks for future allocation. There's a request in ISMF panel 7 (Automatic Class Selection) and 4 Test that simulate the allocation and gives back the response. I don't know (I suppose yes) if it's possible to call the service from a

Re: Sharing data sets VSAM VB

Joseph, for sure. VSAM variable length is OK. When define VSAM keyword RECORDSIZE( 1000 131072 ) states lrecl from to. Best regards. Max Mail priva di virus. www.avast.com

Re: Isolating a CSECT within a load module

t;https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail> Mail priva di virus. www.avast.com <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail> <#DAB4FAD8-2DD

Re: Isolating a CSECT within a load module

Steff, I've tried to use sort to help. // EXPORT SYMLIST=* // SET INPMOD=oldmd // SET OUTMOD=newmod // SET INPLIB=myold.lib // SET OUTLIB=mynew.lib //*---* //* * //*--

Re: EBCDIC-ASCII converter and other tools

Depending on the Windows platform, you can consider to enable the Linux Bash and use the power of the bash to select the file portion and convert it. Good luck. Max Mail priva di virus. w

Re: Offsets SMF17

Jordi, I ran you job updating all the columns to the right values: //TOOLIN DD * COPY FROM(RAWSMF) TO(SMF) USING(SMFI) DISPLAY FROM(SMF) LIST(SMFREP) - TITLE('SMF-17 : WHO DELETED DATASETS') DATE TIME PAGE - HEADER('SMF') ON(6,1,BI) - HEADER('SYS') ON(15,4,CH) -S

Re: Offsets SMF17

Jordi, I don't know your dataset naming convention, anyway dsname start at offset 44 but it's byte 45 for ICETOOL (like 6 is the position of record type). Offsets Name Length Format Description 5 5 SMF17RTY 1 binary Record type 17 (X'11') ... 44 2C SMF17DSN 44 EBCDIC Data set name. Hope this hel

Re: dfsort remove spaces

Ron, sorry for me not understanding the meaning of the actual SYSIN. If you run this (assuming SORTIN LRECL is 2500): INREC FIELDS=(1,2500,SQZ=(SHIFT=LEFT,MID=C' ')) SORT FIELDS=COPY OUTREC FINDREP=(INOUT=(C' |',C'|')) The INREC squeezes the record dropping all spaces and inserting a single s

Re: dfsort file split

Sorry for answering so fast (and so far from a PC) without testing it before. Mail priva di virus. www.avast.com

Re: dfsort file split

Ron, if you mean the very same header record of the file, if there's a condition that does allow you to recognize it, for instance if the header record is the only with double-blank at 651: SORT FIELDS=COPY OUTREC IFTHEN=(WHEN=GROUP,KEYBEGIN=(40,5),PUSH=(651:ID=2)) OUTFIL FNAMES=OUT01,BUILD=(

Re: SORT question: How to both remove records from a file AND write removed records to a 2nd output?

Peter, look at OUTFIL syntax and SAVE keyword. Regards. Max Mail priva di virus. www.avast.com

Re: SYNCSORT Question with IFTHEN and JOINKEYS

Bill, I think the problem is the IFTHEN on BOTHFLS. SS "thinks" there's an option to write a record other than 711,1,CH,EQ,C'1' and 711,1,CH,NE,C'1'. We know it's not possible. So it's enough to change the IFTHEN in: IFTHEN=(WHEN(1,1,CH,EQ,C'1'), BUILD=(1:1,710)), IFTHEN=(WH

Re: Syncsort E11 exit

Joseph, maybe this helps or may not. If you're using SYNCSORT, the product can "identify" multiple dataset (up to 100) by using the "Multiple Input Files" (Chapter 12 on V2.1 manual). This allows the programmer to specify different INCLUDE/OMIT for every of the different SORTMIxx input dataset.

Re: WLM query

Sean, AFAIK WLM runs and manages continuously the workload setting DP as needed (if there's no CPU contention ... so no problems). Its main task is to make all the AS as fast as they can. If there's available CPU for everybody every AS will take as much as it can. If you want a single (or group

Re: Goodbye.

Kees, all the best for you and thanks for being a valuable supporter. Max Mail priva di virus. www.avast.com

Re: ISPF development question

If the panel library is available directly to your logon proc, you can use ISPF 7.2 to refresh panel to its latest release. Best regards. Max Mail priva di virus. www.avast.com

Re: DFSORT task (I hope)

You can use JOIN function of DFSORT: //ST100EXEC PGM=SORT //SYSOUT DD SYSOUT=* //FILE1 DD * DSNAME01 DSNAME09 DSNAME02 DSNAME27 DSNAME04 /* //FILE2 DD * DSNAME09 DSNAME04 /* //SORTOUT DD SYSOUT=* //SYSIN DD * JOINKEYS F1=FILE1,FIELDS=(1,44,A) JOINKEYS F2=FILE2,FIELDS=(1,44,A) JOIN

Re: SMF record

Peter, it seems somebody submitted the JOB03275 job on behalf of RACFID (like a jobcard with USER=RACFID). Into the log you should see something like $HASP100 ABCD ON INTRDR userid Maybe it will be useful. Regards.

Re: DB2 Image Copies

John, ICs are not related to availability, they're needed to recover. So, you need IC if you need to recover to a certain point in time (IC, Quiesce etc.) in case of application failure (logic data issues) more than system failure. Usually customers take in count the Db2 log lifecycle and hold e

Re: IGYSC2025-W cobol message

t IGYSC2025 warning on line 22 > SAS-BLOCK field definition. > > ________ > From: IBM Mainframe Discussion List on behalf > of Massimo Biancucci > Sent: Friday, April 24, 2020 2:58 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: IGYSC2025-W cobol message > > Hi, > >

Re: IGYSC2025-W cobol message

Hi, any area having not an address can be a potential problem. A sample of the code would have been better. Anyway look at this: 15 * 16 * L I N K A G E S E C T I O N * 17

RFE Vote for IBM Fault Analyzer.

Hi everybody, we opened a RFE to address a lack in IBM FA. Cobol Special register are not addressable in the DUMP. I understand that only people using IBM FA would be interested, anyway I invite you to vote. http://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe&CR_ID=141860 Thanks a l

Re: PARM= vs PARMDD= and symbol substitution

I tried the sample from IBM Manual and it seems it works as designed. I've not read properly so sorry about that. This JCL works the way you want: //*---* //STP01 EXEC PGM=ICEGENER //SYSPRINT DD DUMMY //SYSUT1 DD *,SYMBOLS=(JCLONLY

Re: Upwards Compatibility of Code in Z series Boxes

If you refer to assembler, you had lots of answers. Regarding high level languages, maybe you encounter some problems with very old compiler (OS/VS Cobol, Cobol II, PLI 1.x). Very few about source, more about runtime because of LE. So it's not HW related but IBM software environment. There're anyw

Re: SQL query interface for catalogs?

John, it seems a nice idea anyway I tend to be cautious in interfacing catalog. In my experience there's something that can go wrong. Years ago we experienced some random delay in DB2 subsystem without having (after tenth of calls to IBM and dump and so on) the ability to diagnose the problem. Af

Re: March 18: Exploring z/OS Container Extensions Live Webcast

Timothy, it would be really appreciated if you'll post a recording of the event. Thanks a lot in advance. Max Il giorno lun 9 mar 2020 alle ore 08:40 Timothy Sipples ha scritto: > This month Edward McCarthy and I planned to hold a pair of "Exploring z/OS > Container Extensions" Meetups in Mumb

Re: Question on MQ on the Z/os

Dennis, AFAIK if you're using standard application on zOS (Cobol, PLI etc.) you need a MQ Server AS up and running on the client lpars. MQ Server means license and costs. The amount of the cost depends on your licensing type. This case zNALC could be a good option. Of course you've to ask your IB

Re: Finding and replying to outstanding reply

Tony, don't know if it's a real light, caus you prefere assembler, maybe CNZQUERY - Consoles query (Authorized Assembler Service Reference ALE-DYN) could help. In the manual there's an example doing exactly what you need. Best regards. Max Il giorno mar 11 feb 2020 alle ore 14:32 Tony Thigpen

Re: Can I do variable field-length blanking with SORT?

Sri, stunning as usual ! ICETOOL is really terrific . and I've learnt much more (CHANGE for instance). Thanks a lot. Max Il giorno gio 9 gen 2020 alle ore 02:16 Sri h Kolusu ha scritto: > > Please "light us" with the trick. > > Max, > > Here is the trick job I was talking about. Basically

  1   2   >