× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Folks, I have a problem:
Trying to set up a sample of ADO OLE/DB environment for VB/Delphi to iSeries. Downloaded the ADO OLE/DB samples from http://www-03.ibm.com/servers/eserver/iseries/access/toolkit/adooledb.htm

Once installed, you need to “set up the environment for the server” (i.e. the AS/400), which means creating a Library, ACTIVEXSDK, and some files Customers, Parts, etc) plus some other objects (DTAQ’s, etc). A program, “vbass1oledb.exe” will do all that for you. So far so good, but... Problem? Program “vbass1oledb.exe” starts, from the PC side, creating the library in the AS/400, and some files, etc and then will populate those files with some sample data, with SQL sentences like:

Insert into Activexsdk.Parts VALUES(12301, ‘Quad …’, 44, 120.00, ‘1996-01-12’

Well, here QZDASOINIT fails with SQL0104 : Token “.” not valid …

The reason is the “decimal point” in the fourth value above (item price) of 120.00 Obviously, it was meant for the US market, with “decimal point” instead of “decimal comma” which is our standard…

I opened an interactive SQL session, tried the same sentence, and it failed, of course. So, OK, I changed the QDECFMT system value to 1 (= blank, meaning decimal point) from the original value of 2 (=J, decimal comma). Tried again the same sentence in the interactive session, and this time it run OK. Good!

So, I thought, now it will work.
Deleted the whole library ACTIVEXSDK, and tried “vbass1oledb.exe” again.
Again, same error.!!!

Maybe QZDASOINIT jobs take QDECFMT at IPLtime?
So I powered down the system, and restarted again. QDECFMT still shows 1=blank for decimal point
Same error...

QZDASOINIT runs under QUSER profile.
Could the reason be a difference in user running the sentence?
So I tried again interactive SQL as QUSER: the interactive SQL sentence works,
but when run from “vbass1oledb.exe”, thru QZDASOINIT, it will again fail...

So, since I don’t have the source from “vbass1oledb.exe” to change the INSERT lines, modifying the Price values to decimal commas...

How can I change the SQL session attributes for the QZDASOINIT job, so it will accept “decimal point” ???
Shouldn’t QDECFMT be good enough for that purpose? Any ideas?

TIA


As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.