Re: ZAP to expand remainder

[Frank M. Ramaekers]

Ahhh...good catch.  Yes this will work with a length specified for the second 
operand.

Frank M. Ramaekers Jr.


-Original Message-
From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On 
Behalf Of Gary Weinhold
Sent: Thursday, January 27, 2022 9:38 AM
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.

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.
>
>
> 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 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 | M-(254) 214-1820 
>> |francis.ramaek...@unisys.com<mailto:francis.ramaek...@unisys.com>
>>
>> [unisys_logo]<https://urldefense.com/v3/__http://www.unisys.com/__;!!
>> GePVz-XrgrDUrw!9wAF3OGAxgQkCcDuKs3t5-pxSqnoPkW6Sj1ua30vd23lA3nSah_rQv
>> GgJX13DCtS$ >
>>
>> THIS COMMUNICATION MAY CONTAIN CONFIDENTIAL AND/OR OTHERWISE PROPRIETARY 
>> MATERIAL and is for use only by the intended recipient. If you received this 
>> in error, please contact the sender and delete the e-mail and its 
>> attachments from all devices.
>> [Grey_LI]<https://urldefense.com/v3/__http://www.linkedin.com/company/unisys__;!!GePVz-XrgrDUrw!9wAF3OGAxgQkCcDuKs3t5-pxSqnoPkW6Sj1ua30vd23lA3nSah_rQvGgJcXlLWzC$
>>  >   
>> [Grey_TW]<https://urldefense.com/v3/__http://twitter.com/unisyscorp__;!!GePVz-XrgrDUrw!9wAF3OGAxgQkCcDuKs3t5-pxSqnoPkW6Sj1ua30vd23lA3nSah_rQvGgJQgtuVp7$
>>  >   
>> [Grey_GP]<https://urldefense.com/v3/__https://plus.google.com/*UnisysCorp/posts__;Kw!!GePVz-XrgrDUrw!9wAF3OGAxgQkCcDuKs3t5-pxSqnoPkW6Sj1ua30vd23lA3nSah_rQvGgJSzW0X35$
>>  >  
>> [Grey_YT]<https://urldefense.com/v3/__http://www.youtube.com/theunisyschannel__;!!GePVz-XrgrDUrw!9wAF3OGAxgQkCcDuKs3t5-pxSqnoPkW6Sj1ua30vd23lA3nSah_rQvGgJcscZzNR$
>>  >  
>> [Grey_FB]<https://urldefense.com/v3/__http://www.facebook.com/unisyscorp__;!!GePVz-XrgrDUrw!9wAF3OGAxgQkCcDuKs3t5-pxSqnoPkW6Sj1ua30vd23lA3nSah_rQvGgJXssa1De$
>>  >  
>> [Grey_Vimeo]<https://urldefense.com/v3/__https://vimeo.com/unisys__;!!GePVz-XrgrDUrw!9wAF3OGAxgQkCcDuKs3t5-pxSqnoPkW6Sj1ua30vd23lA3nSah_rQvGgJfR9TnB8$
>>  >  
>> [Grey_UB]<https://urldefense.com/v3/__http://blogs.unisys.com/__;!!GePVz-XrgrDUrw!9wAF3OGAxgQkCcDuKs3t5-pxSqnoPkW6Sj1ua30vd23lA3nSah_rQvGgJZi0iv7L$
>>  >   
>> [Grey_Weibo]<https://urldefense.com/v3/__https://weibo.com/unisyschina__;!!GePVz-XrgrDUrw!9wAF3OGAxgQkCcDuKs3t5-pxSqnoPkW6Sj1ua30vd23lA3nSah_rQvGgJUGff4Kd$
>>  >
>>
>>
>> -
>> - This message contains information which is privileged and 
>> confidential and is solely for the use of the intended recipient. If you are 
>> not the intended recipient, be aware that any review, disclosure, copying, 
>> distribution, or use of the contents of this message is strictly prohibited. 
>> If you have received this in error, please destroy it immediately and notify 
>> us atprivacy...@globe.life.


