Re: Simple assembler question

2016-06-24 Thread Phil Smith III
Thanks to all who replied; the use case is returning a 64-bit value to a C function, which LE does by putting the top half in R0 and the bottom half in R15. Which is weird but is how it’s done. So I don’t much care about the top halves, nor bit 0 of the 32-bit register, but thanks for the

Re: Simple assembler question

2016-06-24 Thread Tony Harminc
On 24 June 2016 at 18:50, Charles Mills wrote: > Umm, Tony, did you read Programming Note 1.? Only after I'd figured it out myself. Of course there's still a tendency to think that it somehow costs more to rotate the bits all the way around, and it'd be faster/cheaper to

Re: Simple assembler question

2016-06-24 Thread Steve Beaver
I have enjoyed this thread and gotten a good chuckle from Dave Cole Steve -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Charles Mills Sent: Friday, June 24, 2016 3:39 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Simple assembler

Re: Simple assembler question

2016-06-24 Thread Frank Swarbrick
You ninja'd me! > Date: Fri, 24 Jun 2016 15:50:53 -0700 > From: charl...@mcn.org > Subject: Re: Simple assembler question > To: IBM-MAIN@LISTSERV.UA.EDU > > Umm, Tony, did you read Programming Note 1.? > > Charles > > -Original Message- > From: IBM Mainframe Discussion List

Re: Simple assembler question

2016-06-24 Thread Charles Mills
Umm, Tony, did you read Programming Note 1.? Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Tony Harminc Sent: Friday, June 24, 2016 2:54 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Simple assembler question On 24 June

Re: Simple assembler question

2016-06-24 Thread Frank Swarbrick
Under ROTATE THEN INSERT SELECTED BITS the POP says: 1. Although the bits 2-7 of the I5 field are defined to contain an unsigned binary integer specifying the number of bits that the second operand is rotated to the left, a negative value may be coded which effectively specifies a

Re: Simple assembler question

2016-06-24 Thread Tony Harminc
On 24 June 2016 at 16:23, Blaicher, Christopher Y. wrote: > And there are SRL, SRDL, SRAG and SRLG that rotate right. Well, no, they *shift* right. There is no need for any instruction to rotate right. As I said, I spent an embarassing amount of time pondering why IBM

Re: Simple assembler question

2016-06-24 Thread Frank Swarbrick
I'm still waiting for the DWIMNWIS instruction. > Date: Fri, 24 Jun 2016 15:15:08 -0400 > From: t...@harminc.net > Subject: Re: Simple assembler question > To: IBM-MAIN@LISTSERV.UA.EDU > > On 23 June 2016 at 17:51, Phil Smith III wrote: > > > > With all of the 273 new formats of

Copy pdse v2 generations

2016-06-24 Thread Lionel B. Dyck
Does anyone know if PDSFAST supports copying generations? IEBCOPY currently does not. Thanks Lionel B Dyck <>< Sent from my iPad Air 2 Website: www.lbdsoftware.com "Worry more about your character than your reputation. Character is what you are, reputation merely what others think you

Re: Simple assembler question

2016-06-24 Thread Charles Mills
Sure. We were referring to the rotate instructions, the new whiz-bang instructions like RISBLGZ. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Blaicher, Christopher Y. Sent: Friday, June 24, 2016 1:24 PM To:

Re: Simple assembler question

2016-06-24 Thread Blaicher, Christopher Y.
For the SLLG, SRLG, SRAG and others, if you load the B register with the number of bits to shift and set the D value to zero, you can shift a variable number of bits without using an EXECUTE instruction. And there are SRL, SRDL, SRAG and SRLG that rotate right. Chris Blaicher Technical

Re: Dynamic enqueue creation

2016-06-24 Thread Sankaranarayanan, Vignesh
Paul, I just tried this, and this seems to work out OK. So I suppose I can do the following: JOB 1 STEP1 : get dataset list and pass it onto for the job 2 generation JOB 2 STEP1 : do the mq fte work JOB 2 STEP9: put an enqueue OLD on the datasets obtained from JOB 1 I've tested with this basic

Re: Simple assembler question

2016-06-24 Thread Charles Mills
> there are no versions of these instruction that rotate right... Blatant liberal* slant? Interesting. I was just looking at these instructions, which I have never used. The rotate count is an immediate operand, and not an immediate operand modifiable by Execute. Is there no way to rotate by

Re: Dynamic enqueue creation

2016-06-24 Thread Paul Gilmartin
On Fri, 24 Jun 2016 10:27:16 -0500, Walt Farrell wrote: >On Fri, 24 Jun 2016 15:17:50 +, Sankaranarayanan, Vignesh wrote: > >>This is to cope with MQ FTE's "feature" of not locking datasets for the >>duration of a transfer. >> >>Using ANT scripts to initiate a transfer of a list of datasets

Re: Simple assembler question

