|
Dan, In a message dated 97-04-15 18:39:08 EDT, you write: > D SQLSTR S 256A > D* > C/EXEC SQL > C+ DECLARE WRKEMPCR CURSOR > C+ FOR DYNSQLSTMT > C/END-EXEC > C EVAL SQLSTR = 'SELECT * FROM AFILE + > C WHERE FLD1 = ' + > C VALUE1 + > C ' ORDER BY FLD2, FLD3' > C* > C/EXEC SQL > C+ PREPARE DYNSQLSTMT > C+ FROM :SQLSTR > C/END-EXEC > C/EXEC SQL > C+ OPEN WRKEMPCR > C/END-EXEC I'm not sure, but I think that you need to replace VALUE1 in your EVAL statement with a question mark (?). Then, C+ OPEN WRKEMPCR USING :VALUE1. That should do the trick... HTH, Dean Asmussen Enterprise Systems Consulting, Inc. Fuquay-Varina, NC USA E-Mail: DAsmussen@AOL.COM "Listen, kid, take my advice. Never hate a song that has sold a half a million copies!" -- Irving Berlin (Hear that, you Midrange and RPG haters? ;-)) * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * This is the Midrange System Mailing List! To submit a new message, * * send your mail to "MIDRANGE-L@midrange.com". To unsubscribe from * * this list send email to MAJORDOMO@midrange.com and specify * * 'unsubscribe MIDRANGE-L' in the body of your message. Questions * * should be directed to the list owner / operator: david@midrange.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.
midrange.com
