|
I have this V5R3 SQLRPGLE program. Somehow the precompiler implicitly qualifies the datastructure, (at times). I have a pmr open, but just want to make sure that I am not doing something wrong. >From the compile listing: ... DSYSSTSHSTF E DS EXTNAME(SYSSTSHST) ... D DS FETCH D SQL_00006 1 2B 0 INZ(064) length of header D SQL_00007 3 4B 0 INZ(5) statement number D SQL_00008 5 8B 0 INZ(0) invocation mark D SQL_00009 9 9A INZ('0') data is okay D SQL_00010 10 63A end of header D SQL_00011 65 72A SYSTEMNAME D SQL_00012 S LIKE(SYSSTSHSTF.SYSTEMNAME ) ... C*EXEC SQL C* FETCH S1 INTO :SYSTEMNAME C*END-EXEC C Z-ADD -4 SQLER6 SQL 5 C CALL SQLROUTE SQL C PARM SQLCA SQL C PARM SQL_00006 SQL C SQL_00009 IFEQ '1' SQL C EVAL SYSTEMNAME = SQL_00011 SQL ... C*EXEC SQL C* CONNECT TO :Systemname C*END-EXEC C EVAL SQL_00012 = SYSSTSHSTF.SYSTEMNAME SQL ... WRKPTFGRP PTF Group Level Status SF99530 4153 Installed SF99529 4 Installed SF99503 1 Installed SF99275 1 Installed Rob Berendt -- Group Dekko Services, LLC Dept 01.073 PO Box 2000 Dock 108 6928N 400E Kendallville, IN 46755 http://www.dekko.com
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.