Gary Weinhold
Senior Application Architect
DATAKINETICS | Data Performance & Optimization
Phone:+1.613.523.5500 x216
Email: weinh...@dkl.com
Visit us online at 
https://urldefense.com/v3/__http://www.DKL.com__;!!GePVz-XrgrDUrw!9wAF3OGAxgQkCcDuKs3t5-pxSqnoPkW6Sj1ua30vd23lA3nSah_rQvGgJZBfcDJg$
E-mail Notification: The information contained in this email and any 
attachments is confidential and may be subject to copyright or other 
intellectual property protection. If you are not the intended recipient, you 
are not authorized to use or disclose this information, and we request that you 
notify us by reply mail or telephone and delete the original message from your 
mail system.

--
This message contains information which is privileged and confidential and is 
solely for the use of the intended recipient. If you are not the intended 
recipient, be aware that any review, disclosure, copying, distribution, or use 
of the contents of this message is strictly prohibited. If you have received 
this in error, please destroy it immediately and notify us at 
privacy...@globe.life.

Re: ZAP to expand remainder

[Frank M. Ramaekers]

I simply moved null bytes to overlay the result (I could have XC them as well).



 DPWKPACK,KDAYSQC

…

 MVC   WKPACK(L'WKPACK-L'KDAYSQC),KNULL  Expand remainder to DW

…

KNULL   DC  8X’00’





Frank M. Ramaekers Jr.



-Original Message-
From: robi...@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:

> 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 first and second operands co-incide.

--
This message contains information which is privileged and confidential and is 
solely for the use of the intended recipient. If you are not the intended 
recipient, be aware that any review, disclosure, copying, distribution, or use 
of the contents of this message is strictly prohibited. If you have received 
this in error, please destroy it immediately and notify us at 
privacy...@globe.life.

ZAP to expand remainder

[Frank M. Ramaekers]

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 | M-(254) 214-1820 | 
francis.ramaek...@unisys.com

[unisys_logo]

THIS COMMUNICATION MAY CONTAIN CONFIDENTIAL AND/OR OTHERWISE PROPRIETARY 
MATERIAL and is for use only by the intended recipient. If you received this in 
error, please contact the sender and delete the e-mail and its attachments from 
all devices.
[Grey_LI]  [Grey_TW] 
  [Grey_GP] 
 [Grey_YT] 
 [Grey_FB] 
 [Grey_Vimeo]  
[Grey_UB]   [Grey_Weibo] 



--
This message contains information which is privileged and confidential and is 
solely for the use of the intended recipient. If you are not the intended 
recipient, be aware that any review, disclosure, copying, distribution, or use 
of the contents of this message is strictly prohibited. If you have received 
this in error, please destroy it immediately and notify us at 
privacy...@globe.life.

Re: Basic question on Procesors/Instruction set [EXTERNAL EMAIL]

[Frank M. Ramaekers]

Bit positions 32-55 of general register 0 are reserved for possible future 
extensions and must contain all zeros; otherwise, a specification exception is 
recognized.

Yeah, missed that part.   THANKS!

Frank M. Ramaekers Jr.
Unisys | Mainframe Systems Analyst I


-Original Message-
From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On 
Behalf Of Farley, Peter x23353
Sent: Wednesday, March 20, 2019 5:03 PM
To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
Subject: Re: Basic question on Procesors/Instruction set [EXTERNAL EMAIL]

PoOPS for SRST (edition -9, which is for the zBC12) says this:

"The character for which the search occurs is specified in bit positions 56-63 
of general register 0. Bit positions 32-55 of general register 0 are reserved 
for possible future extensions and must contain all zeros; otherwise, a 
specification exception is recognized. "

So what is in R0 when you get that exception?

HTH

Peter

-Original Message-
From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On 
Behalf Of Frank M. Ramaekers
Sent: Wednesday, March 20, 2019 5:42 PM
To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
Subject: Basic question on Procesors/Instruction set

EXTERNAL EMAIL

Where does one find a table of instructions a particular processor is capable 
of?   (I have a zBC12 and get a SPEC EXCEPT on a SRST/Search string)

Frank M. Ramaekers Jr.  | Mainframe Systems Analyst I | CIS Mainframe Services 
Unisys | (512)-387-3949 | Francis.Ramaekers at Unisys.Com

[unisys_logo]<https://urldefense.proofpoint.com/v2/url?u=http-3A__www.unisys.com_&d=DwIFAg&c=laxeQK7vPmHfouIIPNyCfbQd49eK3u00U8Jdo0RFvts&r=EOaM1MkMLG24_TOy4m7EdDoX0CP9-c0YJ2kTdeagcqQ&m=Ljvzel81V8G2f5qdd3ids21yhPA9vnRG_WCl9tACpTg&s=HtVqaB878EQ7QN5JkAYPqXGPC1q0DuP21HktGESHlNU&e=>

