Recent Posts

Pages: 1 ... 8 9 [10]
91
Open Forum / Re: Mike
« Last post by John on January 31, 2020, 06:31:13 am »
Quote from: Patrice@O2
Mike passed away today friday 31, 2020 at 11:40 in the morning.

I've lost a virtual friend I would be honored to call my brother.  :'(

You will be missed by many Mike!

March 3, 1956 - January 31, 2020
92
Open Forum / Mike
« Last post by John on January 22, 2020, 12:58:28 pm »
Quote from: Patrice@O2


Mike Lobanovsky

« on: January 22, 2020, 08:00:41 AM »

I am very sorry to inform you that Mike's health is in a very critical state.
He has been put in major sedation.
His doctor does not have a positive forecast. 

Nothing else to do than hope and pray for now...
93
Scripting Languages / Re: Scriptbasic Build Linux
« Last post by John on January 19, 2020, 07:29:39 pm »
I decided to move to MySQL as SQLite isn't robust enough for my requirements. If you find time to look at the column duping issue that would be great.
94
Scripting Languages / Re: Scriptbasic Build Linux
« Last post by John on January 19, 2020, 05:42:07 am »
AIR,

There seems to be a problem with your SQLite SB extension module. The column data is being duplicated in columns that should be null. If I do the select in the SQLite3 CLI, it displays the data correctly.
95
Scripting Languages / Re: Script BASIC for Java
« Last post by John on January 18, 2020, 11:35:07 am »
Quote from: Peter Verhas
With the pull req made by Petr Pytelka the version 2.1.0 of jScriptBasic is released. It is a simple embeddable BASIC interpreter written in Java that you can use in applications to let users write simple scripts. This rel features multiple commands on a single line. Thanks Petr

Multiple statements per line is a major direction change IMHO.
96
Open Forum / Re: RaspberryBASIC.org Forum
« Last post by John on January 08, 2020, 06:50:36 am »
AIR,

A response from Antonio.

Quote
Hi,

  I just committed some of the changes to tecmake.mak in IUP SVN.

Best,

Scuri

BTW, other changes should be set on the user environment. Like:

USE_LUA53=YES
USE_PKGCONFIG=YES
USE_GTK3=YES
LUA51=$(TECTOOLS_HOME)/lua51
LUA_SFX=51



97
Nim / Re: winim
« Last post by John on January 08, 2020, 06:23:10 am »
I have been playing with XML parsers and have come to the conclusion that ScriptBasic SPLITA and LIKE blows away anything I've tried. QuickBooks may just have a new scripting option. QBScript 😎
98
Nim / Re: winim
« Last post by John on January 04, 2020, 05:12:26 pm »
One of my concerns rebuilding my toolbox with Nim was COM/OLE (CallbyName) support. I'm happy to say that concern is behind me. I do a lot of interface work with QuickBooks Enterprise which uses a COM SDK as their interface. Here is an example of a ScriptBasic and Nim script to return the CoA. (Chart of Accounts)

Code: Script BASIC
  1. IMPORT COM.sbi
  2.  
  3. oqbXMLRP = COM::CREATE(:SET, "QBFC13.QBSessionManager.1")
  4.  
  5. COM::CBN(oqbXMLRP, "OpenConnection", :CALL, "", "ScriptBasic")
  6. COM::CBN(oqbXMLRP, "BeginSession", :CALL, "", 2)
  7.  
  8. xml_request = """
  9. <?qbxml version="13.0"?>
  10. <QBXML>
  11.   <QBXMLMsgsRq onError="stopOnError">
  12.     <AccountQueryRq>
  13.     </AccountQueryRq>
  14.   </QBXMLMsgsRq>
  15. </QBXML>
  16. """
  17.  
  18. oResponse = COM::CBN(oqbXMLRP, "DoRequestsFromXMLString", :CALL, xml_request)
  19. xml_str = COM::CBN(oResponse, "ToXMLString", :CALL)
  20.  
  21. PRINT xml_str,"\n"
  22.  
  23. COM::CBN(oqbXMLRP, "EndSession", :CALL)
  24. COM::CBN(oqbXMLRP, "CloseConnection", :CALL)
  25. COM::RELEASE(oResponse)
  26. COM::RELEASE(oqbXMLRP)
  27.  

Nim
Code: Text
  1. import winim.com
  2.  
  3. comScript:
  4.  
  5.   var xml_request = """
  6.   <?qbxml version="13.0"?>
  7.   <QBXML>
  8.     <QBXMLMsgsRq onError="stopOnError">
  9.       <AccountQueryRq>
  10.       </AccountQueryRq>
  11.     </QBXMLMsgsRq>
  12.   </QBXML>
  13.   """
  14.   var qbobj = CreateObject("QBFC13.QBSessionManager.1")
  15.  
  16.   qbobj.OpenConnection("", "Nim")
  17.   qbobj.BeginSession("", 2)
  18.  
  19.   var oResponse = qbobj.DoRequestsFromXMLString(xml_request)
  20.   var xml_str = oResponse.ToXMLString()  
  21.    
  22.   echo xml_str
  23.  
  24.   qbobj.EndSession()
  25.   qbobj.CloseConnection()
  26.  
  27.   COM_FullRelease()
  28.  


Attached is the response from this request using a QB demo company.
99
Nim / Re: winim
« Last post by John on January 04, 2020, 12:35:42 pm »
I was able to test the COM functionality of the winim library unsing Excel as my COM object.

Code: Text
  1. import strutils
  2. import winim.com
  3.  
  4. comScript:
  5.   var obj = CreateObject("Excel.Application")
  6.   obj.visible = true
  7.   obj.workbooks.add()
  8.  
  9.   var
  10.     s1 = "the quick fox jumps over the lazy brown dog".split(" ")
  11.     s2 = @[@[1, 2], @[3, 4, 5, 6, 7], @[8, 9, 10, 11], @[12], @[13, 14, 15]]
  12.  
  13.   obj.activeSheet.range("A1:E6").clear()
  14.   obj.activeSheet.range("A1:I1") = s1 # this convert seq to 1D safearray
  15.   obj.activeSheet.range("A2:E6") = s2 # this convert seq to 2D safearray
  16.  
  17.   # obj.activeSheet.saveAs("jrs.xls")
  18.   # obj.activeSheet.close(0)
  19.  
  20.   COM_FullRelease()
  21.  

100
Open Forum / Re: RaspberryBASIC.org Forum
« Last post by John on January 04, 2020, 12:32:58 pm »
Will you be posting this to Raspberry BASIC with some screenshots?
Pages: 1 ... 8 9 [10]