IMS - AERTDLI
I'm trying to invoke IMS functions using AERTDLI. I did this about 10 years ago or so in another lifetime. I was not involved then in setting up IMS or in populating the different flavors of IMS databases. I successfully executed, CIMS INIT, CIMS TERM, CIMS TALL, APSB, DPSB, GN and GU. I am trying to do the same thing but I'm getting nowhere. One of my co-workers was able to read a simple database by invoking DLIBATCH. This calls DFSRRC00 and I assume that IMS gets populated in the address space. DLIBATCH expects a program as an input parameter. That program is the one my co-worker wrote. I wrote another program with AERTDLI calls. It is called as the JOB STEP program. My STEPLIB includes the IMS RESLIB and my load library. DFSRESLB also points to the IMS RESLIB. I am able to LOAD AERTDLI. I call it with CIMS INIT supplying an AIB that is correctly filled in. I don't abend and AIBRETRN is binary zeros. But the AIB doesn't contain anything. I forced an abend after the CIMS INIT call. IPCS shows just 5 TCBs with the 5th one abending S0C3. I would have thought that there would be more TCBs. But maybe not. The only IMS address space is IMS15RL1. Its JOB STEP program is DXRRLM00. I suspect that there isn't enough IMS in the LPAR to allow AERTDLI to work properly. Any help would be appreciated. Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IMS - DFSRRC00 vs ODBA
I think in most cases, the database will be local. Assuming local, is access faster using DFSRRC00 or ODBA. If not local, what is faster? Thnx, Pierre -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
IMS - DFSRRC00 vs ODBA
To All, My IMS is somewhat limited and my terminology may be incorrect. Is there a performance difference between 1) executing DFSRRC00 and 2) executing an assembler program that uses ODBA calls ? 1) An assembler routine and a PSB name would be provided to DFSRRC00. I'm not sure what API is used in this case. 2) The assembler program (JOB STEP program) would be supplied a PSB name. The calls would be CIMS INIT, APSB, GN, DPSB, TERM and TALL using AERTDLI. Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Easytrieve Synchronized File Processing (SFP)
It's documented in the Easytrieve Report Generator 11.6 in the section on Synchronized File Processing. I have a requirement to do a 3-way merge. Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Easytrieve Synchronized File Processing (SFP)
I'm looking at the doc on this and the rules on how it works are not clear. I would appreciate the help of an expert on this. The doc has an example of 3 files and it shows each iteration in the processing and which files are "available" or N/A. File 1 key 3A is available twice - iterations 3 and 4. File 1 key 8A is available twice - iterations 11 and 12. My impression is that records with equal keys are available from innermost to outermost until a duplicate key is encountered. The simplest case is a 3-way merge to produce a completely sorted file. If a record is "available" twice, one needs to remember this and not process the record the 2nd time it is available. This isn't too bad for a 3-way merge but it gets more complicated as you add files. " Remember, the matching algorithm is hierarchical, so the key is exhausted on the lowest level before another record is processed from the next higher-level file." - This is from the documentation. This statement contradicts what happens in the table of iterations shown in the documentation. Please contact me offline. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
TSSINSTX TSSAI
My TSS exit TSSINSTX gets called for the POSTINIT, PASSWORD and PASSPHRASE functions. A segment called $XXX was created to hold an encrypted password or passphrase and the current date. I encrypt by calling CSNBSAE. I take the password (or new password if one exists) and place it in the TSS parameter area for TSSAI. The password (or new password) is written into the TSS database by calling TSSAI using the $XXX segment. I do the same for passphrases. The encrypted old password (or new password) is successfully written to the TSS database by the call to TSSAI using a TSSCLASS of FLDUPD. But when there is a new password, the new password is NOT updated for the userid. It seems that the call to TSSAI is interfering with the update of the new passwords for the userid. When I comment the call to TSSAI, the new password is updated for the userid. I can login with the new password and it works. The return code from the TSSAI call is 0. The documentation on TSSINSTX and TSSAI made no mention of conflicts between the the exit and the TSSAI API. Can someone help me with this ? Thanks in advance, Pierre/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Unlike data sets concatenation - revised 4
I'm back onto this problem. I wrote a proof-of-concept program and it works. I've modified an existing z/OS product and my changes don't work. Only DSNAME and DISP are coded on the DD statements. 1st file is VB with LRECL=200 2nd file is VB with LRECL=230 3rd file is FB with LRECL=1000. Proof-of concept : It is AMODE 31, RMODE ANY and re-entrant. It's save area/working storage is in 31-bit storage. DCB before OPEN 09.18.12 JOB13853 +6EB0 0001 4000 0001 09.18.12 JOB13853 +6ED0 6F3A C9D5D7E4 E3404040 0A004800 0001 0001 09.18.12 JOB13853 +6EF0 0001 0001 0001 0001 0001 DCB after OPEN 09.18.12 JOB13853 +6EB0 01D0 00F43026 002FE5A2 05007C70 4000 6CB8 09.18.12 JOB13853 +6ED0 02006F3A 50006F10 00404800 008C5D84 1AE30E68 00CA99F8 0A01 020903E8 09.18.12 JOB13853 +6EF0 30013030 6D28 00C8 80E37A58 DCB inside of OPEN exit prior to a reread (GET) 09.18.12 JOB13853 +6EB0 01D1 00F43026 002FE5A2 05007978 4000 6CB8 09.18.12 JOB13853 +6ED0 02006F3A 50006F10 00544800 008C508C 1AE30E68 00CA99F8 0A01 0209047E 09.18.12 JOB13853 +6EF0 30013030 6D28 00E6 80E37A58 DCB inside of OPEN exit prior to a reread (GET) 09.18.12 JOB13853 +6EB0 01D5 00F43026 002FE5A2 050070A0 4000 6CB8 09.18.12 JOB13853 +6ED0 02006F3A 90006F10 00684800 008C6894 1ACAC000 00CA99F8 0A01 02096978 09.18.12 JOB13853 +6EF0 30013030 6D28 03E8 80E37A58 ISV product : The program that doesn't work is not re-entrant and runs in AMODE 31 but is RMODE 24. Its save area/working storage is in 24-bit storage. One can see that the DCB prior to the reread does not have the attributes of the 2nd dataset namely LRECL=230 and BLKSIZE=1150. DCB before OPEN 000110180 0001 4000 0001 *... .. * 00011038 20 00012580 C6C9D3C5 C1404040 0A004800 0001 0001 03E8 *. FILEA. ... .. Y* 00011058 40 0001 0001 0001 00C8 0001 0001 *... ... ... ...H... ... * DCB after OPEN 000110180 01D0 00F43026 002FE5A2 05028C70 4000 000252D0 * }...4 . Vs.. .. }* 00011038 20 02012580 500112D0 00A44800 008C4064 1AE30E68 00CA99F8 0A01 020903E8 *& }.u ..T . r8 ..Y* 00011058 40 30013030 00025340 00C8 80E37A58 *. ...H T: * DCB inside of OPEN exit prior to a reread (GET) 000110180 01D1 00F43026 002FE5A2 05028C70 4000 000252D0 * J...4 . Vs.. .. }* 00011038 20 02012580 500112D0 00B84800 008C5A6C 1AE30E68 00CA99F8 0A01 020903E8 *& }. .. !% T . r8 ..Y* 00011058 40 30013030 00025340 00C8 80E37A58 *. ...H T: * I see the SVC 37 entry in the system trace table but no corresponding SVCR 37. Then abend S001-4. CPU STATUS: BLS18058I Warnings regarding STRUCTURE(Psa) at ASID(X'0001') 00: BLS18300IStorage not in dump PSW=07541000 00DAB422 (Running in PRIMARY, key 5, AMODE 24, DAT ON, SUPERVISOR STATE) Disabled for PER ASID(X'001A') DAB422. IGC0005E+1422 IN PLPA ASCB26 at FB5D00, JOB(TH127153), for the home ASID ASXB26 at 8FD000 and TCB26E at 8D2AA0 for the home ASID HOME ASID: 001A PRIMARY ASID: 001A SECONDARY ASID: 001A General purpose register values Left halves of all registers contain zeros 0-3 8400 84001000 008C40EB 00DAB438 4-7 008C4420 008C4474 008C4428 008C40B0 8-11 008FF708 008CA088 00F4DF78 008C5A6C 12-15 008C45E4 00027988 80DAB328 0004 Access register values 0-3 008FB37C 4-7 8-11 12-15 Control register values 0-1 0082_9F98EE20 _7BE08007 2-3 _151A0700 0002_00C0001A 4-5 0002_001A _7EEF4680 6-7 _ _7BE08007 8-9 _ _ 10-11 _ _ 12-13 _057E93E7 _7BE08007 14-15 _DF8FEEF3 _7F670010 Apologies for the staggered display. Any help would be appreciated. Regards, Pierre.
Unlike data sets concatenation - revised 3
I have provided the DCB in source and dumped it just before the OPEN. 1st data set in the concatenation : Data Set Name . . . . : PIERRE.VB200. . . . General Data Current Allocation . . Management class . . : **None**Allocated cylinders : 1 . . Storage class . . . : **None**Allocated extents . : 1 . .Volume serial . . . : DISK01 . .Device type . . . . : 3390 . . Data class . . . . . : **None** . .Organization . . . : PS Current Utilization . .Record format . . . : VB Used cylinders . . : 1 . .Record length . . . : 200 Used extents . . . : 1 . .Block size . . . . : 1000 . .1st extent cylinders: 1 . .Secondary cylinders : 1 Dates . .Data set name type : Creation date . . . : 2023/04/20. .Data set encryption : NO Referenced date . . : 2023/05/01. . Expiration date . . : ***None***. . . .SMS Compressible . : NO 2nd dataset : . Data Set Name . . . . : PIERRE.VB230 . . . . General Data Current Allocation . . Management class . . : **None**Allocated cylinders : 1 . . Storage class . . . : **None**Allocated extents . : 1 . .Volume serial . . . : DISK01 . .Device type . . . . : 3390 . . Data class . . . . . : **None** . .Organization . . . : PS Current Utilization . .Record format . . . : VB Used cylinders . . : 1 . .Record length . . . : 230 Used extents . . . : 1 . .Block size . . . . : 1150 . .1st extent cylinders: 1 . .Secondary cylinders : 1 Dates . .Data set name type : Creation date . . . : 2023/04/20. .Data set encryption : NO Referenced date . . : 2023/05/01. . Expiration date . . : ***None***. . .SMS Compressible . : NO The JCL has just the DSN and DISP. . . 000183 INFILE DCB DDNAME=INFILE, *00164000 . . 000184DSORG=PS, *00165000 . . 000185EODAD=0, *00166000 . . 000186MACRF=GL 00167000 . DCB before open 000224D8 0001 4000 0001 *... .. * 000224F8 00010580 5000 C6C9D3C5 C1404040 0A004800 0001 00018240 03E8 *. &...FILEA. . b .. Y*
Re: Unlike data sets concatenation - revised 2
These are existing datasets so it's just DSNAME and DISP in the concatenation. Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Unlike data sets concatenation - revised 2
I set DCBOFPPC before the OPEN. DCB after open 000224D8 01D0 00F43026 002FE5A2 05025C70 4000 00027E08 * }...4 . Vs * .. .. = * 000224F8 02010580 5000 00A44848 008C4064 1AE30E68 00CA99F8 0A018240 020903E8 *&u .T . r8 bY* 00022518 30013030 00027E78 00C8 80E37A58 *. = ...H T: * DCBOFLGS is at X'30'. At x'30', the value is x'1A'. The value of DCBOFPPC is X'08'. This means that the bit is on. DCB prior to reread 000224D8 01D1 00F43026 002FE5A2 05025C70 4000 00027390 * J...4 . Vs * .. .. * 000224F8 02010580 5000F208 00B84848 008C5A6C 1AE30E68 00CA99F8 0A018240 020903E8 *&.2 . . !% T . r8 bY* 00022518 30013030 00027400 00C8 80E37A58 *. H T: * At x'30', the value is x'1A'. DCBOFPPC is on. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Unlike data sets concatenation - revised 2
I thought that the 2nd display of the DCB would show the lrecl to be 230 and the blksize to be 1150. I'm reading the documentation for the umpteenth time and can't see what I've missed or done wrong. 08.51.43 JOB12479 +Ptr to SYNAD exit placed in DCB 08.51.43 JOB12479 +reread off, OFPPC on 08.51.43 JOB12479 +file OPENed SVC 13 and SVCR 13 in system trace table DCB after open 000224D8 01D0 00F43026 002FE5A2 05025C70 4000 00027E08 * }...4 . Vs * .. .. = * 000224F8 02010580 5000 00A44848 008C4064 1AE30E68 00CA99F8 0A018240 020903E8 *&u .T . r8 bY* 00022518 30013030 00027E78 00C8 80E37A58 *. = ...H T: * 08.51.43 JOB12479 +Ptr to exit list placed in DCB 08.51.43 JOB12479 +get 08.51.43 JOB12479 +get 08.51.43 JOB12479 +get ... ... 08.51.43 JOB12479 +get 08.51.43 JOB12479 +get SVC 37 and SVCR 37 in system trace table 08.51.43 JOB12479 +open exit (I can see the SVC 23 and SVCR 23 entries) 08.51.43 JOB12479 +reread DCB prior to reread 000224D8 01D1 00F43026 002FE5A2 05025C70 4000 00027390 * J...4 . Vs * .. .. * 000224F8 02010580 5000F208 00B84848 008C5A6C 1AE30E68 00CA99F8 0A018240 020903E8 *&.2 . . !% T . r8 bY* 00022518 30013030 00027400 00C8 80E37A58 *. H T: * 08.51.43 JOB12479 +get SVC 37 and SVCR 37 in system trace table 08.51.43 JOB12479 +synad I/O error. Buffer=00026060 Bytes read=1000. DevNbr=0A97 Type=D Oper=GET Errmsg=WRNG.LEN.RECORD AcMeth=QSAM RBN=01D100 08.51.43 JOB12479 +synad x -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Unlike data sets concatenation - revised
Seymour, SYNAD msg 00023475 008000 7C00 0260 | .@- | 00023480 6003E840 40404040 40404040 40404040 | -.Y | 00023490.:02349F. LENGTH(X'10')--All bytes contain X'40', C' ' 000234A0 40404040 40406BE3 C8F1F2F7 F1F5F36B | ,TH127153, | 000234B0 E2C1F1F2 C5E9E3D7 6BF0C1F9 F76BC46B | SA12EZTP,0A97,D, | 000234C0 C6C9D3C5 C1404040 6BC7C5E3 4040406B | FILEA ,GET , | 000234D0 E6D9D5C7 4BD3C5D5 4BD9C5C3 D6D9C46B | WRNG.LEN.RECORD, | 000234E0 F0F0F0F0 F0F1C4F1 F0F0F0F0 F0F06BD8 | 01D100,Q | 000234F0 E2C1D440 4199 44900224 D800 | SAM ..rQ... | 00023500 1C404040 F1404040 40404040 | . 1| 00023510.:02356F. LENGTH(X'60')--All bytes contain X'40', C' ' DCB 000224D8.:0224DF. LENGTH(X'08')--All bytes contain X'00' 000224E0 01D1 00F43026 002FE5A2 05025C70 | .J...4Vs..*. | 000224F0 4000 0002739002010580 5000F208 | .. .&.2. | 00022500 00B84848 008C5A6C 1AE30E68 00CA99F8 | ..!%.Tr8 | 00022510 0A018238 021903E8 30013030 00027400 | ..bY | 00022520 00C8 | ...H | 00022530 Apologies for the bad formatting. Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Unlike data sets concatenation - revised
Seymour's response made me realize that my post was incomplete. I'm trying to read a concatenation of unlike data sets using QSAM. The first dataset is VBS with LRECL=200,BLKSIZE=1000 The second dataset is VBS with LRECL=230,BLKSZIE= 1150. I've coded a DCB OPEN exit that sets a re-read flag. I had a SYNAD exit but removed it. Prior to OPEN, I set the DCBOFPPC bit to 1. After the OPEN, I set up the DCB OPEN exit. I read the 1st data set and all is well. When I attempt to read the 2nd data set, my DCB OPEN exit is driven. It sets the re-read bit and then returns using R14. I get control after the GET and test the re-read bit. It is set so I do NOT process the record but go back to the GET. I blow up with an S001-4. See below. I was under the impression the technique described above prevents an S001 abend. You could read through an entire concatenation without abending and with one OPEN. Thanks in advance, Pierre. .. 08.40.17 JOB12309 +get1 08.40.17 JOB12309 +get1 08.40.17 JOB12309 +get1 08.40.17 JOB12309 +get1 08.40.17 JOB12309 +open exit 08.40.17 JOB12309 +reread1 08.40.17 JOB12309 IEC020I 001-4,TH127153,,FILEA-0002,0A97,MVSXXX, 08.40.17 JOB12309 IEC020I PIERRE.IN123456.VB230 08.40.17 JOB12309 IEC020I DCB EROPT=ABE OR AN INVALID CODE, AND/OR NO SYNAD EXIT SPECIFIED 08.40.20 JOB12309 IEA995I SYMPTOM DUMP OUTPUT 053 053 SYSTEM COMPLETION CODE=001 REASON CODE=0004 053 TIME=08.40.17 SEQ=05644 CPU= ASID=001A -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Unlike data sets concatenation
I'm trying to read a concatenation of unlike data sets using QSAM. The first dataset is VBS with LRECL=200,BLKSIZE=1000 The second dataset is VBS with LRECL=230,BLKSZIE= 1150. I've coded a DCB OPEN exit that sets a re-read flag. I've also got a SYNAD exit and DCBEROPT has X'80'. I read the 1st data set and all is well. When I attempt to read the 2nd data set, my DCB OPEN exit is driven. I set the re-read bit and then return using R14. I get control after the GET and test the re-read bit. It is set so I do NOT process the record but go back to the GET. I blow up with an S001-4. Please see below. I was under the impression the technique described above prevents an S001 abend. Have I missed something? Also the section in DFSHS;Using Data Sets on "Concatenating Unlike Data Sets" mentions the DCBE but doesn't say that it is required. I don't have one. Is a DCBE necessary for this technique ? Thanks in advance, Pierre. 15.37.53 JOB12289 +get1 15.37.53 JOB12289 +get1 15.37.53 JOB12289 +open exit 15.37.53 JOB12289 +reread1 15.37.53 JOB12289 +synad 15.37.53 JOB12289 +synad x 15.37.53 JOB12289 IEC020I 001-4,TH127153,,FILEA-0002,0A97,VOLSER, 15.37.53 JOB12289 IEC020I PIERRE.IN78.VB230 15.37.53 JOB12289 IEC020I DCB EROPT=ABE OR AN INVALID CODE, AND/OR NO SYNAD EXIT SPECIFIED 15.37.55 JOB12289 IEA995I SYMPTOM DUMP OUTPUT 144 144 SYSTEM COMPLETION CODE=001 REASON CODE=0004 144 TIME=15.37.53 SEQ=05622 CPU= ASID=001A 144 PSW AT TIME OF ERROR 075C1000 00DAB422 ILC 2 INTC 0D 144NO ACTIVE MODULE FOUND 144NAME=UNKNOWN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: PKCS #7
I wrote a certificate management package some years ago on z/OS. I wrote the package in C using the gsk functions. IBM stated that the functions couldn't be called directly in assembler. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IGGCSI00 - NVSMATTR
I corrected the subject line. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
IGGCSI00 - NVSNATTR
I asked for NVSMATTR,DEVTYP, DSCBTTR and VOLSER for a PDSE version 1. R15 was 0 after the call to IGGCSI. The DEVTYP, DSCBTTR and VOLSER were fine. I was expecting NVSMATTR to have a value of 'L' for a PDSE but I got 'Q'. This isn't documented. I was hoping to identify a PDSE (ve or v2) before doing an allocation but ... What does 'Q' represent and where is that documented? Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Top Secret - TSSINSTX
I missed this posting so I am replying late. Yes, I have turned on PREINIT, POSTINIT, PASSWORD and PASSPHRASE. I've driven PREINIT and POSTINIT functions. The pointer to the password is supplied. The pointer to the passphrase is never supplied. When is the pointer to the passphrase supplied for PREINIT/POSTINIT ? I tested with 2 userids, one without a passphrase and one with a passphrase. I've driven the PASSWORD function by expiring a password and that works fine. I can't figure out how to drive the PASSPHRASE function. Any help here would be appreciated. TIA, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Top Secret - TSSINSTX
Yes, PREINIT, POSTINIT, PASSWORD and PASSPHRASE are set to YES. I see PREINIT and POSTINIT only but I never see a pointer to the PASSPHRASE area even if I add a PASSPHRASE to the TSO user. I have no idea how to drive PASSWORD and PASSPHRASE. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Top Secret - TSSINSTX
For PRE and POSTINIT, I am looking at TXAIPASS and TXAIPHRA. TXAIPHRA never has a value for a TSO logon it seems. Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Top Secret - TSSINSTX
For function code PREINIT and POSTINIT, a pointer to a passphrase area can be supplied in the exit's parameter list. I created 2 ACIDs, one with a passphrase and the other without a passphrase. When logging on with either one, I never see a pointer to the passphrase area. 1) How can I drive PREINIT ad POSTINIT so that the pointer to the passphrase area exists? 2) How can the PASSWORD and PASSPHRASE functions be driven? I've tried various TSS commands but none of them drive either exit. Thanks, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: WTO and IEF170I message
The code runs in an exit In case it matters (unlikely as that is), what kind of "exit"? At least "is it some sort of WTO-related exit"? --> No, it is not a WTO-related exit. Is there something in the WTO parameters that causes the IEF170 message to disappear ? Maybe a combination of MCSFLAG, DESC and ROUTCDE ? The first question for any WTO is where do you want it to go? You then set MCSFLAG, DESC, and/or ROUTCDE to meet that desire. IEF170I comes from Write To Programmer processing (either by the WTP macro or by WTO(r) with routing code 11). --> MCSFLAG=HRDCPY did it. I did not set ROUTCDE or DESC. I no longer get the IEF170I message. I would not have expected routing code 11 to be included by default. Perhaps you have some WTO-related exit that changes the routing codes. And perhaps the environment of your exit is not appropriate for WTP. Thanks to all, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
WTO and IEF170I message
I issue a plain WTO :wto 'This is a message' I also issue a WTO :wto text=dsa_wtotext,mf=(e,dsa_wtoarea) In both cases the WTO appears in the SDSF LOG. But I also get an IEF170I message for each WTO no matter the flavor. IEF170I 3 This is a message A WTO or WTOR macro requested a write-to-programmer (WTP) operation. The system was unable to complete WTP processing due to an error 3 means "The system issued the PUT macro to a system message data set, but failed." The code runs in an exit but since SVCs are allowed in the exit, the code must execute in TCB mode. Is there something in the WTO parameters that causes the IEF170 message to disappear ? Maybe a combination of MCSFLAG, DESC and ROUTCDE ? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CSNBENC rc=8 rsn=X'271C'
I used the ICSF panels. I'll switch to CSNBSAE call. Thanks, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
CSNBENC rc=8 rsn=X'271C'
Using the ICSF panels, I created an AES DATA key (128 bits) called MY.DATA.KEY I fed this into a CSNBENC call and got rc=8 rsn=x'271C'. I'm not sure what I am doing wrong. key-identifier (or label) is MY.DATA.KEY padded with blanks to 64 bytes init-vector is XL8'00' rule array is IPS,INITIAL,TOKEN each 8-bytes and padded with blanks. Regards, Pierre. 271C (10012) A key label was supplied for a key identifier parameter. This label is the label of a key in the in-storage CKDS or PKDS. A key record with that label (and the specific type if required by the ICSF callable service) could not be found. For a retained key label, this error code is also returned if the key is not found in the CCA coprocessor specified in the PKDS record. User action: Check with your administrator if you believe that this key should be in the in-storage CKDS or the PKDS. The administrator may be able to bring it into storage. If this key cannot be in storage, use a different label. REASONCODES: TSS 01E (030) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ICHEINTY, R_admin and RACROUTE EXTRACT
On Mon, 10 Oct 2022 at 14:06, Pierre Fichaud wrote: > To All, > I want replace userid passwords in the RACF database. > I have encrypted password in a flat file. > Where did you get such an encrypted password? --> The password was encrypted using a CSNB*** call. > I labored to get ICHEINTY working but finally did. > > R_admin was much easier than ICHEINTY. > Not surprisingly. ICHEINTY is a pretty low-level interface. R_Admin is similar to issuing an ALU command. > For both ICHEINTY and R-admin, I get return and reason codes set to 0. > > But the password does not get changed. > Does not get changed (i.e. you can still logon with the old password), or isn't what you expect after your code runs? --> Does not get changed. > My SYSPROG temporarily made my userid RACF special and still neither > worked. > I don't know why. > My load library is APF-authorized. > I was in supervisor state for R_admin. > You wouldn't get RC=0 if you weren't suitably authorized. I don't believe SPECIAL makes a difference for this kind of thing. > I turned to RACROUTE REQUEST=VERIFY,TYPE=REPLACE. > Do you mean REQUEST=EXTRACT,TYPE=REPLACE or REQUEST=VERIFY with NEWPASS= ?. --> EXTRACT with REPLACE The former is about the closest thing to ICHEINTY for this purpose, but generally easier to use. The latter is essentially a user logon-with-password-change, so you have to supply the current password. After fixing one thing, it ran cleanly and it worked.. > I was able to login into TSO with the new password. > Again, this is fine if you have an encrypted password to bang in there. But the use cases for this are on the rare side. You may want to think about what you expect to happen to the user's password history when you do this. > Is there something I missed with ICHEINTY and R_admin ? > Presumably. I do know that I have used ICHEINTY to replace passwords and phrases, and it works fine for me. > Thanks to those who responded before, especially Peter Relson. > Regards, Pierre > Tony H. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
ICHEINTY, R_admin and RACROUTE EXTRACT
To All, I want replace userid passwords in the RACF database. I have encrypted password in a flat file. I labored to get ICHEINTY working but finally did. R_admin was much easier than ICHEINTY. For both ICHEINTY and R-admin, I get return and reason codes set to 0. But the password does not get changed. My SYSPROG temporarily made my userid RACF special and still neither worked. I don't know why. My load library is APF-authorized. I was in supervisor state for R_admin. I turned to RACROUTE REQUEST=VERIFY,TYPE=REPLACE. After fixing one thing, it ran cleanly and it worked.. I was able to login into TSO with the new password. Is there something I missed with ICHEINTY and R_admin ? Thanks to those who responded before, especially Peter Relson. Regards, Pierre -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: R_admin
The flag settings are in a separate chapter in the Callable Services manual. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
R_admin
I am attempting to use R_admin instead of ICHEINTY to update the RACF database. The mapping macro IRRPCOMP has the layout for R_admin (IRRSEQ00). But what values do I put for ADMN_USRADM_FLAGS, ADMN_USRADM_SEG_FLAG and ADMN_USRADM_FLD_FLAG ? I am getting SAF rc=8, RACF rc=8 and RACF rsn=16 (x'1`0'). I suspect that the flags need setting. Thanks, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ICHEINTY - RACF interface
Peter, Apologies for the staggered output. Here is the execution. I don't think looking at the SVC dump will help me. Looking at the ICHEINTY parameter list in the Security Server Diagnosis manual, I'm sure that the "action" area (dsa_actions) is not correctly formatted. Regards, Pierre --Execution- 15.08.23 JOB04855 IEF403I TSTRACFL - STARTED - TIME=15.08.23 15.08.23 JOB04855 *IRR401I 0C4 ABEND DURING RACF PROCESSING OF 742 742 ALTER REQUEST FOR ENTRY T22TST1 15.08.23 JOB04855 IRR401I 0C4 ABEND DURING RACF PROCESSING 15.08.23 JOB04855 IEF450I TSTRACFL STEP1 - ABEND=S0C4 U REASON=0010 744 744 TIME=15.08.23 - Source -- . 004300 * . . 004400 *ICHEINTY fields . . 004500 * . . 004600 dsa_icheinty icheinty alter, / . . 004700mf=l . . 004730 dsa_actionsdsxl512 . 025000 lhi r00,8 . . 025100 str00,dsa_clear_textln . . 025200 mvc dsa_clear_text(l'rec_pswd),rec_pswd . . 025300 j skip . . 030900 skip ds0h % . . 031000 * . . 031100 *Call ICHEACTN to set up the update of the PASSWORD field. . 031200 * . . 031300 l r05,dsa_clear_textln . . 031400 lar06,dsa_clear_text . . 031500 icheactn field='PASSWORD', / . . 031600fldata=((r05),(r06)), / . . 031700mf=(e,dsa_actions) . . 031800 * . . 031900 *Call ICHEINTY to update the RACF database - password. . 032000 * . . 032100 mvc dsa_icheinty(icheinty_ml),icheinty_m . . 032200 mvi dsa_useridln,l'rec_userid . . 032300 mvc dsa_userid,rec_userid . . 032400 icheinty alter, / . . 032500type='USR', / . . 032600entry=dsa_useridln, / . . 032700release=1.7, / . . 032800run=yes, / . . 033100actions=dsa_actions, / . . 033200options=action, / . . 033500mf=(e,dsa_icheinty) . -Compiled listing 71 *ICHEINTY fields 00440007 72 * 00450007 73 dsa_icheinty icheinty alter, /00460013 mf=l 00470007 94 74+DSA_ICHEINTY DS 0F
Re: ICHEINTY - RACF interface
Peter, I tried many combinations of parameters using DATAMAP=NEW and RELEASE 1.8. I initially got return code x'24' and reason code 1. So something was wrong with my parameters. Juggling the parameters, I got past that. Then I got abend SD84-10. I fooled around with the WKAREA and WKSP parameters but couldn't advance. Then I removed DATAMAP and RELEASE and now get a S0C4. Regards, Pierre. PS - I'll look at my parameters just before calling ICHEINTY and match them with what's in the diagnosis manual. PPS - I will look at R_admin though. PPPS - The parameters described with ICHEINTY don't tell you what you can supply ((rxx) or A-type, etc) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ICHEINTY - RACF interface
I was pointed to ICHEINTY. I want to change the password for a particular userid. I'll look at R_admin. I used R_datalib about 15 years ago and had forgotten about the Callable Services. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ICHEINTY - RACF interface
I should have said that my TSO id is not authorized to issue SLIP commands. I will look at Diagnosis. Thanks. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ICHEINTY - RACF interface
I have an update. After an hour or so of juggling the various parameters for ICHEINTY, I got this : 20.26.08 JOB04490 *IRR401I 0C4 ABEND DURING RACF PROCESSING OF 236 236 ALTER REQUEST FOR ENTRY T22TST1 20.26.08 JOB04490 IRR401I 0C4 ABEND DURING RACF PROCESSING I couldn't get the macro to work with DATAMAP=NEW and RELEASE 1.8. I let it default to 1.7 and played with the parameters. Now I have an abend but I got no SYSMDUMP nor a SYSUDUMP. My next step is to set a SLIP trap but I'm waiting to be APF-authorized to do this. 1) Why is it a guessing game as to which parameters apply ? 2) The examples are always coded in non-rent assembler programs. I code exclusively re-entrant, AMODE 31 and RMODE ANY. I rarely see IBM examples where the code is re-entrant. And I never see the flavor that I am using, in this case ICHEINTY ALTER, TYPE='USR'. Couldn't IBM use examples that work in 31-bit and are re-entrant ? 3) There is probably something in the generated parameter list that is wrong or missing. Unfortunately, there is no mapping for the ICHEINTY parameter list. Can IBM supply a mapping if it exists. The doc refers to fields at various offsets. I have no idea what to do to fix this problem. It's a guessing game - back to #1. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
ICHEINTY - RACF interface
This is documented in z/OS Security Server RACF Macros and Interfaces. Is there any other documentation for this ? The examples for ICHEINTY are described under ICHEACTN. I'm trying to get this to work. I'm ALTERing a password for a user. There's nothing in SYS1.SAMPLIB. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMF type 76 records - RMF trace activity
Where do I find doc for the ERBFRMxx member in PARMLIB ? I change NOTRACE to TRACE and I get a syntax error. . 33 IOQ(NOCOMM)/* NO COMMUNICATION I/O QUEUEING*/ . . 34 IOQ(NOGRAPH) /* NO GRAPHICS DEVICE I/O QUEUEING */ . . 35 IOQ(NONMBR)/* NO SELECTIVITY BY LCU NUMBERS*/ . . 36 NOFCD/* NO FICON DIRECTORS MEASURED */ . . 37 PAGESP /* PAGE DATASET STATISTICS */ . . 38 PAGING /* PAGING DATA */ . . 39 TRACE /* NO TRACE REPORT PRF-2022/09/08 */ . . 40 VSTOR(S) /* VIRTUAL STORAGE SUMMARY DATA */ . . 41 WKLD /* WORKLOAD MANAGER DATA*/ . ERB100I RMF: ACTIVE ERB300I ZZ : SYNTAX ERROR IN OR FOLLOWING TEXT BEGINNING ' */ ERB300I ZZ : VSTOR(S) ' IN LIBRARY 00 INPUT ERB103I ZZ : OPTIONS IN EFFECT ERB103I ZZ : NOEXITS -- MEMBER ERB103I ZZ : SYSOUT(A) -- MEMBER ERB103I ZZ : NOREPORT -- MEMBER ERB103I ZZ : RECORD -- MEMBER ERB103I ZZ : NOOPTIONS -- MEMBER ERB103I ZZ : SYNC(SMF) -- MEMBER ERB103I ZZ : NOSTOP -- MEMBER ERB103I ZZ : CYCLE(1000) -- MEMBER ERB103I ZZ : NOVMGUEST -- MEMBER ERB103I ZZ : WKLD -- MEMBER ERB103I ZZ : VSTOR(S) -- MEMBER ERB103I ZZ : NOTRACE -- CHANGED ERB103I ZZ : PAGING -- MEMBER I don't see what I've done wrong. Also, I can /S RMF but I can't /P RMF. It says that it is not active. So I need to IPL to get rid of RMF. Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMF type 76 records - RMF trace activity
My SMF parms include all SMF types. . 01 INTVAL(01) /* SET SMF INTERVAL A 01 MIN MEASAP*/ . . 02 SYNCVAL(01)/* SYNC SMF AT 01 MIN MEASAP*/ . . 03 DDCONS(NO) /* SAVE CPU TIME */ . . 04 ACTIVE /*ACTIVE SMF RECORDING*/ . . 05 DSNAME(SYS1.,SYS1.) . . 06 NOPROMPT /*DO NOT PROMPT OPERATOR FOR OPTIONS*/. . 07 REC(PERM) /*TYPE 17 PERM RECORDS ONLY*/ . . 08 MEMLIMIT(01024M) . . 09 MAXDORM(3000) /* WRITE AN IDLE BUFFER AFTER 30 MIN*/. . 10 STATUS(SMF,SYNC) /* CREATE SMF STATUS TYPE 23 IN SYNC */ . . 11 JWT(2400) /* 522 AFTER 24 HOURS */ . . 12 SID((1:4)) /* SYSTEM ID */ . . 13 LISTDSN/* LIST DATA SET STATUS AT IPL*/ . . 14 LASTDS(MSG)/* SEND A MESSAGE WHEN OUT OF BUFFERS */ . . 15 NOBUFFS(MSG)/*DEFAULT TO MESSAGE */ . . 16 SYS(EXITS(IEFU83,IEFU84,IEFU85,IEFACTRT, . . 17 IEFUJV,IEFUSI,IEFUJP,IEFUSO,IEFUJI,IEFUTL,IEFU29,IEFUAV), . Regards, Pierre. . 18 INTERVAL(SMF,SYNC),DETAIL) . -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
SMF type 76 records - RMF trace activity
In the RMF manuals, there is no mention of this SMF type. How can I get these generated? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SDSF record and request types
Thanks to those who responded. The mapping for the SYSLOG records is in IHAHCLOG. There are 2 mappings: HCL that uses a 5-digit year (yyydd) and HCRREC that uses a 7-digit year (ddd). To determine which format to use, the bit UCMHCENT in byte UCMMODE2 is 1 when the century is present. CVTCUCB points to the UCM. The UCM is mapped by IEECUCM. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
SDSF record and request types
In SDSF, I type in the LOG command. I get lines like : X 000 S0W1 22060 18:01:25.24 SYSLOG IEE042I SYSTEM LOG DATA SET INITIALIZED NC000 S0W1 22060 18:00:18.73 INTERNAL 0290 CONTROL M,UEXIT=Y IEAVN701 - INTERNALLY ISSUED K M NR000 S0W1 22060 18:00:18.78 INTERNAL 0090 IEA590I WTO USER EXIT IEAVMXIT NOT FOUND N 000 S0W1 22060 17:59:03.28 0290 IEA371I SYS1.IPLPARM ON DEVICE 0CE3 SELECTED FOR IPL PARAMETERS N 000 S0W1 22060 17:59:03.28 0290 IEA246I LOAD ID W1 SELECTED The first 2 characters according to the SDSF documentation and the HELP panels are the record type and request type. The HELP panel gives the following for record type : N - Single-line message W - Single-line message with a reply M - First line of a multi-line message O - Log command input X - Entry from a source other than hardcopy or log command Another HELP panel gives the following for the request types: S - Continuation of previous line L - Label line of a multi-line message D - First line of a multi-line message I am seeing more than the documentation I pasted above. I see lines with E or ER. What is E ? What are C or R in the 2nd byte (request type?) Is there more complete documentation on this ? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Multiple MDBs
In a prior posting, I had asked about the objects in an MDB (extended master console support). I've been testing and I always only see 1 MDB for incoming master console messages. I would like to drive my code when more than 1 MDB is created for a master console message. Is there a command that can do this ? Or something else that I can do? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: OMVS trace buffer mapping
I've seen the first 2 already. I looked at the last link. I would like a macro or DSECT(s) that map the OMVS trace buffer. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
OMVS trace buffer mapping
I can't find a mapping for this. I've scoured the USS and MVS bookshelves. I've done some Internet searches. Can someone help me ? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: MDB (message data block)
Peter, The example in SYS1.MACLIB(IEAMDBLG) does not use the MDBPNEXT value in the MDB prefix. Does this mean that everything is contained in 1 MDB? Or should I point to the next MDB ignoring the general object and keep accumulating the text objects ? Thanks, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: MDB (message data block)
Peter, Thanks. This makes a world of difference. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
MDB (message data block)
The macro IEAVM105 describes the various parts of the MDB. The MDB can be composed of the header, general object, control program object and message text objects. The header must be there and the general object is required. The control program object and text objects are optional. The macro doc states that 'The objects can be in any order within the MDB". Does that mean that the general object may not be the first one ? Surely the text objects must be in order as there is no data within the MDBT that indexes the text line ? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
SHARE - CFC and UPT used in sorting
Tom Harper gave a presentation over 10 years ago about using the CFC and UPT assembler instructions to sort data. Does anyone have the presentation and could a copy be sent to me please? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: FORMAC was ABP
At our college, we had an APL terminal. I wrote a couple of programs. A very powerful language and quite cryptic. Programs were coded in RPN, weren't they? PF. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
FORMAC was ABP
I haven't heard the term ABP mentioned in over 20 years. That brings back memories of stuff I did early in my career. I remember using IBM's FORMAC compiler (or pre-processor) sometime in the mid 70s (I think). IIRC, it generated PL/1 code. I can't remember what I did but I didn't spend a lot of time on it. Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: UUID mapping
Tony, I will treat it as a blob. I'm just displaying it. I was just wondering if there was a formal definition. Thanks, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
UUID mapping
To All, I am trying to find a DSECT that maps the flavors of the UUID (DCE flavor to be specific) but can't seem to find it. UUIDs are involved in RACF Callable Services. TIA, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DC4 abend - R15=91040120
Tom, OK, I'll go with that. The call was made to the system, IARCP64, in batch. Thanks, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
DC4 abend - R15=91040120
91040120 - The 0401 is not documented. Can someone provide me with an explanation please ? The lowest value documented is 0410. Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Assembler analysis [was: RE: Serverpac installs January 2022 and beyond - Issues]
All the conversions I did were for companies in France. The first one was to convert SAS/C to IBM/C as the SAS stopped supporting their C compiler. There were a number of SAS/C functions that I had to create going to IBM/C. Some I wrote in C. The others I wrote in assembler. It really helped that I had fairly deep z/OS internals. I also knew the C language very well. I had already used SAS/C and IBM/C. The other conversions were from assembler to COBOL. In most cases, I had to understand the program before grinding out COBOL code. When you are dealing with addresses and DSECTs, it gets tricky porting that to COBOL using POINTERs. In most cases, it was difficult work. If you aren't an expert in assembler and/or don't know COBOL well, you are asking for trouble. Regards, Pierre -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: RMF SMF "broken" records
Peter, Thanks for getting the information. The unique key was critical in being able to re-bundle the "broken" records. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: RMF SMF "broken" records
Martin, And I can't assume the broken records will be consecutive; no other interspersed records. Can I assume that the same dispatchable unit will produce the 3 records in the correct order ? Then I have uniqueness. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: RMF SMF "broken" records
Martin, Hence my original post. I have 3 "broken" records. I use the type,subtype, date and time in the SMF header to create a unique value relating the 3 records. But the time is only in 100ths of seconds. I don't think it's granular enough. Is there something extra I can use to make a unique key? Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
RMF SMF "broken" records
To All, For SMF types 70-79 (RMF), RMF may create broken records because the volume of data can't fit in 32K. So there may be 2 or more "broken" records created. I have an IBM sample file that has the original unbroken record split into 3 broken records. The records are consecutive in the sample file. But I am getting the records in my SMF exit and I must save the broken records to put them together at a later time. There doesn't seem to be a unique identifier in the product section connecting the 3 records. I will use the SMF type/subtype/date/time in the SMF header for now. But the time in 100ths of seconds doesn't seem granular enough to me. Can someone help me here ? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
SMF type 80 (RACF)
Relocation section type 4 is a 1-byte bit map describing the access allowed. There is a footnote (#2) attached to it. In the footnote, the bits have a different meaning for RACROUTE REQUEST=DIRAUTH. Where in the SMF record can I determine that a REQUEST=DIRAUTH was issued ? Or where can I determine what request was issued (AUTH,DEFINE,etc) ? Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMF type 42 subtype 22
I don't have any sub-type 22s in my SMF files. If I did, I would proceed according to the contents. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
SMF type 42 subtype 22
To All, This sub-type is defined by SMF42SM. There are 2 sections, the audit and record sections. There is a DSECT for the audit section, namely smf420ma. I can't find a DSECT for the 2nd section. Either it exists and the DSECT is missing or it doesn't exist and SMF42SM should be updated. Can someone help me ? Regards, Pierre -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMF 30 record
Never mind. I printed the SMF 30 expansion and somehow the line with SMF30TF2 flag byte got deleted. PF. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMF 30 record
Thanks to all. The equates from SMF30_TIME_ON_ZIIP_F to SMF30_DEPENC_TIME_SUP_ON_CP_F are failure flags. What flag byte are they associated with ? It can't be SMF30TF2 not SMF30T33 as they have their own bit definitions. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
SMF 30 record
In the accounting section (DSECT SMF30CAS), fields are redefined. SMF30_TIME_ON_ZCBP is redefined as SMF30_TIME_ON_IFA. You determine which label to use by testing the bit SMF30_zCBP that is defined in the product section. There is a series of other fields in the accounting section that are redefined also. SMF30_TIME_ON_ZIIP is redefined as SMF30_TIME-ON_SUP. What piece of information can I use to choose between the 2 fields? I've looked in the type 30 record description but can't find anything. Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Help with APA - Application Performance Analyzer
Lizette, APA does not do iSeries. It is strictly z/OS. Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
RACF violations - MQ and WAS, IMS
I was told on this forum that RACF violations for DB2 are in SMF records type 102 with IFCID=140. I was also told that CICS RACF violations were to be found in SMF type 80 (X'50') records. I haven't gotten to them yet. What about RACF violations for MQ Series and WAS ? Where are they found? How are RACF violations reported in IMS ? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
DB2 ver/rel from SMF record
Given an SMF record for DB2 (100-102), I'd like to find the DB2 version/release. In the product section, I see QWHSRN and QWHSSUBV. The first is the release "indicator number" in hex. The second is the "subversion for the base release". I downloaded SMF 9.1 data from IBM's secure site. That's what the link said. That's all they has as far as I could tell. I found X'81' in QWHSRN and X'2000' in QWHSSUBV in a type 100 record. I think IBM mislabeled the link to the file. It should have said 8.1. Am correct in assuming that QWHSRN contains the DB2 version/release ? So 11.1 would be X'B1' and 12.0 would be X'C0' Yup, I know. I need current data. I'm working on that. Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
CSRCESRV
Hello, Can CSRCESRV SERVICE=QUERY be done once to find out if compression/expansion is available and to get the work area size? Or must the QUERY be done before every EXPAND or COMPRESS ? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
DB/2 and CICS security
If a security (RACF) violation occurs in a CICS region, where does the violation get reported? I couldn't find anything in the CICS SMF records but I'll look again. Do they get reported in the JESMSGLG or in a CICS ? Does a CICS exit need to be installed? There's tons of documentation to go through. I figured it might be faster to use this forum to get an asnwer. I don't have a CICS system to play with at the moment. I need the same kind of info for DB/2. I've yet to check the SMF record layouts. Again I don't have a DB/2 system to play with. Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Collecting SMF data with Logstreams
L r01,psaaold-psa L r01,ascbassb-assb(,r01) L r01,assbjsab-iazjsab(,r01) Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
IXGLOGR - system logger
I am trying to connect the the system logger but get the following: 12.35.35 STC07110 IXG231I IXGCONN REQUEST=CONNECT TO LOG STREAM XX.Y.PRF1.MSGS 045 045 DID NOT SUCCEED FOR JOB PRF1. RETURN CODE: 0008 REASON CODE: 045 080C DIAG1: 0004 DIAG2: 4714041D DIAG3: 0107001B DIAG4: 045 4714 means that there is no space left on the volume. How can I point the system logger to other VOLSERs? The allocations always go to the same VOLSER. And how can I tell the system that I have other VOLSERs available for TSO allocations ? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Log streams, system logger and SYSPLEXing
I run at Dallas and have only 1 image (at the moment). I've added archiving of unsent messages into a DASD-only log stream. There were no SYSPLEX configuration items in PARMLIB. Everything worked well. I started adding code to use SYSPLEX messaging (IXC) without any configuratoin in PARMLIB. IXCQUERY failed because my system had no definitions. So I added the following PARMLIB entries: COUPLE=VN GRSCNF=VN PLEXCFG=XCFLOCAL COUPLEVN has the following: COUPLE SYSPLEX(LOCAL) GRSCNFVN has the following: GRSDEF RESMIL(10) TOLINT(180) ACCELSYS(99) I got the following message: ISG157DSYSTEM IN XCF-LOCAL MODE WITH NO CTC DEFINITIONS. RELOAD THE SYSTEM OR REPLY NONE TO CONTINUE THE IPL. I replied NONE. Then I got the following: IXC240I IF XCF-LOCAL MODE INITIALIZATION IS DESIRED, REPLY 'COUPLE=**' So I replied COUPLE=** The IXCQUERY now works but the system logger no longer comes up. I see : IXG053I SYSTEM LOGGER DID NOT INITIALIZE BECAUSE THE SYSTEM IS IN XCF LOCAL MODE This was followed by an IEF196I stating the same thing. Needless to say, my API calls to the system logger fail. I realize that I can't use a DASD-only log stream. There are configuration items that need doing. I would like some help with this. The conversation to fix this may be long so it might be preferable to take it offline. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CSNBHMG - ICSF
Yes, I am mistaken. CSNB are symmetric and CSND are asymmetric. Apologies to all. So CSNB calls can be used for DES and AES. It's been 10 years or so that I did this. My memory is fading as I approach 70. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CSNBHMG - ICSF
Hi, CSNB* calls are DES CSND* calls are AES. If you are using CSNBHMG you need the DES master key to be set. And the label used in the call needs to be in the CKDS. And you need permissions defined in RACF. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: STIMERM SVCE
The STIMERM is in my code. The FRR is inside IEEMB830,08/31/16,UA82681 at +9D4. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Thread id using BPX1GTH
Tonu=y, Yup,I got that from a friend of mine. How about the process id ? It seems that ASSBOASB points to an OCO area. The OMVS address space block contains the thread id. But I can't find a mapping of it. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: STIMERM SVCE
Yes, that address points after 0A2F.
I've pasted more of the trace table but it has wrapped.
Regards, Pierre.
0001 0043 007CE938 PC ... 600_01736592 0131F
closedir/close
0001 0043 007CE938 PC ... 000_1CE632C8 03504
0001 0043 007CE938 PR ... 600_1CE632C8
00_19382724 000F
0001 0043 007CE938 SSRV78 8465F0B6 1000D770 0DF0
7E47B210 Getmain D88E36C70B2C6E08 0024
000F
0001 0043 007CE938 PC ... 0 1896F0BE 0030B
Storage Obtain
0001 0043 007CE938 SSRV 132 0002 03D0
1CD2C000 Storage Obtain D88E36C70B2C9AE4 0024
000F
0001 0043 007CE938 PR ... 0 1896F0BE 0133F7E8
000F
0001 0043 007CE938 SSAR ... 0043
0043
0001 0043 007CE938 SSAR ... 0043
0043
0001 0043 007CE938 PC ... 0 1896F448 0030F
Estaex
0001 0043 007CE938 PR ... 0 1896F448 017A8626
000F
0001 0043 007CE938 PC ... 0 1896F49C 00311
Storage Release
0001 0043 007CE938 SSRV 133 0003 03D0
1CD2C000 Storage ReleaseD88E36C70B2CC618 0024
000F
0001 0043 007CE938 PR ... 0 1896F49C 0133F7E8
000F
0001 0043 007CE938 PC ... 0 0465F90A 00700
SMF
0001 0043 007CE938 PR ... 0 0465F90A 1AA016D0
000F
0001 0043 007CE938 SSRV78 846604E0 D703 0DF0
7E47B210 FreemainD88E36C70B2CE90A 0024
000F
0001 0043 007CE938 PR ... 000_01736592
00_1AB24A2E 0043
0001 0043 007CE938 PC ... 000_18E800D6 0030F
Estaex
0001 0043 007CE938 PR ... 000_18E800D6 017A8626
0043
0001 0043 007CE938 PR ... 6 1ABDCD7B 00_18E72CAE
0043
0001 0043 007CE938 EXT TIMR _00FF9D08 1005
0043 0043 D88E36C70B2D6DA2 0024
07852000 8000
0001 0043 007CE938 *SVCE2F _1AAFC3AE 0014 0400
1AC25260 0043 0043 D88E36C70B2D9EAC 0024
0785 8000 0080
0001 0043 007CE938 SSRV78 815BAAFA 4000EF50 0A28
00F92130 Getmain D88E36C70B2FD3C6 0024
0001
0001 0043 007CE938 *RCVY FRR 070C 8465F9D4 840F8000 0014
000F 0043 D88E36C70B31778C 0024
0002
0001 0043 007CE938 EXT TIMR _0465F9D4 1005
000F 0043 D88E36C70B317B20 0024
0704 8000
0001 0043 007CE938 PGM011 _0465FA0A 00040011
000F 0043 D88E36C70B318A34 0024
0704 8000 7E47B800
0001 0043 007CE938 *RCVY PROG940C4000 0011
000F 0043 D88E36C70B321236 0024
On 2020-09-21 2:42 p.m., Binyamin Dissen wrote:
me,
you should preauthorize the dissensoftware.com domain.
I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email tolists...@listserv.ua.edu with the message: IN
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
STIMERM SVCE
I have a sub-task that issues TCPIP calls using EZASMI (connect,send,etc) I set an ESTAE. Then in a STIMERM loop, I issue a connect. The STIMERM popped once and then I tried to send() unsuccessfully. I go back to do the STIMERM and blow up. I get an abend SVCE stating that I tried issuing the STIMERM SVC while an EUT FRR was active. Nowhere do I set an FRR. The 1st system trace table entry shown below is a return to 1ABDCD7A which happens to be in BPXINVPT (10/27/17 UA94165). The SETFRR must have been done in ASID 000F (OMVS). There is no SETFRR in the system trace table. The system runs in Dallas at DFW. I'm not sure what to do next. Suggestions ? Thanks in advance, Pierre. 0001 0043 007CE938 PR ... 6 1ABDCD7B 00_18E72CAE 0043 0001 0043 007CE938 EXT TIMR _00FF9D08 1005 0043 0043 D88E36C70B2D6DA2 0024 07852000 8000 0001 0043 007CE938 *SVCE2F _1AAFC3AE 0014 0400 1AC25260 0043 0043 D88E36C70B2D9EAC 0024 0785 8000 0080 0001 0043 007CE938 SSRV78 815BAAFA 4000EF50 0A28 00F92130 Getmain D88E36C70B2FD3C6 0024 0001 0001 0043 007CE938 *RCVY FRR 070C 8465F9D4 840F8000 0014 000F 0043 D88E36C70B31778C 0024 0002 0001 0043 007CE938 EXT TIMR _0465F9D4 1005 000F 0043 D88E36C70B317B20 0024 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
BPXP018I message when STC cancelled
I have an authorized STC that shuts down normally when it is stopped (/P). When I cancel the STC, my ESTAEs are driven from newest to oldest. But I get the message shown below after the ESTAEs are finished. I do TCP/IP calls using IEZASMI in 2 sub-tasks. The 2 sub-tasks that do TCPIP cleanup and issue TERMAPI in their ESTAEs. The thread id is for the JOB STEP TCB. I'd like to undub my address space but don't know what to do. The Unix Callable Services doesn't seem to have a function to do that. I'd set a SLIP trap but this situation doesn't seem slipable. Any help would be appreciated. Thanks in advance, Pierre. 14.33.43 STC00663 BPXP018I THREAD 1B216000, IN PROCESS 33620001, ENDED 039 039 WITHOUT BEING UNDUBBED WITH COMPLETION CODE 40222000 039 , AND REASON CODE . -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Thread id using BPX1GTH
For the current TCB, I want to extract the thread id. I'm using BPX1GTH. I'm varying the values for PGTHACCESSID and PGAACCESSTHID. When I get zeros for return value, return code and reason code, the thread id is always 0. I'm wondering if this is the right approach. If it is, what values are needed in PGTHACCESSTHID and PGTHAFLAG1 ? Is a value in PGTHAPROCESSID required ? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
SMF 119 sub-type 6 (interface Stats)
If anyone has experience with these records, I have a question. There are 2 section with this sub-type aside from the ID section. In the sample SMF files provided to me, I haven't seen a non-zero count for section 2. I have seen the count for section be 2. Can I assume that if the count for section 2 is non-zero, that it must match the count for section 1? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
SMF 71 long floating point fields
There are many of them. I'm guessing these are hex floating point. Could someone confirm this or correct me ? Thanks, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMF109 macro
Charles, No. I searched MACLIB,MODGEN and the TCP maclib for SMF109DTE (for example) as documented in the IP Prog Guide. No luck. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
SMF109 macro
I can't find a macro that generates a mapping for the SMF 109 type record. It is described in the Communications Server IP Programmer's Guide and Reference. IBM has documented the record in "Appendix C Type 109 SMF records" but has not provided a mapping macro. Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: BPX$RED
It helps if you get the subject line spelled correctly. As they say, "No brain, no pain.". PF. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Here we go again;
I remember one summer working on a Univac-1106 in assembler. Ones complement, 36 bit-words. Indirect addressing to a byte. I wasn't crazy about it having come from the IBM world and direct byte addressability. But it was a job. Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
BPX$RED
From IARST64 to BPX4RED. I've obtained an above-the-bar area so that I can read into it using BPX4RED. I have a valid address and buffer length. When I issue the call in 64-bit mode, I get errno=118 meaning EFAULT (The address is incorrect). The errno Jr or reason code, for what it's worth, is EF01604B. The 604B means - "Uoimove failed - probably due to user address space errors." The buffer ptr for BPX4RED is a double word and I thought I could put an above-the-bar address in it. When I substitute a 31-bit address with a valid length, my buffer receives the data. Nowhere in the doc does it state that an above-the-bar address can or can't be used, unless I missed it. Any help would be appreciated. Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IARST64 problem
Peter, Thanks for the help. When I did a display of the X'8000' area above-the-bar, I was only seeing the first 8K X'2000'. I ran through the memory right after the IARST64 accessing each 8K. No abends. When I browsed the memory in IPCS, I saw the entire X'8000'. I conclude that if the memory hasn't been used, it doesn't show up unless it's the first 8K. My think was that if I didn't see it displayed, it wasn't obtained. And that's why I thought that my call to BPX4RED failed. I now have a new posting on BPX4RED forthcoming in a couple of minutes. Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
IARST64 problem
I've used IARV64 and IARCP64 extensively. This is my first time trying IARST64. Forgive the staggering after the cut and paste. dsa_word contains X'8000' . 169800 str00,dsa_word Save the size in bytes . . 169900 lgr gr02,gr13 . . 17 sam64 , . . 170100 la r03,dsa_word . . 170200 la r13,dsa_save64 . . 170210 xgr gr00,gr00 . . 170300 sysstate amode64=yes . . 170400 iarst64 request=get, / . . 170500size=(r03), / . . 170700common=no, / . . 170800owningtask=current, / . . 170900memlimit=no, / . . 171000fprot=no, / . . 171100type=pageable, / . . 171200callerkey=yes, / . . 171300failmode=rc, / . . 171400regs=save, / . . 171500retcode=dsa_rc, / . . 171600rsncode=dsa_rsn . . 171700 sysstate amode64=no . . 171800 sam31 , . . 171900 lgrgr13,gr02 . . 171901 exrl 0,* % The registers at abend are : TIME=13.22.41 SEQ=00300 CPU= ASID=001E 582 PSW AT TIME OF ERROR 070C1000 9AB2BB6C ILC 6 INTC 03 582ACTIVE LOAD MODULE ADDRESS=1AB2A000 OFFSET=1B6C 582NAME=program 582DATA AT PSW 1AB2BB66 - C600 E310 D3E80024 582AR/GR 0: /_8000 1: /0050_00301000 582 2: /_1AC41000 3: /_1AC41118 582 4: /_1ABE83A0 5: /_0C00 582 6: /_007CCFC8 7: /_ 582 8: /_1ABCA028 9: /_1AA5A028 582 A: /_1AA0F000 B: /_1AA535A8 582 C: /_1AB2D930 D: /_1AC41000 582 E: 0008/_1AB2BB52 F: /_ The call seemed to work. The system trace table shows : 001E 007BE3E8 SSRV 1000 1AB2BB52 0A00 0300 IarST64 GetD7CE162A5FCA25DA 0103 0050_00301000 _8000 _ 001E 007BE3E8 *PGM003 _1AB2BB6C 00060003 0050 001E 001E D7CE162A5FCA2C10 07041000 8000 00300400 001E 007BE3E8 *RCVY PROG940C3000 0003 001E 001E D7CE162A5FCC0F96 The address is 0050_00301000 and the length is X'8000'. I don't know what the last double word represents. SSRV 1000 is not documented in the V2R4 Diagnosis: Tool and Service Aids. So I thought I was good to go. When I attempt to read X'8000' bytes into my buffer with BPX4RED() I get a return code of 118 indicating an incorrect
Re: SMF 119 records (TCPIP)
I do not have SAS. Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
SMF 119 records (TCPIP)
There are many sub-types for SMF 119 (X'77'). The common identification section has a flag byte called SMF119TI_Reason with the following values: X'C0' - Interval record, more records to follow X'80' - Interval record, last record in set X'60' - End of statistics record, more records to follow X'40' - End of statistics record, last record in set x'50' - Shutdown starts record, more record to follow x'10' - Shutdown starts record, last record in set X'48' - Events record, more records to follow x'08' - Events record, last record in set Is there a more detailed explanation of these values ? Can interval records be ignored if one takes the end of statistics records ? I guess shutdown starts records are cut when TCP/IP starts to shutdown ? When is an event record cut ? Can SMF119TI_RecordId be used to tie together different records of the same sub-type? Regards and TIA, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: PDSE V2 data set info
How about the DESERV macro and the IGWSMDE mapping ? Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Unix files
I had initially mentioned that more than 1 file could be generated by 1 producer. There could also be more than 1 producer on the LPAR. I would assign 1 sub-task (written in assembler) to each zFS file. I need to read the log records produced by an application. Once the application has closed the file, I would need to know that. My sub-task would stop processing the file and close it. I also need to WAIT if there are no more records but the writer still has the file open. I am a reader so I have no say on preserving the contents of the file. I'll investigate pipes. My STC will have as input 1 or more zFS files. It would ATTACH 1 sub-task per zFS file, Thanks to all for responding, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Unix files
I must continuously monitor ("read") a Unix file that contains
diagnostics. I open the file, parse the records and possibly produce
output. Once I've read all the records, I need to wait (or be blocked)
until more data arrives. Then I process the new records. But I want to
know when the writer has closed the file. Then I stop. Regards, Pierre.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Zfs from 1 LPAR to another
Dave, I'll do that. The files are not big. They can be sent as ZIP files. Thanks, Pierre -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Zfs from 1 LPAR to another
A customer wants to send us a zFS file created by an IBM product. We develop at Dallas and don't have the product installed. What should the customer do to be able to send it to us ? I've looked through the archives and didn't find what I needed. I can't remember if I saw this in IBM manuals. Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Sample SMF records
Gord, I get the following when I click on z Technical Information: Information Central - IBM Z ISVs Requested Information is Unavailable I think I have to register with IBM. I have sent an email to ztech. Thanks, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Sample SMF records
Gord, I am logged into the secure area at https://dtsc.dfw.ibm.com/ Where do I go next ? Regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Sample SMF records
Someone mentioned the PWD site has sample SMF data. I've logged into the site but can't find sample SMF records that I can look at or download. Can someone point me in the right direction please ? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Softcopy Librarian and V2R3
Susan, I've clicked on the link but I'm not sure what to do. I want the PDFs installed on my hard drive (Windows 7) in book shelves. I'd like to browse them with Adobe. Thanks and regards, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