THIS COMMUNICATION MAY CONTAIN CONFIDENTIAL AND/OR OTHERWISE PROPRIETARY 
MATERIAL and is for use only by the intended recipient. If you received this in 
error, please contact the sender and delete the e-mail and its attachments from 
all devices.
[Grey_LI]<https://urldefense.proofpoint.com/v2/url?u=http-3A__www.linkedin.com_company_unisys&d=DwIFAg&c=laxeQK7vPmHfouIIPNyCfbQd49eK3u00U8Jdo0RFvts&r=EOaM1MkMLG24_TOy4m7EdDoX0CP9-c0YJ2kTdeagcqQ&m=Ljvzel81V8G2f5qdd3ids21yhPA9vnRG_WCl9tACpTg&s=FmZ_DFNYbTBRa1ijDINbcK34Dlf_SBO1lOL2Lt5E1x4&e=>
  [Grey_TW] 
<https://urldefense.proofpoint.com/v2/url?u=http-3A__twitter.com_unisyscorp&d=DwIFAg&c=laxeQK7vPmHfouIIPNyCfbQd49eK3u00U8Jdo0RFvts&r=EOaM1MkMLG24_TOy4m7EdDoX0CP9-c0YJ2kTdeagcqQ&m=Ljvzel81V8G2f5qdd3ids21yhPA9vnRG_WCl9tACpTg&s=d18R3fZtiLO6SqrLZcFEIZxvNWz0bVeBILAuNkch5Ms&e=>
  [Grey_GP] 
<https://urldefense.proofpoint.com/v2/url?u=https-3A__plus.google.com_-2BUnisysCorp_posts&d=DwIFAg&c=laxeQK7vPmHfouIIPNyCfbQd49eK3u00U8Jdo0RFvts&r=EOaM1MkMLG24_TOy4m7EdDoX0CP9-c0YJ2kTdeagcqQ&m=Ljvzel81V8G2f5qdd3ids21yhPA9vnRG_WCl9tACpTg&s=ybADaIrS4Gy26yvEZKzHw1TgmOqdCafG71mcPFyDjVk&e=>
 [Grey_YT] 
<https://urldefense.proofpoint.com/v2/url?u=http-3A__www.youtube.com_theunisyschannel&d=DwIFAg&c=laxeQK7vPmHfouIIPNyCfbQd49eK3u00U8Jdo0RFvts&r=EOaM1MkMLG24_TOy4m7EdDoX0CP9-c0YJ2kTdeagcqQ&m=Ljvzel81V8G2f5qdd3ids21yhPA9vnRG_WCl9tACpTg&s=dFmJY8y_22x2-3tpsm8B3SjJ8XNDvNPlHctzKVq19a0&e=>
 [Grey_FB] 
<https://urldefense.proofpoint.com/v2/url?u=http-3A__www.facebook.com_unisyscorp&d=DwIFAg&c=laxeQK7vPmHfouIIPNyCfbQd49eK3u00U8Jdo0RFvts&r=EOaM1MkMLG24_TOy4m7EdDoX0CP9-c0YJ2kTdeagcqQ&m=Ljvzel81V8G2f5qdd3ids21yhPA9vnRG_WCl9tACpTg&s=Mg4lwQtQPvv6zlaOPeEqUk5u0P_90waRTQuEGc33mWU&e=>
 [Grey_Vimeo] 
<https://urldefense.proofpoint.com/v2/url?u=https-3A__vimeo.com_unisys&d=DwIFAg&c=laxeQK7vPmHfouIIPNyCfbQd49eK3u00U8Jdo0RFvts&r=EOaM1MkMLG24_TOy4m7EdDoX0CP9-c0YJ2kTdeagcqQ&m=Ljvzel81V8G2f5qdd3ids21yhPA9vnRG_WCl9tACpTg&s=BKQpcVVlfOVeKSDbKgQIKSCvHVwnVy14OdmHbCHWj3Y&e=>
 [Grey_UB] 
