SORT SUM Problem

2023-01-31 Thread Jack Zukt
Hi all, I should probably say "my problem with SORT SUM", as the real problem is not with SORT. So, I have an input file with a 100 byte record that has a dataset name on the first 44 bytes and a numeric value (UFF) on the last ten. I need to sum up those 10 last bytes by High Level Qualifier. My

Re: SORT SUM Problem

2023-01-31 Thread Sri h Kolusu
Jack, The issue is you have NOT converted the UFF value to Binary before performing the SUM Here is the change you need (Untested) //SYSINDD * INREC PARSE=(%01=(ABSPOS=1,ENDBEFR=C'.',FIXLEN=8)), BUILD=(FMT-HLQ:%01, FMT-BYTE:INP-BYTE,TO=BI,LENGTH=8) SORT FIELDS=(F

Re: XL C\C+ strange compile errors

2023-01-31 Thread Joseph Reichman
David Not Really understanding what you are suggesting is there another c++ compiler on z/os I should be using ? As I am using CCNDRVR Are you saying that the standard template libraries functions such as map wont work with CNNDRVR As an aside the following statement compiled fine under

Re: SORT SUM Problem

2023-01-31 Thread Jack Zukt
Thank you Sri. It was as simple as that. Many thanks Jack On Tue, 31 Jan 2023 at 12:46, Sri h Kolusu wrote: > Jack, > > The issue is you have NOT converted the UFF value to Binary before > performing the SUM > > Here is the change you need (Untested) > > //SYSINDD * > INREC PARSE=(%01=(ABS

SMF puzzle

2023-01-31 Thread Ituriel do Neto
Hi all, I'm facing a problem with SMF that is completely unusual, and maybe you can enlight me. I do have a program that generates SMF records and it is possible to specify the SMF number  of any choice (bigger than 127). The SMF record is issued using SMFWTM macro. I also have an IEFU83 and I

Re: SMF puzzle

2023-01-31 Thread rpinion865
Check your PARMLIB SMFPRMxx member to insure the higher number is processed. Sent with Proton Mail secure email. --- Original Message --- On Tuesday, January 31st, 2023 at 8:29 AM, Ituriel do Neto <03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote: > Hi all, > > I'm facing a

Re: SMF puzzle

2023-01-31 Thread Ituriel do Neto
Mr Pinion, Thank you, but its not this problem. The SMFPRMxx is correct, otherwise the SMF record would not be generated. Best Regards Ituriel do Nascimento Neto z/OS System Programmer Em terça-feira, 31 de janeiro de 2023 10:48:01 BRT, rpinion865 <042a019916dd-dmarc-requ...@listserv

Re: SMF puzzle

2023-01-31 Thread Binyamin Dissen
Are you checking the return code from WTO? Does the message show data from the SMF record or a boilerplate? The snippet looks fine. Show the code. On Tue, 31 Jan 2023 13:29:16 + Ituriel do Neto <03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote: :>I'm facing a problem with SMF that is

Re: SMF puzzle

2023-01-31 Thread Ituriel do Neto
I have done a small change, like below:                     USING SMFRCD0,R9                    DXSOTHR   CLI   SMF0RTY,128                                   BL    DXSTYSU                                       WTO   'IEFU83 EXIT INVOKED'               **                  BAS   R8,DXMSG     <=== TE

OMVS

2023-01-31 Thread Steve Beaver
I need to move my SMPe from one LPAR to another. My concern are my MOUNTPOINTS. My current zFS is ETC with a mountpoint of /SERVICE/MVS1/etc Do I need to mount the MP and go create the /SERVICE/DEV1/etc Then UNMOUNT and MOUNT it again as /DEV1/etc Regards, St

Re: SMF puzzle

2023-01-31 Thread Michael Babcock
Exit IEFU86 is called first. Do you have a U86 exit doing something first? On Tue, Jan 31, 2023 at 12:30 PM Ituriel do Neto < 03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote: > I have done a small change, like below: > > USING SMFRCD0,R9 > DXSOTHR CLI SMF0RTY,128 >

