Re: ADATA dump utility [was: RE: Determining a group item]

2022-01-03 Thread Martin Trübner
Peter, nice idea- but... have a look: Here is my definition that defines what data structures I want (and of course these are processed) in the ADEXIT. If you write a stand-alone program, I imagine it is pretty much the same logic.  ASMADATA PRINT=NOGEN,

Re: Determining a group item

2022-01-03 Thread Peter Relson
Joe, I can all but guarantee that trying to derive the offsets and lengths from the source will miss edge cases that the assembler deals with. ORG is a simple example of something that can be not overly straightforward. That is why looking at ADATA (or a listing) has a big advantage -- you are

Re: Determining a group item

2022-01-03 Thread Joseph Reichman
Peter The data is the layout of a VB file it doesn’t have orgs for group items has 0 or nothing What I am trying and am not sure if I will succeed is read in the data via AREAD Using ADATA is not practical as there isn’t Production adata file of the record layout I could haphazardly take a

Re: Determining a group item

2022-01-03 Thread Charles Mills
I agree so much with what Peter says that I would do it manually before I would try to guess at how the assembler did things. I don't see how modifying some macro to use AREAD is less effort than running the assembly and capturing the SYSADATA or SYSPRINT. You can easily "filter" ADATA on a par

Re: Determining a group item

2022-01-03 Thread Charles Mills
There is an OOP concept called an accessor or getter. I am not finding a succinct definition on the Web but perhaps you can. Anyway, as an alternative to generating the four fields you describe below, you might consider generating accessor routines. (This is on the output side of things and ind

Re: ADATA dump utility [was: RE: Determining a group item]

2022-01-03 Thread Farley, Peter x23353
Understood, and thanks for the reply. Peter -Original Message- From: IBM Mainframe Assembler List On Behalf Of Charles Mills Sent: Sunday, January 2, 2022 7:19 PM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: ADATA dump utility [was: RE: Determining a group item] Sorry. Don't own on

Re: Determining a group item

2022-01-03 Thread Martin Trübner
Charles, the way I understand Joseph is that he wants   CALL POPULATE_A_RECORD and then have variables LASTNAME FRSTNAME ZIPCODE and BIRTHYR populates with valid data. Best Martin -Original Message- From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On

Re: Determining a group item

2022-01-03 Thread Charles Mills
Well, could be. I am not always totally adept at deducing Joseph's requirements. In any event what you suggest would be a great way of doing things. I read what Joseph writes below as saying he wants something like LASTNAME_Address = 1 LASTNAME_Length = 16 Not sure what he means by address (off

Re: ADATA dump utility [was: RE: Determining a group item]

2022-01-03 Thread Charles Mills
"My firm" (and it was only a little bit mine) no longer exists. All of its IP was acquired by a large software company often referred to with three letters, under an agreement that is 189 pages long and was crafted by not one, not two, but three! legal teams. (Our firm, their inside team, their

Re: Determining a group item

2022-01-03 Thread Joseph Reichman
I’m just trying to generate the 4 fields need To define a variable to Rexx when using assembler 1) length of fetch value 2) address of the name of the variable 3) length of variable name 4) address of the fetch buffer I 100 % agree with Charles that using the adata is better It’s just not p

Re: Determining a group item

2022-01-03 Thread Seymour J Metz
You have to be aware regardless. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Assembler List [ASSEMBLER-LIST@LISTSERV.UGA.EDU] on behalf of Joseph Reichman [reichman...@gmail.com] Sent: Monday, January 3, 2022 2:06 PM To:

Re: Determining a group item

2022-01-03 Thread Joseph Reichman
Aware of what When something goes wrong or gets updated You probably were a CTO I’m just a peon > On Jan 3, 2022, at 2:30 PM, Seymour J Metz wrote: > > You have to be aware regardless. > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > ___

Re: Determining a group item

2022-01-03 Thread Paul Gilmartin
On Jan 3, 2022, at 12:06:53, Joseph Reichman wrote: > > I’m just trying to generate the 4 fields need > To define a variable to Rexx when using assembler > 1) length of fetch value > 2) address of the name of the variable > 3) length of variable name > 4) address of the fetch buffer > "name

Re: Determining a group item

2022-01-03 Thread Paul Gilmartin
On Jan 3, 2022, at 12:35:15, Joseph Reichman wrote: > > Aware of what > ... >> On Jan 3, 2022, at 2:30 PM, Seymour J Metz wrote: >> >> You have to be aware regardless. >> >> >> From: Joseph Reichman >> Sent: Monday, January 3, 2022 2:06 PM >> ..

Re: Determining a group item

2022-01-03 Thread Joseph Reichman
I want to use the AREAD past experience has thought me all of you know better > On Jan 3, 2022, at 2:47 PM, Paul Gilmartin > <0014e0e4a59b-dmarc-requ...@listserv.uga.edu> wrote: > > On Jan 3, 2022, at 12:06:53, Joseph Reichman wrote: >> >> I’m just trying to generate the 4 fields need >