Re: Command/interface to find the total size of a MIGRAT2 disk file?

2023-04-20 Thread Farley, Peter
Nope, that will do nicely, thank you very much. Peter -Original Message- From: IBM Mainframe Discussion List On Behalf Of Mark Jacobs Sent: Thursday, April 20, 2023 7:14 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Command/interface to find the total size of a MIGRAT2 disk file? Are yo

Re: Command/interface to find the total size of a MIGRAT2 disk file?

2023-04-20 Thread Mark Jacobs
Are you asking for something other than an HLIST DATASET(dsname) MCDS command? Mark Jacobs Sent from ProtonMail, Swiss-based encrypted email. GPG Public Key - https://api.protonmail.ch/pks/lookup?op=get&search=markjac...@protonmail.com --- Original Message --- On Thursday, April 20th

Auto: Command/interface to find the total size of a MIGRAT2 disk file?

2023-04-20 Thread Frederic Mancini
Je suis absent du 21 avril 2023 au 24 avril 2023 inclus. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Command/interface to find the total size of a MIGRAT2 disk file?

2023-04-20 Thread Farley, Peter
I would think HSM has this information stashed somewhere, but is there a command or API one can use to display that information? Peter This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader

Re: Rexx Exec to Build 10,000 PDS Members: ALLOC vs ISPF Services vs ?

2023-04-20 Thread Peter Sylvester
hi, Since about half a century the 10 line Speedy implentation of snobol can do this (changing recfm is automatic). The SPITBOL LOADMODS can be found here https://www.jaymoseley.com/hercules/compilers/spitbol370.htm CBTTAPE inclusion is under construction. Best Peter Instead of 'O = R' one ca

Re: Free TN3270E with GDDM support

2023-04-20 Thread Martin Packer
Because I haven't found a free 3270 Host Graphics emulator I've taken to converting all the graphics I create using ADMUGIF to GIF. These I download BINARY. I don't suppose this helps the OP. Cheers, Martin Sent from my iPad > On 20 Apr 2023, at 16:31, Dave Jones wrote: > > Unfortunately,

Re: Rexx Exec to Build 10,000 PDS Members: ALLOC vs ISPF Services vs ?

2023-04-20 Thread Wendell Lovewell
Gil, For instream data, you should be ok by specifying a unique DLM value on the SYSIN DD statement. But if the data contained statements starting with ./ statements, that would be a problem. I don't know about the UPDTE program mentioned from the CBTAPE. But Lennie is right--IEBUPDTE on

Re: Rexx Exec to Build 10,000 PDS Members: ALLOC vs ISPF Services vs ?

2023-04-20 Thread David Spiegel
Hi Gil, Please see CBT Tape File 093. (cbttape.org) Regards, David From: IBM Mainframe Discussion List on behalf of Paul Gilmartin <042bfe9c879d-dmarc-requ...@listserv.ua.edu> Sent: April 20, 2023 12:43 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Rexx Exec

Re: Rexx Exec to Build 10,000 PDS Members: ALLOC vs ISPF Services vs ?

2023-04-20 Thread Paul Gilmartin
On Thu, 20 Apr 2023 09:18:27 -0500, Wendell Lovewell wrote: >I don't know about the logic required to create a member -- Kolusu might have >the best idea. But creating one long sequential file with all the members >and using IEBUPDTE is pretty simple: > Doesn't IEBUPDTE impose some archaic r

Re: Rexx Exec to Build 10,000 PDS Members: ALLOC vs ISPF Services vs ?

2023-04-20 Thread Robert Prins
There's a program on one of the CBTTape site "tapes" (I'm sure someone will jump in with the number of the tape) called UPDTE that can handle any LRECL, been using it for years. Robert On Thu, 20 Apr 2023 at 15:46, Lennie Dymoke-Bradshaw < 032fff1be9b4-dmarc-requ...@listserv.ua.edu> wrote: >

Re: Call to RACF R_admin from CICS module

2023-04-20 Thread Lennie Dymoke-Bradshaw
CICS does not run your transactions under your signon userid. They run under the CICS address space ID, with its authority. So IRRSEQ00 simply looks for an ACEE in TCBSENV and if it does not find one, it used ACSBSENV. Hence your result. Lennie Dymoke-Bradshaw https://rsclweb.com ‘Dance like no

Re: Rexx Exec to Build 10,000 PDS Members: ALLOC vs ISPF Services vs ?

2023-04-20 Thread Lennie Dymoke-Bradshaw
This is a good solution but I have a feeling this only works with certain DCBs. I think it is limited to a maximum LRECL of 80 bytes. Lennie -Original Message- From: IBM Mainframe Discussion List On Behalf Of Wendell Lovewell Sent: 20 April 2023 15:18 To: IBM-MAIN@LISTSERV.UA.EDU Subjec

Re: Free TN3270E with GDDM support

2023-04-20 Thread Dave Jones
Unfortunately, I don't know of any free TN3270E emulator that supports GDDM. I would love to see one, especially for Linux. If I really need to get to GDDM, I use IBM's PCOMM ($$) on Windows. DJ -- For IBM-MAIN subscribe / signo