<https://urldefense.proofpoint.com/v2/url?u=http-3A__blogs.unisys.com_&d=DwIFAg&c=laxeQK7vPmHfouIIPNyCfbQd49eK3u00U8Jdo0RFvts&r=EOaM1MkMLG24_TOy4m7EdDoX0CP9-c0YJ2kTdeagcqQ&m=Ljvzel81V8G2f5qdd3ids21yhPA9vnRG_WCl9tACpTg&s=LzBqhW4qZjPICaUqcG7zs3WEBN42Z3Qqb2x8m2b2Tg4&e=>

--
This message contains information which is privileged and confidential and is 
solely for the use of the intended recipient. If you are not the intended 
recipient, be aware that any review, disclosure, copying, distribution, or use 
of the contents of this message is strictly prohibited. If you have received 
this in error, please destroy it immediately and notify us at 
privacy...@torchmarkcorp.com.

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intende

Basic question on Procesors/Instruction set

[Frank M. Ramaekers]

Where does one find a table of instructions a particular processor is capable 
of?   (I have a zBC12 and get a SPEC EXCEPT on a SRST/Search string)

Frank M. Ramaekers Jr.  | Mainframe Systems Analyst I | CIS Mainframe Services
Unisys | (512)-387-3949 | Francis.Ramaekers at Unisys.Com

[unisys_logo]<http://www.unisys.com/>

THIS COMMUNICATION MAY CONTAIN CONFIDENTIAL AND/OR OTHERWISE PROPRIETARY 
MATERIAL and is for use only by the intended recipient. If you received this in 
error, please contact the sender and delete the e-mail and its attachments from 
all devices.
[Grey_LI]<http://www.linkedin.com/company/unisys>  [Grey_TW] 
<http://twitter.com/unisyscorp>  [Grey_GP] 
<https://plus.google.com/+UnisysCorp/posts> [Grey_YT] 
<http://www.youtube.com/theunisyschannel> [Grey_FB] 
<http://www.facebook.com/unisyscorp> [Grey_Vimeo] <https://vimeo.com/unisys> 
[Grey_UB] <http://blogs.unisys.com/>

--
This message contains information which is privileged and confidential and is 
solely for the use of the intended recipient. If you are not the intended 
recipient, be aware that any review, disclosure, copying, distribution, or use 
of the contents of this message is strictly prohibited. If you have received 
this in error, please destroy it immediately and notify us at 
privacy...@torchmarkcorp.com.

Re: EDit mask for floating minus (negative)

[Frank M. Ramaekers]

Whoops.   '602020202120'x for a PL3

Frank M. Ramaekers Jr.


> -Original Message-
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> l...@listserv.uga.edu] On Behalf Of Frank M. Ramaekers
> Sent: Wednesday, July 16, 2014 8:29 AM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: Re: EDit mask for floating minus (negative)
> 
> I was afraid of that.  I was using '6020202120'x with EDMK and backing
up R1
> one if negative.
> 
> Frank M. Ramaekers Jr.
> 
> > -Original Message-
> > From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> > l...@listserv.uga.edu] On Behalf Of Binyamin Dissen
> > Sent: Wednesday, July 16, 2014 8:09 AM
> > To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> > Subject: Re: EDit mask for floating minus (negative)
> >
> > On Wed, 16 Jul 2014 07:46:19 -0500 "Frank M. Ramaekers"
> >  wrote:
> >
> > :>Please excuse my inexperience, I need an EDIT mask for a floating
> minus
> > :>sign.
> > :>
> > :>
> > :>
> > :>Value (hex)ED/EDMK
> > :>
> > :>00123C  123
> > :>
> > :>00123D -123
> > :>
> > :>1C  1
> > :>
> > :>1D -1
> >
> > Use a regular edit mask with EDMK - then use the resulting R1 to
place
> the
> > sign if negative.
> >
> > --
> > Binyamin Dissen 
> > http://www.dissensoftware.com
> >
> > Director, Dissen Software, Bar & Grill - Israel
> >
> >
> > Should you use the mailblocks package and expect a response from me,
> you
> > should preauthorize the dissensoftware.com domain.
> >
> > I very rarely bother responding to challenge/response systems,
> especially
> > those from irresponsible companies.

Re: EDit mask for floating minus (negative)

[Frank M. Ramaekers]

I was afraid of that.  I was using '6020202120'x with EDMK and backing
up R1 one if negative.

Frank M. Ramaekers Jr.

