🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: bit.listserv.appc-l
Article #370

Rexx and APPC/MVS

#370
From: O'Callaghan, Geoff
Date: Fri, 21 Jan 1994 20:09
38 lines
1958 bytes
G'day

I originally asked the following questing in the Rexx list:

>I need to find out the address of a Rexx variable,  can anyone tell me the
easiest way to do it?
>
>The environment is TSO/E 2.4.0 and MVS/ESA 4.2.3.

It's probably best if I try to explain what I am trying to achieve.

I have a Rexx exec as an outbound appc transaction.The rexx exec currently
synchronously requests
conversations with several MVS images.  This is because the NOTIFY_TYPE on
the ATBALLC is set to
NONE.

In order to process the ALLOCATE's asynchronously I must change the
NOTIFY_TYPE to ECB by
providing an 8 byte structure containing a fullword binary one followed by
the address of a fullword
area to be used as the ECB.  I would like the Area used as an ECB to be a
Rexx variable.

Hence I need to know the address of a Rexx variable.  I have already written
code using the
IRXEXCOM interface to get access to the Rexx variables from an assembler
program so that I
can do a WAIT.

I hope you Rexx/APPC Guru's can assist me.  Perhaps there is an easier way
to achieve what I
want.

Thanks,

Geoff O'Callaghan
Telstra Corporation(Telecom Australia)
Technical Details
Message-ID: <2D409254@msmail.trl.oz.au>
Path: arc1-ca.pugleaf.net!gmd.de!newsserver.jvnc.net!howland.reston.ans.net!paladin.american.edu!auvm!VITGSSW.TELECOM.COM.AU!GOcallag

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 10aed9,2d38a6bdc43b4089,start
X-Google-Attributes: gid10aed9,public
X-Google-ArrivalTime: 1994-01-21 11:52:13 PST
Path: arc1-ca.pugleaf.net!gmd.de!newsserver.jvnc.net!howland.reston.ans.net!paladin.american.edu!auvm!VITGSSW.TELECOM.COM.AU!GOcallag
Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
Newsgroups: bit.listserv.appc-l
Return-Path: <@AUVM.AMERICAN.EDU:owner-appc-l@AUVM.AMERICAN.EDU>
Return-Path: <@AUVM.AMERICAN.EDU:GOcallag@VITGSSW.TELECOM.COM.AU>
Encoding: 39 TEXT
X-Mailer: Microsoft Mail V3.0
Message-ID: <2D409254@msmail.trl.oz.au>
Date: Fri, 21 Jan 1994 15:09:00 EST
Sender: APPC Discussion List <APPC-L@AUVM.BITNET>
From: "O'Callaghan, Geoff" <GOcallag@VITGSSW.TELECOM.COM.AU>
Subject: Rexx and APPC/MVS
Lines: 37