dividend(10),divisor
ZAP dividend(10),remainder
or somesuch.
- Original Message -
From: "Frank M. Ramaekers"
To:
Sent: Thursday, January 27, 2022 4:45 AM
Subject: ZAP to expand remainder
Will this instruction work?
ZAP WKPACK,WKPACK+(L'WKPACK-L'KDAYSQ
To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
Subject: Re: ZAP to expand remainder
External Message – Think Before You Click
I think you need to specify the length of the second operand or else it will
take the length of WKPACK and pick up bytes beyond the end of WKPACK
I think you need to specify the length of the second operand or else it
will take the length of WKPACK and pick up bytes beyond the end of WKPACK.
On 2022-01-26 2:02 p.m., Keven Hall wrote:
The second operand must end on or after the end (last byte) of the first
operand for correct results.
May I suggest not obfuscating the program?
ZAP is a trivial instruction for the job,
and does not need a constant area.
On 2022-01-28 00:04, Frank M. Ramaekers wrote:
I simply moved null bytes to overlay the result (I could have XC them
as well).
DPWKPACK,KDAYSQC
…
MVC
...@dodo.com.au [mailto:robi...@dodo.com.au]
Sent: Wednesday, January 26, 2022 8:11 PM
To: IBM Mainframe Assembler List
Cc: Frank M. Ramaekers
Subject: Re: ZAP to expand remainder
External Message – Think Before You Click
On 2022-01-27 04:45, Frank M. Ramaekers wrote
On 2022-01-27 04:45, Frank M. Ramaekers wrote:
Will this instruction work?
ZAP WKPACK,WKPACK+(L'WKPACK-L'KDAYSQC) Expand remainder
In other words, can one expand the remainder from a DP instruction to
the entire field?
The field can be expanded.
Ensure that the right-most byte of
The second operand must end on or after the end (last byte) of the first
operand for correct results.
Regards
Keven
> On Jan 26, 2022, at 11:45, Frank M. Ramaekers
> wrote:
>
> Will this instruction work?
>
> ZAP WKPACK,WKPACK+(L'WKPACK-L'KDAYSQC) Expand remainder
>
> In
Will this instruction work?
ZAP WKPACK,WKPACK+(L'WKPACK-L'KDAYSQC) Expand remainder
In other words, can one expand the remainder from a DP instruction to the
entire field?
Frank Ramaekers Jr. | Systems Senior Administrator | CIS Mainframe Services
Unisys | O-(512) 387-3949 |