> -Original Message-
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> l...@listserv.uga.edu] On Behalf Of Binyamin Dissen
> Sent: Wednesday, July 16, 2014 8:09 AM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: Re: EDit mask for floating minus (negative)
> 
> On Wed, 16 Jul 2014 07:46:19 -0500 "Frank M. Ramaekers"
>  wrote:
> 
> :>Please excuse my inexperience, I need an EDIT mask for a floating
minus
> :>sign.
> :>
> :>
> :>
> :>Value (hex)ED/EDMK
> :>
> :>00123C  123
> :>
> :>00123D -123
> :>
> :>1C  1
> :>
> :>1D -1
> 
> Use a regular edit mask with EDMK - then use the resulting R1 to place
the
> sign if negative.
> 
> --
> Binyamin Dissen 
> http://www.dissensoftware.com
> 
> Director, Dissen Software, Bar & Grill - Israel
> 
> 
> Should you use the mailblocks package and expect a response from me,
you
> should preauthorize the dissensoftware.com domain.
> 
> I very rarely bother responding to challenge/response systems,
especially
> those from irresponsible companies.

EDit mask for floating minus (negative)

[Frank M. Ramaekers]

Please excuse my inexperience, I need an EDIT mask for a floating minus
sign. 

 

Value (hex)ED/EDMK

00123C  123

00123D -123

1C  1

1D -1

 

 

Frank M. Ramaekers Jr. | Systems Programmer | Information Technology |
American Income Life Insurance Company | 254-761-6649

 

Re: HLASM continuation...

[Frank M. Ramaekers]

Learn something new every day.

Thanks all,
Frank M. Ramaekers Jr.


