Please re-read both my and Peter Relson's reply.

If your caller has data in his space at address X and the existing PC-ss with 
SASN=OLD uses MVCP to copy the data from SASN address X to some address Y in 
the server ASID - then all is good.

Same situation but SASN=NEW, then the MVCP will attempt to copy data from 
address X in the *server* address space to some address Y in the server ASID.

If there is data at address X in the server space, then some presumably 
unwanted data ends up at address Y, otherwise you are going to abend 0C4.

-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of 
esst...@juno.com
Sent: Tuesday, January 8, 2019 4:28 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SASN=NEW on ETDEF macro

Rob POPS never states that the two address spaces must be different for MVCS 
and MVCP.I can and have issued MVCP in a NON Cross Memory ProgramMeaning I can 
issue an MVCP when HASN=PASN=.SASN. I have don't it with a standard Key 8 
program, and the source field was copied to the  target location.

---------- Original Message ----------
From: "esst...@juno.com" <esst...@juno.com>
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SASN=NEW on ETDEF macro
Date: Tue, 8 Jan 2019 16:12:53 GMT

Rob POPS never states that the two address spaces must be different for MVCS 
and MVCP.I can and have issued MVCP in a NON Cross Memory Program Meaning I can 
issue an MVCP when HASN=PASN=.SASN, --------- Original Message ----------
From: Rob Scott <rsc...@rocketsoftware.com>
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SASN=NEW on ETDEF macro
Date: Tue, 8 Jan 2019 13:26:43 +0000

This is not an anomaly - the system is behaving exactly how you told it to via 
the ETDEF.

Let's assume that prior to your original PC-ss call (SASN=OLD), you were in 
normal HASN=PASN=SASN mode and your ASID is X'00C0' and the PC-ss owner is ASID 
'00F0'

After the PC-ss, you will have : HASN = 00C0, PASN = 00F0 and SASN = 00C0

The MVCP will move data from the client address space (00C0) to the server 
address space (00F0) as expected.

When you code SASN=NEW and issue the PC-ss, you will have : HASN= 00C0, 
PASN=00F0 and SASN = 00F0

The MVCP will then attempt to move data from the server address space (00F0) to 
the server address space (00F0)

The fact that you did not abend is probably just luck.


-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of 
esst...@juno.com
Sent: Monday, January 7, 2019 10:01 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: SASN=NEW on ETDEF macro

.I'm experiencing an issue which I don't understand.
.
I have a small Stacking Space Switching PC Service Routine, its Entry Table 
Definition (ETDEF) has SASN=Old Specified.
.
It is my understanding -
SASN specifies whether the stacking PC routine will execute with SASN equal to 
the caller's PASN (SASN=OLD) .
PC Service Routine
- issues a STORAGE OBTAIN for some reentrant storage
- issues a MVCP (Move Characters To Primary) to copy a
  parameter list into the reentrant storage
- copies a small amount of data (under 100 bytes) back
  to the secondary address spaces using an MVCS instruction with
  an address provided in the parameter list.
.
The  parameter list also contains an eye-catcher which is verified after 
completion of the MVCP (Move Characters To Primary) instruction.
The are no Access Registers used.
.
This routine works well as I can see the data returned to the caller/requester 
in the secondary address space.
.
I agree - Not much of a PC Service Routine, and Access List may be better But 
using AR registers is Not the ISSUE !
.
.
When I modify the Entry Table Definition to use SASN=NEW for this Stacking 
Space Switching PC Service routine, the MVCP instruction does Not produce the 
same results.
Meaning NO data is copied from the secondary address Space to the Primary 
Address Space. the condition Code is 0.
.
After execution of the MVCP instruction the condition code is 0 and the 
structure in the reentrant storage that should occupy the remote parameter list 
does not contain the eye-catcher. The Return address for the data is zero.
.
According to Principal Of Operations, There is no condition code for this 
scenario, .MVCP and MVCS only provide condition code 0 or 3.
.
This anomoly only occurs when I change the ETD Def to use SASN=NEW.
.
Is this Normal Behavior ?, as I have not found this documented clearly in 
Extended Addressability. The Program does not change, only the specification 
for SASN in the Entry Table Description..Do I need to specify another parameter 
in the ETDEF macro ?
.
.Sorry I can't post code - contractual
Paul D'Angelo...                 .

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN 
================================ Rocket Software, Inc. and subsidiaries 
â&ndash;  77 Fourth Avenue, Waltham MA 02451 â&ndash;  Main Office Toll Free 
Number: +1 855.577.4323 Contact Customer Support: 
https://na01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fmy.rocketsoftware.com%2FRocketCommunity%2FRCEmailSupport&amp;data=02%7C01%7CRScott%40ROCKETSOFTWARE.COM%7C1b97f752b1bc4e60e2bb08d675865a61%7C79544c1eed224879a082b67a9a672aae%7C0%7C0%7C636825617248739727&amp;sdata=V035fJWQtHLoqQno1b6yZSUPhbAlhVqU6mZP%2BmUlusM%3D&amp;reserved=0
Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - 
https://na01.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.rocketsoftware.com%2Fmanage-your-email-preferences&amp;data=02%7C01%7CRScott%40ROCKETSOFTWARE.COM%7C1b97f752b1bc4e60e2bb08d675865a61%7C79544c1eed224879a082b67a9a672aae%7C0%7C0%7C636825617248749736&amp;sdata=KuoxbxVHIY7euOaOqvYR43d16WJE7ZTjLKsiLaOJYQ8%3D&amp;reserved=0
Privacy Policy - 
https://na01.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.rocketsoftware.com%2Fcompany%2Flegal%2Fprivacy-policy&amp;data=02%7C01%7CRScott%40ROCKETSOFTWARE.COM%7C1b97f752b1bc4e60e2bb08d675865a61%7C79544c1eed224879a082b67a9a672aae%7C0%7C0%7C636825617248749736&amp;sdata=seuz%2BUSLJrnNPCxxsSdXE%2Fgi5FEPOkttCPVIG7Ylq%2BI%3D&amp;reserved=0
================================

This communication and any attachments may contain confidential information of 
Rocket Software, Inc. All unauthorized use, disclosure or distribution is 
prohibited. If you are not the intended recipient, please notify Rocket 
Software immediately and destroy all copies of this communication. Thank you.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
================================
Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ 
Main Office Toll Free Number: +1 855.577.4323
Contact Customer Support: 
https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - 
http://www.rocketsoftware.com/manage-your-email-preferences
Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy
================================

This communication and any attachments may contain confidential information of 
Rocket Software, Inc. All unauthorized use, disclosure or distribution is 
prohibited. If you are not the intended recipient, please notify Rocket 
Software immediately and destroy all copies of this communication. Thank you.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to