Re: Simple Rexx question

2024-08-22 Thread Seymour J Metz
Why? Either BPXWDYN or LISTDSI is simpler. --  Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 עַם יִשְׂרָאֵל חַי נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר From: IBM Mainframe Discussion List on behalf of Binyamin Dissen <0662573e2c3a-dmarc-requ...@

Re: SMFLIM Policy question

2024-08-22 Thread Radoslaw Skorupka
How do you recognize the job is "specific"? Is it smell or colour? :-) Seriously: you can use jobname mask or RACF access to some resource. Or some other identifiers, like jobclass, program name, stepname, account number... -- Radoslaw Skorupka Lodz, Poland W dniu 20.08.2024 o 18:53, Mark

Re: [EXTERNAL] Re: HSM question

2024-08-22 Thread Pommier, Rex
Depending on the tape retention parameters in the TS7770 itself, once HSM releases the tapes (and backing disk storage) for reuse, the TS7770 may retain the tapes and storage for a few more days. In your virtual tape area on the VTS GUI, check the categories and look at the scratch categories.

Re: Simple Rexx question

2024-08-22 Thread Rupert Reynolds
I imagine a lot of useful tools pre-date BPXWDYN and BPXWDY2 I ended up writing something callable from assembly and PL/I, but only for DISP=SHR and OLD, and I made sure SHR meant (SHR,KEEP,KEEP) :-) Roops On Thu, 22 Aug 2024, 12:54 Seymour J Metz, wrote: > Why? Either BPXWDYN or LISTDSI is si

Re: Simple Rexx question

2024-08-22 Thread Bob Bridges
I wrote these before learning about BPXWDYN, and I'm used to them now. To tell you the truth, I STILL haven't learned about BPXWDYN, not really; I don't do much with Unix, just enough to log on, create a user's home directory, check ownership bits and the like. I don't know what TOCTTOU is. Y

Re: Simple Rexx question

2024-08-22 Thread Lennie Bradshaw
TOCTTOU Time Of Check To Time Of Use Lennie -Original Message- From: IBM Mainframe Discussion List On Behalf Of Bob Bridges Sent: 22 August 2024 14:29 To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Simple Rexx question I wrote these before learning about BPXWDYN, and I'm used to them now.

Re: SMFLIM Policy question

2024-08-22 Thread Mark Jacobs
We have two SMFLIMxx policies in effect 1) JOBNAME(*) 2) JOBNAME(specific) with no region settings at all. Regardless of the order the policies are defined in the member, the job with the specific jobname gets assigned the region limits defined in the JOBNAME(*) policy. What I'm trying to do i

Re: [EXTERNAL] Re: HSM question

2024-08-22 Thread גדי בן אבי
Thanks That was what I was looking for. There is a 1 day retention period before the tapes are scratched. Gadi -Original Message- From: IBM Mainframe Discussion List On Behalf Of Pommier, Rex Sent: יום ה 22 אוגוסט 2024 16:00 To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: [EXTERNAL] Re: HSM q

Re: HSM question

2024-08-22 Thread Lizette Koehler
You might want to do earl or tmsgrw to see how many tapes have zero Block count Next what is the ttl (time to live) on the TS7700? Ours is 7 days. Reclaimed tapes are not cycled back to scratch pool in the appliance for a week We do not see any changes in amount of storage until ttl is actioned

Re: Simple Rexx question

