I wrote a small assembler program to try the JCL Symbol Services macro (IEFSJSYM) but am not having any success at getting any symbol values returned to my program. R15 is zero after the macro, and the eye-catcher is correct in the output area, but sydEntryCount is always zero.
I have a very simple test case with // EXPORT SYMLIST=* // SET VAR1=200 // SET VAR='Hello World' // EXEC ASMACLG,... larl r2,symbolList la r3,symbolArea la r4,diagData iefsjsym request=getbyname,diagdata=(r4), + symlistarray=(r2),numentries==y(symbolList#), + symbarea=(r3),symbarealen==a(l'symbolArea), + mf=(e,iefsjsym_l,complete) I use GETBYNAME, but have not tried the GETALL.I also tried wildcard names in my symbol list. If I can get GETBYNAME working the way I want, I plan to use that to pass run-time options to the program instead of parsing a PARM=/PARMDD string. Thanks for any suggestions... Donald Russell ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN