In article <6648609332066356.wa.zos.jes2gmail....@listserv.ua.edu> you wrote: > I'm using ADPLSEQS to define a symbol in an IPCS verb exit. > I'm trying to define a symbol to a dataspace. > When I issue "L symbol" I get > LIST 00. ASID(X'0046') LENGTH(X'01') AREA(Symbol) > ASID(X'0046') ADDRESS(00.) KEY(08) PREFIXED > I can issue "L symbol DSPNAME(symbol)" but I wonder if I can define the > symbol so that is the default. > Does someone know what field in the ESSY I need to set, and to what? > Thanks
I've only done regular ASID which I set in "Integer 2". For dataspace, it looks like you need the "Integer 1" set to the ASID and "Integer 2" set to the DSPNAME. The odd part is that the macros to expand "Integer 2" to a CL8 "Second qualifier" requires coding it a different way than BLSRESSY codes it. It looks as though you'd have to modify BLSSRESSY and code BLSRDATS like: &P.AS BLSRDATS ZZZASTDS,DSECT=NO -- Don Poitras - SAS Development - SAS Institute Inc. - SAS Campus Drive sas...@sas.com (919) 531-5637 Cary, NC 27513 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
