That helped a lot!!! Jeff
Jeff Johnson SanDC, Inc. (623)-582-0323 www.san-dc.com <http://www.san-dc.com> www.cremationtracker.com <http://www.cremationtracker.com> www.arelationshipmanager.com <http://www.arelationshipmanager.com> On 1/3/2014 9:35 AM, Dave Crozier wrote:
If you look there is a trailing comma at the end of " wkdatetime" that shouldn't be there, perhaps that is your problem. Also I normally add to the "Text To" command the following: Textmerge Noshow Pretext 1+2+4+8 it just clears up spurious characters that can screw SQL up Dave -----Original Message----- From: ProFox [mailto:[email protected]] On Behalf Of Jeff Johnson Sent: 03 January 2014 16:30 To: [email protected] Subject: Re: SQL Insert Frank: It is not working and of course all I get is a -1 returned. Should there be ";" line continuations in there? Also, any reason why you put the commas in front instead of behind the varuable? TIA Jeff Jeff Johnson SanDC, Inc. (623)-582-0323 www.san-dc.com <http://www.san-dc.com> www.cremationtracker.com <http://www.cremationtracker.com> www.arelationshipmanager.com <http://www.arelationshipmanager.com> On 1/3/2014 4:52 AM, Frank Cazabon wrote:I'm not seeing any problems there. Maybe you could add in a query for the record you just inserted to see if it was inserted. Here's how I would do it, checking if the record inserted successfully, only for testing's sake: * I would change your SQL to use parameters all the way through, * Code like this would be faster/easier to maintain but you can ignore it if you want: TEXT TO m.lcSQL NOSHOW TEXTMERGE INSERT INTO SQLSERVERTABLE ( DP_WKSEQNO ,DP_WKCOMPANY_PS ,DP_WKPAYGROUP_PS ,DP_WKPAYGROUP ,DP_WKDATE ,DP_WKTRIPNO ,DP_WKTRIPQ ,DP_WKEVENT ,DP_WKSTDATE ,DP_WKSTTIME ,DP_WKENDDATE ,DP_WKENDTIME ,DP_WKMINS ,DP_WKSTAT ,DP_WKDRIVER ,DP_WKCODE1 ,DP_WKCODE2 ,DP_WKLOC ,DP_WKACCNT ,DP_WKHUB ,DP_WKTODMILES ,DP_WKMIMARK ,DP_WKWEIGHT ,DP_WKQUANT ,DP_WKHOOK1 ,DP_WKPAYCODE ,DP_WKGUID ,DP_WKDATETIME ,DP_WKSTATUS ,DP_WKPROCESSED) VALUES ( ?m.wkseqno ,?m.pscompany ,?m.pspaygroup ,?m.wkpaygroup ,?m.wkdate ,?m.wktripno ,?m.wktripq ,?m.wkevent ,?m.wkstdate ,?m.wksttime ,?m.wkenddate ,?m.wkendtime ,?m.wkmins ,?m.wkstat ,?m.wkdriver ,?m.wkcode1 ,?m.wkcode2 ,?m.wkloc ,?m.wkaccnt ,?m.wkhub ,?m.wktodmiles ,?m.wkmimark ,?m.wkweight ,?m.wkquant ,?m.wkhook1 ,?m.wkpaycode ,?m.wkguid ,?m._wkdatetime, ,?m.wkstatus ,'N') ENDTEXT SCAN SCATTER MEMVAR MEMO lnsuccess = SQLEXEC(lnSQLhandle, m.lcSQL) IF lnsuccess < 1 =MESSAGEBOX('SQL Select failed: ' + TRANSFORM(lnsuccess) + "'" + m.lcSQL+ "'") lclogstring = lclogstring + lcSQL + lccrlf + lccrlf EXIT ELSE * check if record was saved lnsuccess = SQLEXEC(lnSQLhandle, "SELECT recinserted = COUNT(dp_wkseqno) FROM SQLServerTable WHERE dp_wkseqno = ?m.wkseqno", "c_Result") IF m.lnSuccess < 1 * failed ELSE IF c_Result.RecInserted <> 1 * failed or multiple seqno SET STEP ON ENDIF ENDIF ENDIF ENDSCAN--- StripMime Report -- processed MIME parts --- multipart/alternative text/plain (text body -- kept) multipart/related text/html image/jpeg ---
[excessive quoting removed by server] _______________________________________________ Post Messages to: [email protected] Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[email protected] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