2024-08-22 Thread Thomas Berg
Hi, I have a rexx that extract info about allocations from current memory. I. e. it works outside TSO. (I haven't used it in 8 years so YMMV...) If you are interested I can send it to you. Extract from desc text: /* REXX

Re: Simple Rexx question

2024-08-22 Thread Paul Gilmartin
On Thu, 22 Aug 2024 09:28:34 -0400, Bob Bridges wrote: >I wrote these before learning about BPXWDYN, and I'm used to them now. To >tell you the truth, I STILL haven't learned about BPXWDYN, not really; I don't >do much with Unix, just enough to log on, create a user's home directory, >check ow

Re: ODBC from MVS to a non-MVS (say Linux or Windows)

2024-08-22 Thread Attila Fogarasi
ODBC is a programming API for application programs written in C/C++ to use as an alternative to SQL. It isn't a connection protocol to a remote database server. That connection can be a variety of ways, such as DRDA or Db2 Connect (that is a gateway) ... it all depends upon the specific remote sy

Re: Simple Rexx question

2024-08-22 Thread Binyamin Dissen
Is it? On Thu, 22 Aug 2024 11:54:12 + Seymour J Metz wrote: :>Why? Either BPXWDYN or LISTDSI is simpler. :> :>--  :>Shmuel (Seymour J.) Metz :>http://mason.gmu.edu/~smetz3 :>??? ?? ??? :>?? ??? ?? :> :> :> :> :>From: IB

Re: Simple Rexx question

2024-08-22 Thread Seymour J Metz
Does it dual path the SWA? BPXWDYN takes care of all the housekeeping in every environment. --  Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 עַם יִשְׂרָאֵל חַי נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר From: IBM Mainframe Discussion List on behalf of

Re: Simple Rexx question

2024-08-22 Thread Thomas Berg
I can't answer that, the code is ftom Doug Nadel. The SWA part is as follows: GET_SWAREQ: Procedure Expose a. If Right(C2x(Arg(1)),1) <> 'F' Then /* SWA=BELOW ? */ Return C2d(Arg(1)) + 16 /* YES, Return SVA+16 */ sva = C2d(Arg(1)) /* CONVERT TO DECIMAL */ tcb = PTR(540) /* TCB PSATOLD

Re: Simple Rexx question

2024-08-22 Thread Glenn Knickerbocker
Won't work for USS files, though. Those will need BPXWDYN. https://www.ibm.com/docs/en/zos/3.1.0?topic=tef-listdsi says > Restriction: LISTDSI does not support files in the UNIX file system. > Unpredictable results might occur. 9 *-* "ALLOCATE DD("Arg(1)")" Arg(2)

Re: Simple Rexx question

2024-08-22 Thread Paul Gilmartin
On Thu, 22 Aug 2024 07:58:28 +0300, Binyamin Dissen wrote: >... >"EXECIO 5 DISKR Q1Q2Q3 (FINIS" > Fairly good idea. But suppose Q1Q2Q3 contains fewer than 5 records. I'll suggest: "EXECIO 0 DISK{r|w} Q1Q2Q3 (OPEN" Be sure to handle correctly the case where Q1Q2Q3 is writab

WLM question : Is ziip service units counted in period switching

2024-08-22 Thread shivang sharma
Hi , We have deined a multiperiod ddf workload service class with a duration of 20 service units in its 1st period. I am wondering if wlm also uses ziip service units in period switching? We have ioc mso coefficient = 0 and srb tcb = 1 ---

Re: Simple Rexx question

2024-08-22 Thread Billy Ashton
Well, there were a lot of interesting comments and ideas here. My needs are pretty simple - check to see if the DD statements I need are defined in my job before I try to read or write them. I did some testing on using BPXWDYN Info, which gave the clearest details on the file status, and EXECI

Re: Simple Rexx question

2024-08-22 Thread Paul Gilmartin
On Thu, 22 Aug 2024 18:33:10 +, Billy Ashton wrote: > . >For output: >to a PDS member with data: BPX was 95% faster 100% of the time (I guess >there was a lot of work to set the EOF pointer and such) >... Update-in-place PDS member? I understand this was done for UADS to obviate the need

Re: Simple Rexx question

2024-08-22 Thread Bernd Oppolzer
If checking for a certain DD name is really all that you need then the easiest and fastest method IMHO is a very small ASSEMBLER (or C or PL/1) routine which scans the TIOT (Task I/O table) for this DD name. The ASSEMBLER version is the easiest and shortest (and fastest); only five to seven mac

Re: Simple Rexx question

2024-08-22 Thread Seymour J Metz
The UPDAT option of OPEN is fully supported for PDS and PDSE. --  Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 עַם יִשְׂרָאֵל חַי נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר From: IBM Mainframe Discussion List on behalf of Paul Gilmartin <042bfe9c

Re: Simple Rexx question

2024-08-22 Thread Bob Bridges
Wait, so was Gil just asking whether there's a "danger" of (for example) the DSN not being there when I run DSDD, but then coïncidentally having been catalogued 20 milliseconds later when I start to try to create it? I guess that's a function not of DSDD itself but of whatever routine uses it.

Re: Simple Rexx question

2024-08-22 Thread Lennie Bradshaw
That is generally the sort of thing TOCTTOU refers to. However, it is usually used in a security context. Security checks and decisions should generally be made in a single function where there is no ambiguity. In this case it, in order to avoid TOCTTOU issues you would need to invoke an EXECIO

Re: Simple Rexx question

2024-08-22 Thread Paul Gilmartin
On Thu, 22 Aug 2024 16:57:05 -0400, Bob Bridges wrote: >Wait, so was Gil just asking whether there's a "danger" of (for example) the >DSN not being there when I run DSDD, but then coïncidentally having been >catalogued 20 milliseconds later when I start to try to create it? > >I guess that's a f

Re: Simple Rexx question

2024-08-22 Thread Bob Bridges
I don't think I see the flaw yet. How would you define it? Because all DSDD does is tell me whether a character string represents a (catalogued) DSN and/or an (allocated) DDN; and if the problem you're thinking of is that the situation may have changed milliseconds later, how will any other ro

Re: Simple Rexx question

2024-08-22 Thread Paul Gilmartin
On Thu, 22 Aug 2024 19:15:13 -0400, Bob Bridges wrote: >I don't think I see the flaw yet. How would you define it? Because all DSDD >does is tell me whether a character string represents a (catalogued) DSN >and/or an (allocated) DDN; and if the problem you're thinking of is that the >situatio

Re: Debugging syscall / SLIP for reason code

2024-08-22 Thread Peter Relson
SLIP set,if,a=SYNCSVCD,RANGE=(10?+8C?+F0?+1F4?),DATA=(13R??+b0,EQ,112B ),DSPNAME=('OMVS'.*) If the instruction located by OCVTERRA gets control for this situation (that's what your RANGE keyword gets you) and if your DATA expression is correct, then the trap will match. As suggested you m

Re: Debugging syscall / SLIP for reason code

2024-08-22 Thread Peter Relson
If entered exactly as shown in the original post (the SLIP command and then the response to the WTOR), that response would have failed and not set a SLIP trap. As eagle eye Adam spotted, the blank after the address in DATA ends the input data, requiring the WTOR response to start with the (missin

Re: HSM question

2024-08-22 Thread Brian Westerman
Is it possible that you have not been running the Backup EXPIRE processing or the recycle processing (for a long time)? I had a site that "thought" they were doing it on a schedule and it turned out they had not executed it in over 10 years. Their use of tape for HSM was cut in 1/2 in a single