2016-06-24 Thread Tony Harminc
On 23 June 2016 at 17:51, Phil Smith III wrote: > > With all of the 273 new formats of LOAD, I assume this is hiding in there > somewhere: > I have a value in grande register 3. I need the high-order bits in 32-bit R0 > and the low-order bits in 32-bit R15. The RxSB...

Re: CPOOL DELETE in a cleanup situation

2016-06-24 Thread Charles Mills
Thanks @Jim. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Jim Mulder Sent: Friday, June 24, 2016 10:22 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: CPOOL DELETE in a cleanup situation > I am re-working code that does a

Re: Datasets usage question

2016-06-24 Thread Cameron Conacher
Here is what I see: EFOPZxx contains statements that define the load library data set optimization configuration, which could, for example, provide a list of pairings of an old Cobol load library and the intended new load libraries (one for each desired architecture level) and specifies which

Request for confirmation of an RCF

2016-06-24 Thread Charles Mills
I just got an MNOTE on a nIARV64 macro assembly. I think the documentation is misleading. I wanted to confirm my thinking before submitting an RCF. The Authorized Assembler doc for IARV64 REQUEST=DETACH says ,AFFINITY=LOCAL ... 64-Bit Common memory objects are not affected by AFFINITY=LOCAL. I

Re: CPOOL DELETE in a cleanup situation

2016-06-24 Thread Jim Mulder
> I am re-working code that does a CPOOL DELETE in what *could be* a "cleanup" > type situation where the exact state of things is unknown. Is there a CPID > value (such as zero or minus one) that never occurs in real life that I > could use as an initialization value so that the code "knew" not

PDSE V2 Member Generation Tool

2016-06-24 Thread Lionel Dyck
I have just posted an update to my PDSEGEN ISPF application. This tool is extremely helpful if you are using PDSE Version 2 libraries with generations enabled. You can find it at http://www.lbdsoftware.com Check it out - comments and suggestions appreciated. It is distributed under GPL

Re: Datasets usage question

2016-06-24 Thread J R
That's not what Webster says. I thought I was pedantic, but I write it as CoBOL to reflect the word boundaries. Sent from my iPhone On Jun 24, 2016, at 12:23, Tom Ross wrote: (there are no lower > case letters in acronyms, and especially in COBOL) > > TomR

CPOOL DELETE in a cleanup situation

2016-06-24 Thread Charles Mills
I am re-working code that does a CPOOL DELETE in what *could be* a "cleanup" type situation where the exact state of things is unknown. Is there a CPID value (such as zero or minus one) that never occurs in real life that I could use as an initialization value so that the code "knew" not to issue

Re: Datasets usage question

2016-06-24 Thread Lizette Koehler
https://www.ibm.com/support/knowledgecenter/SSLTBW_2.2.0/com.ibm.zos.v2r2.ieae20 0/iefopz.htm shows lower case for me Cobol Lizette > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Tom Ross > Sent: Friday, June 24, 2016 9:20

Re: Datasets usage question