Re: OMVS

2023-01-31 Thread Carmen Vitullo
I assume you're not zfs file sharing? I usually don't mount etc or dev unless I'm doing an upgrade, but if you're not sharing the /SERVICE/ filesystems then yes you need to create the mount points first - then remount them on the moved-to LPAR Carmen On 1/31/2023 12:56 PM, Steve Beaver wrote:

Re: SMF puzzle

2023-01-31 Thread Ituriel do Neto
I would like to thank you all. As expected It was a logic error, before the piece of code shown. Best Regards Ituriel do Nascimento Neto z/OS System Programmer Em terça-feira, 31 de janeiro de 2023 15:58:01 BRT, Michael Babcock escreveu: Exit IEFU86 is called first.  Do you have a

Re: VSEn 6.3 hardware requirements

2023-01-31 Thread Gonzalo Muelas Serrano
Hello Radoslav, sorry for the delay, I usually rather follow vse-l https://lists.lehigh.edu/mailman/listinfo/vse-l In any case I was told by a friend (thank you Christian B.!) that there were some VSEn questions, so here I am. The HW req. are exactly the same as with IBM z/VSE 6.2, that is min.

JCL // SET SYMBOL indirection

2023-01-31 Thread Robert Garrett
I love symbols. I've been trying to figure out if a level of indirection is possible. Here's an example that both doesn't work and isn't' even syntactically correct, but hopefully will serve to illustrate what I'm trying to do: //SYM1 SET SYM1=VALUE1 //SYM2 SET SYM2=VALUE2 //TARGET SE

Re: JCL // SET SYMBOL indirection

2023-01-31 Thread Farley, Peter
Not necessarily what you may want, but this works: //SYM1 SET SYM1=VALUE1 //SYM2 SET SYM2=VALUE2 //TARGET SET TARGET=&SYM1 //RESULT SET RESULT=&TARGET (and end up with &RESULT being set to VALUE1 and not SYM1) I know Gil will complain the observed JCL symbol behavior (assigning t

Re: JCL // SET SYMBOL indirection

2023-01-31 Thread Billy Ashton
Unfortunately, you can not have "nested" symbols...just one and done. Thank you and best regards, Billy Ashton -- Original Message -- From "Robert Garrett" To IBM-MAIN@listserv.ua.edu Date 1/31/2023 7:07:31 PM Subject JCL // SET SYMBOL indirection I love symbols. I've been trying

Re: JCL // SET SYMBOL indirection

2023-01-31 Thread Bob Bridges
I don't know about your question. But herewith a brief side hike: I have always been inclined to experiment with systems, hoping to find sense in what seemed like senseless behavior and looking for shortcuts. (Apparently I was born to be a programmer.) When I was handed a form to fill out, and t

Re: JCL // SET SYMBOL indirection

2023-01-31 Thread Sri h Kolusu
>>//RESULT SET RESULT=&&TARGET (and end up with &RESULT being set to VALUE1 >>and not SYM1) Rob, Try this // EXPORT SYMLIST=* //SYM1 SET SYM1=VALUE1 //SYM2 SET SYM2=VALUE2 //TARGET SET TARGET=SYM1 //RESULT SET RESULT=&TARGET /* //STEP0100 EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=*

Re: JCL // SET SYMBOL indirection

2023-01-31 Thread Paul Gilmartin
On Wed, 1 Feb 2023 00:20:26 +, Farley, Peter wrote: >Not necessarily what you may want, but this works: > >//SYM1 SET SYM1=VALUE1 >//SYM2 SET SYM2=VALUE2 > >//TARGET SET TARGET=&SYM1 > >//RESULT SET RESULT=&TARGET (and end up with &RESULT being set to VALUE1 >and not SYM1) > >I