Call to RACF R_admin from CICS module

2023-04-20 Thread John Blythe Reid
Has anyone used RACF callable services from a CICS module ? This is the call to the R_admin interface: CALL IRRSEQ00 (Work_area, ALET, SAF_return_code, ALET, RACF_return_code, ALET, RACF_reason_code,

Free TN3270E with GDDM support

2023-04-20 Thread rpinion865
Any suggestions for a free TN3270E emulator that has GDDM support? Sent with [Proton Mail](https://proton.me/) secure email. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.ed

Re: Rexx Exec to Build 10,000 PDS Members: ALLOC vs ISPF Services vs ?

2023-04-20 Thread Sri h Kolusu
>> What happens if two key values differ only in case of characters, e.g. >> "Wombat" vs. "WOMBAT"? Paul, Since we are sorting on the key, the lower case "wombat" gets to the top. >> If key values are longer than 8 characters, can it generate member names? NO. PDS member names cannot be grea

Re: Rexx Exec to Build 10,000 PDS Members: ALLOC vs ISPF Services vs ?

2023-04-20 Thread David Spiegel
Hi Gil, - They Keys are all Upper Case. - The Keys are all not longer than 8 characters - DYNALLOC for each member. Thanks and regards, David On 2023-04-20 10:30, Paul Gilmartin wrote: On Thu, 20 Apr 2023 13:19:54 +, Sri h Kolusu wrote: If you need to split a file by a key into various mem

Z15 HMC Question

2023-04-20 Thread Mark Jacobs
I created a custom group that contains a subset of the LPARs defined on that CEC. When I assign an activation profile to an LPAR in the custom group, the new assignment isn't being reflected in the Systems Management tab for the LPARs I changed, it's showing the value that was assigned before my

Re: Rexx Exec to Build 10,000 PDS Members: ALLOC vs ISPF Services vs ?

2023-04-20 Thread Paul Gilmartin
On Thu, 20 Apr 2023 13:19:54 +, Sri h Kolusu wrote: > >If you need to split a file by a key into various members of a pds , it is >quite simple to do with DFSORT and performing the epilog too. (Totals, counts >...) can all be done in DFSORT. > What happens if two key values differ only in c

Re: Rexx Exec to Build 10,000 PDS Members: ALLOC vs ISPF Services vs ?

2023-04-20 Thread Wendell Lovewell
I don't know about the logic required to create a member -- Kolusu might have the best idea. But creating one long sequential file with all the members and using IEBUPDTE is pretty simple: //STEP1EXEC PGM=IEBUPDTE,PARM=MOD //SYSPRINT DD SYSOUT=* //SYSUT1 DD DISP=OLD,DSN=SOME.PDSE //

Re: Rexx Exec to Build 10,000 PDS Members: ALLOC vs ISPF Services vs ?

2023-04-20 Thread David Spiegel
Hi Kolusu, Thank you for the information. Do you have any working samples (or know where to find them)? Regards, David On 2023-04-20 09:19, Sri h Kolusu wrote: David, If you need to split a file by a key into various members of a pds , it is quite simple to do with DFSORT and performing the e

Re: Rexx Exec to Build 10,000 PDS Members: ALLOC vs ISPF Services vs ?

2023-04-20 Thread Sri h Kolusu
David, If you need to split a file by a key into various members of a pds , it is quite simple to do with DFSORT and performing the epilog too. (Totals, counts ...) can all be done in DFSORT. Thanks, Kolusu DFSORT Development IBM Corporation ---

Re: Rexx Exec to Build 10,000 PDS Members: ALLOC vs ISPF Services vs ?

2023-04-20 Thread David Spiegel
Hi Peter, There are approximately 5,000,000 records sorted by primary key in a "flat file". The idea is to create PDS members using the primary key as member name. So for member X, each record in PDS(X) has a primary Key of X. For each member created, an "epllog" is also produced (inside the cr

Re: Using BSAM to witre a RACFM=VB dataset

2023-04-20 Thread Binyamin Dissen
Right. Missed that. On Thu, 20 Apr 2023 10:24:03 + Seymour J Metz wrote: :>That's only relevant if you're using BDAM. :> :> :>-- :>Shmuel (Seymour J.) Metz :>http://mason.gmu.edu/~smetz3 :> :> :>From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.U

Re: Using BSAM to witre a RACFM=VB dataset

2023-04-20 Thread Seymour J Metz
That's only relevant if you're using BDAM. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Binyamin Dissen [bdis...@dissensoftware.com] Sent: Thursday, April 20, 2023 5:

Using BSAM to witre a RACFM=VB dataset

2023-04-20 Thread Binyamin Dissen
I see that there is WRITE SF RC=4 which means that a WRITE SZ has to be issued (where the system supplies the record so there is zero application logic to build it) and then the original WRITE SF must be reissued. WRITE SF IF R15=4 then WRITE SZ