I haven't done a lot with dataspaces, but I have with 64 bit.  What I do is set 
up 2 BLSRESSY areas, one with ABITS=31 and a second with ABITS=64 in order to 
get one with 4 byte pointers and one with 8 (not needed, you can retrieve 31 
bit addresses with 64 bit pointers, but I was extending an old exit). Then when 
you use the ESS block, ensure that the XSSPBIT64 bit in the XSSPPFLG is set to 
one for 64 bit and zero for 31 bit. I don't have any simple samples that aren't 
intermingled with proprietary code at this point, maybe I can pull something 
together if you need more assistance. I found that looking at the expansion of 
the various mapping macros gave me more insight than the documentation in the 
IPCS Customization manual, btw.

Wayne Driscoll
Rocket Software
Note - All opinions are strictly my own.

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Dan D
Sent: Friday, June 1, 2018 6:26 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Looking for IPCS VERBX examples

I'm looking for samples of how to do things within an IPCS VERB exit in 
assembler.
I have a lot of the simple things down but I'm confused with symbols, 
dataspaces and 64-bit storage.

Could someone send me or point me at some simple samples to create symbols, 
access a dataspace and 64-bit storage?
I've been through the IPCS Customization and other manuals but it's still a 
little confusing.

I think I need to understand the parameters to ADPLSEQS, ADPLSMAP and maybe 
ADPLSSYM.

Thanks,
Dan

----------------------------------------------------------------------
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