In <[EMAIL PROTECTED]>, on 03/22/2006
at 12:34 PM, Clark Morris <[EMAIL PROTECTED]> said:
>Why the unprintable hasn't IBM extended the ACB to handle at least
>QSAM (and parenthetically allowed concatenation of ESDS and QSAM data
>sets)?
How about writing up a requirement, citing all of the pre
On 22 Mar 2006 09:47:12 -0800, in bit.listserv.ibm-main
[EMAIL PROTECTED] (Blaicher, Chris) wrote:
>I think z/OS has very good long term prospects just because of what you
>think is a symptom.
>
>Because of downward compatibility, a program written 30+ years ago can
>still work today. Things intr
>To have to go through the aggravation of getting 24 bit storage in 2006
is one minor symptom for the mainframe not have good long term
prospects.
You're joking right? We're talking about a minor and pretty
insignificant piece of coding to basically maintain downward
compatibility with code that
information or take any action against BMC
Software in response to this information.
-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Clark Morris
Sent: Wednesday, March 22, 2006 10:34 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: (fwd) Re: amode rmode problem
On 21 Mar 2006 17:46:17 -0800, in bit.listserv.ibm-main
[EMAIL PROTECTED] (Edward E. Jaffe) wrote:
>Tom Savor wrote:
>> Ed wrote:
>>
>>> Tom Savor wrote:
>>>
Thanks to some enlightenment from Mr Rutledge, all my Assembler programs
run AMODE(31), RMODE(ANY).
1). GETMAIN sto
In <[EMAIL PROTECTED]>, on
03/20/2006
at 09:30 AM, Jim McAlpine <[EMAIL PROTECTED]> said:
>When the COBOL program is linked AMODE(ANY) RMODE(24) it runs fine,
>but when the COBOL program is linked AMODE(31) RMODE(ANY) the
>assembler subroutine abends with a 0C4 abend on the first BSM
>instructi
Tom Savor wrote:
Ed wrote:
Tom Savor wrote:
Thanks to some enlightenment from Mr Rutledge, all my Assembler programs
run AMODE(31), RMODE(ANY).
1). GETMAIN storage location as ANY.
2). Copy DCB to GETMAINed area
3). Open file as example: OPEN (FILE,(INPUT)),MODE=31
4). Get Fil
Tom,
Do I detect a "What we have here is a class lack of communication."?
The GETMAIN for the storage into which the DCB is copied most certainly must be
BELOW or 24.
The program itself, of couse, can be RMODE/AMODE(ANY).
This is what Mr. Jaffe is saying. (And I trust him more than I trust
Ed wrote:
>Tom Savor wrote:
>> Are you talking about a DCB only or a DCB with an accompanying DCBE ??
If
>> the second, I don't agree.
>>
>> Thanks to some enlightenment from Mr Rutledge, all my Assembler programs
>> run AMODE(31), RMODE(ANY).
>> 1). GETMAIN storage location as ANY.
>> 2). Copy
Tom Savor wrote:
Are you talking about a DCB only or a DCB with an accompanying DCBE ?? If
the second, I don't agree.
Thanks to some enlightenment from Mr Rutledge, all my Assembler programs
run AMODE(31), RMODE(ANY).
1). GETMAIN storage location as ANY.
2). Copy DCB to GETMAINed area
3).
In a message dated 3/21/2006 3:58:06 P.M. Central Standard Time,
[EMAIL PROTECTED] writes:
So if you dynamically acquire some storage in which to build
the
>remote parameter list for the OPEN macro, that storage must have a 24-bit
>address.
>Are you talking about a DCB only or a DCB
> Bill wrote
>Yes, but your code that accesses it can be in 24-, 31-, or 64-bit
addressing
>mode. You can fit a 24-bit address in 31 or 64 bits, but you can't fit a
>31-bit address in only 24 bits. Also your open parameter list must be
below
>the line. So if you dynamically acquire some stora
In a message dated 3/21/2006 1:21:01 A.M. Central Standard Time,
[EMAIL PROTECTED] writes:
>The DCB still needs to be in 24bit addressable storage, doesn't it?
Yes, but your code that accesses it can be in 24-, 31-, or 64-bit addressing
mode. You can fit a 24-bit address in 31 or 64 bi
Peter, thanks for that, that was the bit I was missing to make it all 31
bit.
Jim McAlpine
On 3/21/06, Hunkeler Peter (KRDO 4) <[EMAIL PROTECTED]>
wrote:
>
> >And presumably the EODAD address has to be a 24 bit address also since
> >the DCB has other info in the leftmost byte of that word.
>
> N
>And presumably the EODAD address has to be a 24 bit address also since
>the DCB has other info in the leftmost byte of that word.
No. There are fullword fields in the DCBE to hold EOEAD and SYNAD
routine
addresses. DCBE fields take preprecedence over the corresponding DBC
fields.
Peter Hunkel
And presumably the EODAD address has to be a 24 bit address also since the
DCB has other info in the leftmost byte of that word.
Jim McAlpine
On 3/21/06, Hunkeler Peter (KRDO 4) <[EMAIL PROTECTED]>
wrote:
>
> >Like you, I suggest he delete that obsolete code and just stay in
> >31-bit mode.
>
>
>Like you, I suggest he delete that obsolete code and just stay in
>31-bit mode.
The DCB still needs to be in 24bit addressable storage, doesn't it?
Peter Hunkeler
CREDIT SUISSE
--
For IBM-MAIN subscribe / signoff / archive ac
Jim,
Not certain that it is releavant, but have you read the information at:
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/igy3mg30/APPENDIX
1.4.13
also
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ceea4140/14.2.1
"Jim McAlpine" <[EMAIL PROTECTED]> wrote i
Don Poitras wrote:
In amode 31, the 'high-order' bit is always cleared by LA. You often see
code where that is the only purpose of the instruction. He's correctly
going amode 24, but if GET tries to access memory above the line, or
return to an above the line caller, you get trouble. GET was chan
Need to be more precise:
You are aware that all addresses passed from the COBOL to the
ASM routine must point to 24bit addressable storage if the ASM
code uses them while in AMODE24.
Peter Hunkeler
CREDIT SUISSE
--
For IBM-MAIN
You are aware that all addresses passed from the COBOL to the
ASM routine must point to 24bit addressable storage, aren't you?
Peter Hunkeler
CREDIT SUISSE
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send e
>A purist might disagree and say that LA sets the high order
>bit to zero.
I love it! Made my day.
Believe it or not, I did read the PoP (well a summary I once wrote)
before posting, I just didn't change my wording. (BTW, my summary
says "...set to zero", indeed).
Peter Hunkeler
CREDIT SUIS
Behalf Of Jim McAlpine
> > Sent: Monday, March 20, 2006 12:27 PM
> > To: IBM-MAIN@BAMA.UA.EDU
> > Subject: Re: [IBM-MAIN] amode rmode problem
> >
> > Beate, psw as follows -
> >
> > EC PSW AT TIME OF ERROR 078D1000 00F0871E 00020011 00F08000
>
>
> Sorry people, but the assembler routine was being called statically an not
> dynamically as it should have been, thus it was linked with the COBOL
> program and resided above the line.
It's fixed now. Or should I say I'm past that particular problem.
Thanks again.
Jim McAlpine
--
In a message dated 3/20/2006 6:38:02 A.M. Central Standard Time,
[EMAIL PROTECTED] writes:
Just guessing: doesn't the LA of DOGETS set the high-order bit?
>Thus, the adressing mode will not be set to 24-bit...
LA does never set the high order bit. It always clears all high
order bits no
>Any reason why you cannot use the SAM24 and SAM31 instructions
>instead of BSM ?
Code predates the advent of the pre-z/Architecture.
SAMs are only available on z/Architecture machines.
Peter Hunkeler
CREDIT SUISSE
--
For IBM
Just guessing: doesn't the LA of DOGETS set the high-order bit?
>Thus, the adressing mode will not be set to 24-bit...
LA does never set the high order bit. It always clears all high
order bits not being used in the current addressing mode (only
in the low half of the 64 general purpose register,
>Peter, the assembler routine IS linked AMODE(24) and is called
dynamically.
Jim,
you wrote it the other way around:
>subroutine which is called by a COBOL main program. Here is a
>snippet from the assembler routine which is linkied AMODE(31) RMODE(24)
Peter Hunkeler
CREDIT SUISSE
---
On Mon, 20 Mar 2006 11:26:57 + Jim McAlpine <[EMAIL PROTECTED]>
wrote:
:>Beate, psw as follows -
:>EC PSW AT TIME OF ERROR 078D1000 00F0871E 00020011 00F08000
My money says that your routine is loaded above the line.
Look at the registers.
:>On 3/20/06, Beate Kawelke <[EMAIL PROTECTED]> w
Just my two cents:
What is dogets? What do R14/R15 show? Can you show the complete symptom
dump?
>EC PSW AT TIME OF ERROR 078D1000 00F0871E 00020011 00F08000
This shows that you had a PIC 11 (it also shows clearly that you're
amode24.) What module is in F0871E? This looks like a nucleus address
Also from the address in the PSW you posted earlier - it looks very much
like the 0C4 is in a PLPA/CSA routine (most likely GET) - check the
locations of your working storage.
Rob Scott
Rocket Software
http://www.rs.com/portfolio/mxi/
--
Rob, I wasn't even aware of their existance. It's a long time since I
wrote assembler for real and as I said, I inherited this code. I'll check
them out.
Jim McAlpine
On 3/20/06, Rob Scott <[EMAIL PROTECTED]> wrote:
>
> Any reason why you cannot use the SAM24 and SAM31 instructions instead
>
Any reason why you cannot use the SAM24 and SAM31 instructions instead
of BSM ?
Rob Scott
Rocket Software
http://www.rs.com/portfolio/mxi/
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PR
Beate
> -Original Message-
> From: IBM Mainframe Discussion List
> [mailto:[EMAIL PROTECTED] On Behalf Of Jim McAlpine
> Sent: Monday, March 20, 2006 12:27 PM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Re: [IBM-MAIN] amode rmode problem
>
> Beate, psw as follows -
>
>
Beate, psw as follows -
EC PSW AT TIME OF ERROR 078D1000 00F0871E 00020011 00F08000
Jim McAlpine
On 3/20/06, Beate Kawelke <[EMAIL PROTECTED]> wrote:
>
> Hi Jim,
>
> what does the PSW of the symptom dump say ?
>
> Beate
>
>
-
Hi Jim,
what does the PSW of the symptom dump say ?
Beate
> -Original Message-
> From: IBM Mainframe Discussion List
> [mailto:[EMAIL PROTECTED] On Behalf Of Jim McAlpine
> Sent: Monday, March 20, 2006 11:54 AM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Re: [IBM-MAIN] a
Peter, the assembler routine IS linked AMODE(24) and is called dynamically.
Jim McAlpine
On 3/20/06, Hunkeler Peter (KRDO 4) <[EMAIL PROTECTED]>
wrote:
>
> >When the COBOL program is linked AMODE(ANY) RMODE(24) it runs
> >fine, but when the COBOL program is linked AMODE(31) RMODE(ANY)
> >the ass
>When the COBOL program is linked AMODE(ANY) RMODE(24) it runs
>fine, but when the COBOL program is linked AMODE(31) RMODE(ANY)
>the assembler subroutine abends with a 0C4 abend on the first
>BSM instruction above.
The first BSM instruction switches the AMODE to 24. However,
the code is residen
to know whether or not I am called "Jean Snow" -
don't laugh, it happened recently.
Chris Mason
- Original Message -
From: "Jim McAlpine" <[EMAIL PROTECTED]>
Newsgroups: bit.listserv.ibm-main
To:
Sent: Monday, 20 March, 2006 10:30 AM
Subject: amode rmode
I inherited a set of programs one of which is assembler and runs as a
subroutine which is called by a COBOL main program. Here is a snippet from
the assembler routine which is linkied AMODE(31) RMODE(24) -
L R4,CZW3IOAA ...SETUP ADDR OF IOAREA
L R5,CZW3DCBA
40 matches
Mail list logo
