|
Hi Scott -
Heh... it always brings a smile to my face when I see my code resurface! and this is undoubtedly my code, with one difference...
Given this plist ...
0058.00 c *entry plist 0059.00 c parm peUserDscInfo 0060.00 c parm peDevDscInfo 0061.00 c parm peCnnDscInfo 0062.00 c parm peEnvOpt 0063.00 c parm peEnvOptLen 0064.00 c parm peAllowConn 0065.00 c parm peAutoSignOn
Why have this ...
0069.00 c eval p_CnnDscInfo = %addr(peCnnDscInfo)
0044.00 ** Connection Description Info structure 0045.00 D p_CnnDscInfo S * inz(*NULL) 0046.00 D dsCnnDscInfo DS based(p_CnnDscInfo)
and not ...
0044.00 ** Connection Description Info structure 0046.00 D peCnnDscInfo DS
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.