Donald Russell wrote: >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 see nothing strange in this macro, but ... how is the program assembled? AMODE, RMODE, RENT, etc? Do you see any assembler messages? Please post the symbolList, symbolArea, diagData definitions. Please post the areas where the macros results are placed (output area) and the results + eyecatcher as passed. Groete / Greetings Elardus Engelbrecht ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