2016-06-24 Thread Tom Ross
>IEFOPZxx contains statements that define the load library data set optimiza= >tion configuration, which could, for example, provide a list of pairings of= > an old Cobol load library and the intended new load libraries (one for eac= Lizette, where did you find IBM doc with COBOL misspelled as

Re: Dynamic enqueue creation

2016-06-24 Thread Sankaranarayanan, Vignesh
Lizette, The file names have a dynamic component to them so I can't hard code them as pre-req's. – Vignesh Mainframe Infrastructure -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Lizette Koehler Sent: Friday, June 24, 2016 9:24 PM

Re: Dynamic enqueue creation

2016-06-24 Thread Lizette Koehler
If you have scheduling software (CA-7, CA Workload Automation ESP, Tivoli) They should be able to trigger work based upon when a dataset is receive (Allocate/Catalog) Jobs needing this file would be successors to the MQ process. Lizette > -Original Message- > From: IBM Mainframe

Re: Dynamic enqueue creation

2016-06-24 Thread Walt Farrell
On Fri, 24 Jun 2016 15:17:50 +, Sankaranarayanan, Vignesh wrote: >This is to cope with MQ FTE's "feature" of not locking datasets for the >duration of a transfer. > >Using ANT scripts to initiate a transfer of a list of datasets that

Re: Dynamic enqueue creation

2016-06-24 Thread Sankaranarayanan, Vignesh
So the option of listing datasets, then calling a batch job with DISP=OLD in the last step also means that there's a gap between the submit and the dataset listing. Since I did the listing and "alloc fi(Fn) old" part in REXX, it's only held as long as the REXX runs. I may end up having to wrap

Re: Dynamic enqueue creation

2016-06-24 Thread Sankaranarayanan, Vignesh
Hello Walt and Paul, Thanks for your ideas. This is to cope with MQ FTE's "feature" of not locking datasets for the duration of a transfer. Using ANT scripts to initiate a transfer of a list of datasets that resolve to a wildcard, we've found that in the time gap between the initial resolve

Re: From when I didn't have gray hair nor needed glasses

2016-06-24 Thread Zahir Hemini
You pre-date me, but I do have a collection of green and yellow cards that I found in my predecessors desk. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the

Re: Dynamic enqueue creation

2016-06-24 Thread Paul Gilmartin
On Fri, 24 Jun 2016 08:55:20 -0500, Walt Farrell wrote: >On Fri, 24 Jun 2016 07:09:19 +, Sankaranarayanan, Vignesh wrote: >> >>I'm looking to retrieve a list of datasets falling under a wildcard and then >>creating an OLD enqueue on those datasets. > >That sounds like a good way to get a

Re: Simple assembler question

2016-06-24 Thread Wayne Driscoll
Phil, You may want to use LLGTR instead of LR, as LR will leave the high half of R15 as it was, while LLGTR R15,R3 will zero the high 31 bits of R15 then copy the low 31 bits from R3 into R15. == Wayne Driscoll OMEGAMON DB2 L3 Support/Development

Re: Dynamic enqueue creation

2016-06-24 Thread Walt Farrell
On Fri, 24 Jun 2016 07:09:19 +, Sankaranarayanan, Vignesh wrote: >Hi Folks, > >I'm looking to retrieve a list of datasets falling under a wildcard and then >creating an OLD enqueue on those datasets. >While digging through past ibm-main

RFE to consider

2016-06-24 Thread Dyck, Lionel B. (TRA)
Please consider voting for this RFE to get IBM to update the ALLOC command to honor the PDSE Library and MAXGEN attributes when using LIKE. http://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe_ID=90546 -- Lionel

Re: Simple assembler question

2016-06-24 Thread Peter Relson
>>LR R15,R3 Copy low 32-bits to R15 >>SRLGR0,R3,32Copy upper 32-bits to R0 >You may want to add an SR or XR for register 0 and 15 prior to the >above two instructions if you want to make sure of the upper >32-bits of the target registers. FWIW,

Re: Simple assembler question

2016-06-24 Thread Tom Marchant
On Fri, 24 Jun 2016 00:23:18 -0500, Andre Schoeman wrote: >SLLGR0,R3,32 /* Shift bits 0-31 in R3 to bits 32-63 in R0 */ I think you mean SRLG. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access

Re: Simple assembler question

2016-06-24 Thread Tom Marchant
On Thu, 23 Jun 2016 22:27:37 +, Hardee, Chuck wrote: > LR R15,R3 Copy low 32-bits to R15 > SRLGR0,R3,32Copy upper 32-bits to R0 > >You may want to add an SR or XR for register 0 and 15 prior to the above two >instructions if you want to make sure

Aw: AW: OT: Test regarding ReplyTo - Please ignore

2016-06-24 Thread Peter Hunkeler
Relaying from GMX Webmail -- Peter Hunkeler > Gesendet: Freitag, 24. Juni 2016 um 12:29 Uhr > Von: "Peter Hunkeler" > An: IBM-MAIN@LISTSERV.UA.EDU > Betreff: AW: OT: Test regarding ReplyTo - Please ignore > > Replying from AltaMail. > > > -- > Peter Hunkeler > > > Von:

Re: Simple assembler question

2016-06-24 Thread Don Poitras
In article <9788957341066676.wa.adtschoemanyahoo...@listserv.ua.edu> you wrote: > You forgot to specify whether the top 32 bits of R0 and R15 must be zero > after the lower 32 bits have been manipulated. > Assuming that you do, then: > LLGFR 15,3 /* Load bits 32-63 in R3 into bits 32-63

AW: OT: Test regarding ReplyTo - Please ignore

2016-06-24 Thread Peter Hunkeler
Replying from AltaMail. -- Peter Hunkeler Von: Peter Hunkeler An: IBM-MAIN@LISTSERV.UA.EDU Betreff: OT: Test regarding ReplyTo - Please ignore Datum: 24.06.16, 12:28 Havong some troubles with Reply-To. Please ignore this message. -- Peter Hunkeler

OT: Test regarding ReplyTo - Please ignore

2016-06-24 Thread Peter Hunkeler
Havong some troubles with Reply-To. Please ignore this message. -- Peter Hunkeler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Dynamic enqueue creation

2016-06-24 Thread Sankaranarayanan, Vignesh
Hi Folks, I'm looking to retrieve a list of datasets falling under a wildcard and then creating an OLD enqueue on those datasets. While digging through past ibm-main threads, I found that I can use SYS1.SAMPLIB(IGGCSIRX) to retrieve the dataset list. I will now use "alloc fi(Fn)

Re: zHyperwrite

2016-06-24 Thread Arye Shemer
zHyperwrite is z/OS feature come up (I think) on z/OS 2.1 which enable dual write mainly for DB2 log into two separated DS8000 (Storage Subsystem). It enable the customer to avoid the penalty of latency occurred while need to replicate by Metro Mirror (Synchronous copy) the DB2 log to remote