> -Original Message-
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> l...@listserv.uga.edu] On Behalf Of Tony Thigpen
> Sent: Thursday, February 20, 2014 2:56 PM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: Re: HLASM continuation...
>
> Yep.
> QVIS_L  EQU   L'QVSIMGLOGICALPARTITIONNAME
>  MVC   0(QVIS_L,R4,QVSIMGLOGICALPARTITIONNAME
>
> Of course, you can always play the "it will never change" card with:
>  MVC   0(8,R4,QVSIMGLOGICALPARTITIONNAME
> knowing that changing the length of this field will require an act of
god.
>
> Tony Thigpen
>
> -Original Message -
>   From: Frank M. Ramaekers
>   Sent: 02/20/2014 03:39 PM
> > So you have to find a way to keep everything (in an instruction) on
a
> > single line?
> >
> > Frank M. Ramaekers Jr.
> >
> >
> >> -Original Message-
> >> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> >> l...@listserv.uga.edu] On Behalf Of Ed Jaffe
> >> Sent: Thursday, February 20, 2014 2:26 PM
> >> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> >> Subject: Re: HLASM continuation...
> >>
> >> On 2/20/2014 12:08 PM, Frank M. Ramaekers wrote:
> >>> ...what am I doing wrong here:
> >>>
> >>>
> >>>
> >>> 000728    0 0  8032  MVC
> >>> 0(L'QVSIMGLOGICALPARTITIONNAME,R4), *
> >>>
> >>>
> >>> QVSIMGLOGICALPARTITIONNAMEMove out the LPAR name
> >>>
> >>> ** ASMA074E Illegal syntax in expression -
> >>
> >> Only macros can be continued that way. Normal instructions cannot
> >> have embedded whitespace.
> >>
> >> --
> >> Edward E Jaffe
> >> Phoenix Software International, Inc
> >> 831 Parkview Drive North
> >> El Segundo, CA 90245
> >> http://www.phoenixsoftware.com/
> >
> >

Re: HLASM continuation...

[Frank M. Ramaekers]

So you have to find a way to keep everything (in an instruction) on a
single line?

Frank M. Ramaekers Jr.


> -Original Message-
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> l...@listserv.uga.edu] On Behalf Of Ed Jaffe
> Sent: Thursday, February 20, 2014 2:26 PM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: Re: HLASM continuation...
>
> On 2/20/2014 12:08 PM, Frank M. Ramaekers wrote:
> > ...what am I doing wrong here:
> >
> >
> >
> > 000728    0 0  8032  MVC
> > 0(L'QVSIMGLOGICALPARTITIONNAME,R4), *
> >
> >
> > QVSIMGLOGICALPARTITIONNAMEMove out the LPAR name
> >
> > ** ASMA074E Illegal syntax in expression -
>
> Only macros can be continued that way. Normal instructions cannot have
> embedded whitespace.
>
> --
> Edward E Jaffe
> Phoenix Software International, Inc
> 831 Parkview Drive North
> El Segundo, CA 90245
> http://www.phoenixsoftware.com/

Re: HLASM continuation...

[Frank M. Ramaekers]

I tried to send it with a COURIER NEW font, but it appeared to have gotten 
stripped.

* - column 72
Next line starts in 16


Frank M. Ramaekers Jr.


> -Original Message-
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> l...@listserv.uga.edu] On Behalf Of John McKown
> Sent: Thursday, February 20, 2014 2:26 PM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: Re: HLASM continuation...
>
> On Thu, Feb 20, 2014 at 2:08 PM, Frank M. Ramaekers
> wrote:
>
> > ...what am I doing wrong here:
> >
> >
> >
> > 000728    0 0  8032  MVC
> > 0(L'QVSIMGLOGICALPARTITIONNAME,R4), *
> >
> >
> > QVSIMGLOGICALPARTITIONNAMEMove out the LPAR name
> >
> > ** ASMA074E Illegal syntax in expression -
> >
> >
> >
> >
> > Frank M. Ramaekers Jr. | Systems Programmer | Information Technology |
> > American Income Life Insurance Company | 254-761-6649
> >
> >
> >
> The code really got wrapped around horribly, at least on my end. What
> column is the second operand, QVSIMGLOGICALPARTITIONNAME, start in?
> Also, how is it defined? Is it more that 255 character in length?
>
> --
> Wasn't there something about a PASCAL programmer knowing the value of
> everything and the Wirth of nothing?
>
> Maranatha! <><
> John McKown

HLASM continuation...

[Frank M. Ramaekers]

...what am I doing wrong here:

 

000728    0 0  8032  MVC
0(L'QVSIMGLOGICALPARTITIONNAME,R4), *

 
QVSIMGLOGICALPARTITIONNAMEMove out the LPAR name 

** ASMA074E Illegal syntax in expression -


 

Frank M. Ramaekers Jr. | Systems Programmer | Information Technology |
American Income Life Insurance Company | 254-761-6649

 

Re: OT: SI units and precision

[Frank M. Ramaekers]

I assume you me kilo rather than kibi?  (Mega/Mebi and Giga/Gibi)

Frank M. Ramaekers Jr.

> -Original Message-
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> l...@listserv.uga.edu] On Behalf Of Rob van der Heij
> Sent: Monday, January 06, 2014 7:49 AM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: Re: OT: SI units and precision
>
> On 6 January 2014 14:42, Baron Carter 
> wrote:
>
> > When using the SI metric system we must be accurate in using the
> > correct symbols.  The symbol for kilometers is km not Km.  Therefore
> > kilometers per hour is km/h not Km/h.  The SI system is made up of
> > symbols not abbreviations.
> >
>
> At least that explains I don't need to worry that km is not suddenly
1024 m as
> soon as I carry a storage device ;-)

Re: 16-bytes the same

[Frank M. Ramaekers]

Depends on the situation.  I was writing my own DUMP routine (via email)
and needed to look for repeated blocks (16-bytes).  If found (more than
once), than I could insert a "Same as above".

 

 Address Disp  0 1 2 3 4 5 6 7  8 9 A B C D E F
0...4...8...C..F

0087C9D4    *
*

0087C9E0 000C  
**

0087C9F0 001C to 0087CACF 00FB Same as above

0087CAD0 00FC 00*...
*

 

 

Frank M. Ramaekers Jr.

 

 

 

-Original Message-
From: IBM Mainframe Assembler List
[mailto:assembler-l...@listserv.uga.edu] On Behalf Of robin
Sent: Friday, October 01, 2010 11:12 AM
To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
Subject: Re: 16-bytes the same

 

From: "Frank M. Ramaekers" 

Sent: Friday, 1 October 2010 5:14 AM

 

>Doesn't the following statement check to see that all 16-bytes are
same?

 

>00251A D50E 5001 5000 1 0  8688  CLC   1(15,R5),0(R5)

 

Useful if you know the value of one of the bytes.

 

Not quite so useful if none of the values of the 16 bytes is known --

in which case an "ordinary" CLC would be simplest and clearest.


_
This message contains information which is privileged and confidential and is 
solely for the use of the
intended recipient. If you are not the intended recipient, be aware that any 
review, disclosure,
copying, distribution, or use of the contents of this message is strictly 
prohibited. If you have
received this in error, please destroy it immediately and notify us at 
privacy...@ailife.com.

Re: Help jog my memory (16-bytes the same)

[Frank M. Ramaekers]

I don't think you are correct.  This is an overlap compare, it compares
+0 to +1 for 15 bytes.  Example

0 1 2 3 4 5 6 7 8 9 A B C D E F
 1  X X
 2X X
 3  X X
 4X X
 5  X X
 6X X
 7  X X
 8X X
 9  X X
10X X
11  X X
12X X
13  X X
14X X
15  X X
0 1 2 3 4 5 6 7 8 9 A B C D E F
As you can see, it compares all 16 bytes (since the comparer is offset
by 1 byte).

Frank M. Ramaekers Jr.


-Original Message-
From: IBM Mainframe Assembler List
[mailto:assembler-l...@listserv.uga.edu] On Behalf Of Watkins, Douglas
Sent: Thursday, September 30, 2010 2:36 PM
To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
Subject: Re: Help jog my memory (16-bytes the same)

This statement checks only 15 bytes, not 16 bytes (starting at the
second byte pointed to by R5).  (And, higher and lower, as well as same,
may be indicated.)

-Original Message-
From: IBM Mainframe Assembler List
[mailto:assembler-l...@listserv.uga.edu] On Behalf Of Mike Flint
Sent: Thursday, September 30, 2010 3:29 PM
To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
Subject: Re: Help jog my memory (16-bytes the same)

Yes, it does.

Although I'd apply the appropriate commentary in most circumstances (as
a memory jogger).

Mike.

> -Original Message-
> From: framaek...@ailife.com
> Sent: Thu, 30 Sep 2010 14:14:10 -0500
> To: assembler-list@listserv.uga.edu
> Subject: Help jog my memory (16-bytes the same)
>
> Doesn't the following statement check to see that all 16-bytes are
same?
>
>
>
> 00251A D50E 5001 5000 1 0  8688      CLC   1(15,R5),0(R5)
>
>
>
>
>
>
>
>  Frank M. Ramaekers Jr.
>
>
>
> Systems Programmer
>
> MCP, MCP+I, MCSE & RHCE
>
> American Income Life Insurance Co.
>
> Phone: (254)761-6649
>
> 1200 Wooded Acres Dr.
>
> Fax: (254)741-5777
>
> Waco, Texas  76701
>
>
>
>
>
>
> _
>
> This message contains information which is privileged and confidential
> and is solely for the use of the
>
> intended recipient. If you are not the intended recipient, be aware
that
> any review, disclosure,
>
> copying, distribution, or use of the contents of this message is
strictly
> prohibited. If you have
>
> received this in error, please destroy it immediately and notify us at
> privacy...@ailife.com.


Send your photos by email in seconds...
TRY FREE IM TOOLPACK at http://www.imtoolpack.com/default.aspx?rc=if3
Works in all emails, instant messengers, blogs, forums and social
networks.

_
This message contains information which is privileged and confidential and is 
solely for the use of the
intended recipient. If you are not the intended recipient, be aware that any 
review, disclosure,
copying, distribution, or use of the contents of this message is strictly 
prohibited. If you have
received this in error, please destroy it immediately and notify us at 
privacy...@ailife.com.

Help jog my memory (16-bytes the same)

[Frank M. Ramaekers]

Doesn't the following statement check to see that all 16-bytes are same?

 

00251A D50E 5001 5000 1 0  8688  CLC   1(15,R5),0(R5)

 

 

 

 Frank M. Ramaekers Jr.

 

Systems Programmer

MCP, MCP+I, MCSE & RHCE

American Income Life Insurance Co.

Phone: (254)761-6649

1200 Wooded Acres Dr.

Fax: (254)741-5777

Waco, Texas  76701

 

 


_
This message contains information which is privileged and confidential and is 
solely for the use of the
intended recipient. If you are not the intended recipient, be aware that any 
review, disclosure,
copying, distribution, or use of the contents of this message is strictly 
prohibited. If you have
received this in error, please destroy it immediately and notify us at 
privacy...@ailife.com.