Show Posts
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
Pages: [1]
2
Programming / Re: Create/Update Excel Workbook
« on: June 06, 2023, 02:35:37 PM »
0010 DEF OBJECT EXCEL,"[WDX]EXCEL.APPLICATION"
0020 EXCEL'VISIBLE=1
0030 JUNK=EXCEL'WORKBOOKS'ADD()
0040 SHEET=EXCEL'ACTIVEWORKBOOK'WORKSHEETS(1)
0050 EXCEL'ACTIVEWORKBOOK'SHEETS(1)'NAME$="My Worksheet"
0060 ROW=1,COLUMN=1; SHEET'CELLS(ROW,COLUMN)'VALUE$="MY DATA"
0020 EXCEL'VISIBLE=1
0030 JUNK=EXCEL'WORKBOOKS'ADD()
0040 SHEET=EXCEL'ACTIVEWORKBOOK'WORKSHEETS(1)
0050 EXCEL'ACTIVEWORKBOOK'SHEETS(1)'NAME$="My Worksheet"
0060 ROW=1,COLUMN=1; SHEET'CELLS(ROW,COLUMN)'VALUE$="MY DATA"
3
Programming / Re: VS Code Extension for PxPlus
« on: November 16, 2020, 03:43:08 PM »
I like Jeff's idea of putting it in Github where everyone can contribute. I personally don't have experience setting up a project in Github. The concept of it being community owned it good and will be easier to keep current.
4
Programming / Re: VS Code Extension for PxPlus
« on: November 12, 2020, 03:39:02 PM »
For the longest time I have been command line 'ride or die', but Visual Studio Code provides so many features I get used to when working with other languages I have decided to put something together for it.
5
Programming / VS Code Extension for PxPlus
« on: November 12, 2020, 01:20:32 PM »
I would like to edit PxPlus code using VS Code with some form of syntax highlighting. Has anyone created a VS Code extension for PxPlus?
VS Code uses Textmate Grammar for syntax highlighting if anyone has a Textmate file that would save me some time.
Google did not produce much other than a vim syntax file created in 2005.
Thanks
James Crowther
Master Electronics
VS Code uses Textmate Grammar for syntax highlighting if anyone has a Textmate file that would save me some time.
Google did not produce much other than a vim syntax file created in 2005.
Thanks
James Crowther
Master Electronics
6
Programming / Re: TCB(21) - Current activation flags.
« on: May 29, 2019, 03:09:05 PM »
Thanks Mike,
I didn't see the tcb (window nnn) documentation in the tcb help section, but once you explained it and I knew what I was looking for I found another section of the manual that showed that functionality in it.
I am still at a loss as to why the two systems treat the code differently, but with this help I did get the code corrected.
James
I didn't see the tcb (window nnn) documentation in the tcb help section, but once you explained it and I knew what I was looking for I found another section of the manual that showed that functionality in it.
I am still at a loss as to why the two systems treat the code differently, but with this help I did get the code corrected.
James
7
Programming / Re: TCB(21) - Current activation flags.
« on: May 23, 2019, 04:43:01 PM »
Doing a delete from command line before the tcb(21) command I get the following
Server 1:1073786900
Server 2:1073787250
TCB(32) returns 14 on both servers.
Env(-1) returns "PxPlus-2017 Base" on both servers.
PKG from Server 1:
PxPlus Type = Base
Expiry Date = none
User Count = 20
Version Information = 14100000 / Activation Level 14
***** Activated Packages *****
20003 SSL Support
***** Separately Activated Packages *****
7587 PxPlus Enabled Expiry Date=none
20013 Thin Client Plug-in Expiry Date=none User Count=20
20012 Report Writer Expiry Date=none User Count=20
20004 Multiple Image Type Support Expiry Date=none
20002 Web Server Expiry Date=none
20001 Internet Toolkit Expiry Date=none
***** Non-Activated Packages *****
20005 Smart Controls 20006 Chart Control
20007 Customizer 20008 Views
20009 Application Server 20010 BBx Keyed File Read
20011 OLE Server 20014 MySQL
20015 XML 20017 Native Oracle Support
20018 Native DB2 Support 20019 ADO Interface to MS Sql
21020 eSignature 20020 PxServer
20021 MyTiles
***** Activated PxPlus Packages *****
10005 SQL Mirroring
PKG from Server 2:
PxPlus Type = Base
Expiry Date = none
User Count = 370
Version Information = 14100000 / Activation Level 14
***** Activated Packages *****
20003 SSL Support
***** Separately Activated Packages *****
7587 PxPlus Enabled Expiry Date=none
20013 Thin Client Plug-in Expiry Date=none User Count=350
20012 Report Writer Expiry Date=none User Count=2
20004 Multiple Image Type Support Expiry Date=none
20002 Web Server Expiry Date=none
20001 Internet Toolkit Expiry Date=none
***** Non-Activated Packages *****
20005 Smart Controls 20006 Chart Control
20007 Customizer 20008 Views
20009 Application Server 20010 BBx Keyed File Read
20011 OLE Server 20014 MySQL
20015 XML 20017 Native Oracle Support
20018 Native DB2 Support 20019 ADO Interface to MS Sql
21020 eSignature 20020 PxServer
20021 MyTiles
***** Activated PxPlus Packages *****
10005 SQL Mirroring 10007 FAX Support
Do any of these explain the difference in behavior between the 2 servers?
Thanks,
James
Server 1:1073786900
Server 2:1073787250
TCB(32) returns 14 on both servers.
Env(-1) returns "PxPlus-2017 Base" on both servers.
PKG from Server 1:
PxPlus Type = Base
Expiry Date = none
User Count = 20
Version Information = 14100000 / Activation Level 14
***** Activated Packages *****
20003 SSL Support
***** Separately Activated Packages *****
7587 PxPlus Enabled Expiry Date=none
20013 Thin Client Plug-in Expiry Date=none User Count=20
20012 Report Writer Expiry Date=none User Count=20
20004 Multiple Image Type Support Expiry Date=none
20002 Web Server Expiry Date=none
20001 Internet Toolkit Expiry Date=none
***** Non-Activated Packages *****
20005 Smart Controls 20006 Chart Control
20007 Customizer 20008 Views
20009 Application Server 20010 BBx Keyed File Read
20011 OLE Server 20014 MySQL
20015 XML 20017 Native Oracle Support
20018 Native DB2 Support 20019 ADO Interface to MS Sql
21020 eSignature 20020 PxServer
20021 MyTiles
***** Activated PxPlus Packages *****
10005 SQL Mirroring
PKG from Server 2:
PxPlus Type = Base
Expiry Date = none
User Count = 370
Version Information = 14100000 / Activation Level 14
***** Activated Packages *****
20003 SSL Support
***** Separately Activated Packages *****
7587 PxPlus Enabled Expiry Date=none
20013 Thin Client Plug-in Expiry Date=none User Count=350
20012 Report Writer Expiry Date=none User Count=2
20004 Multiple Image Type Support Expiry Date=none
20002 Web Server Expiry Date=none
20001 Internet Toolkit Expiry Date=none
***** Non-Activated Packages *****
20005 Smart Controls 20006 Chart Control
20007 Customizer 20008 Views
20009 Application Server 20010 BBx Keyed File Read
20011 OLE Server 20014 MySQL
20015 XML 20017 Native Oracle Support
20018 Native DB2 Support 20019 ADO Interface to MS Sql
21020 eSignature 20020 PxServer
20021 MyTiles
***** Activated PxPlus Packages *****
10005 SQL Mirroring 10007 FAX Support
Do any of these explain the difference in behavior between the 2 servers?
Thanks,
James
8
Programming / TCB(21) - Current activation flags.
« on: May 22, 2019, 01:33:06 PM »
I have 2 servers that are intended to be running same version of PxPlus.
Server 1 is reporting tcb(21) - 0073786900
Server 2 is reporting tcb(21) - 1073787250
Can anyone explain what these number represent? The manual calls them "Current activation flags".
This came up due to the following legacy code causing an error at runtime on Server 1, but not on Server 2:
0010 x=tcb(window,1)
The tcb function seems to be ok with tcb(0,1), but no ok with tcb(window,1) in syntax. Both servers show a syntax error if you try to change the line. Listing the code show an error on Server 1 where the runtime error occurs, however listing on Server 2 does show an error and does not error at runtime. I am somewhat confident the code is just bad since it is trying to get a window ID from TCB, but it has not been changed in a very long time and I would to understand why one server errors and the other does not before I remove the code.
Both servers are running PxPlus version 14.10 and tcb(32) and tcb(36) report the same values.
Thanks,
James
Master Electronics
Server 1 is reporting tcb(21) - 0073786900
Server 2 is reporting tcb(21) - 1073787250
Can anyone explain what these number represent? The manual calls them "Current activation flags".
This came up due to the following legacy code causing an error at runtime on Server 1, but not on Server 2:
0010 x=tcb(window,1)
The tcb function seems to be ok with tcb(0,1), but no ok with tcb(window,1) in syntax. Both servers show a syntax error if you try to change the line. Listing the code show an error on Server 1 where the runtime error occurs, however listing on Server 2 does show an error and does not error at runtime. I am somewhat confident the code is just bad since it is trying to get a window ID from TCB, but it has not been changed in a very long time and I would to understand why one server errors and the other does not before I remove the code.
Both servers are running PxPlus version 14.10 and tcb(32) and tcb(36) report the same values.
Thanks,
James
Master Electronics
9
Programming / Overiding or Modifying LOAD/SAVE Behavior
« on: April 04, 2019, 11:35:10 AM »
Is it possible to override or add to the functionality of LOAD/SAVE? Due to integration with GIT and other versioning tools I would like to add functionality both before and after the normal behavior.
As an example I would like to ensure they are working within a branch before they load a program. Once the load occurs I would like to execute some functionality to add the program to current branch if it is not already in it.
As a note I am not currently using the TortoiseSVN integration.
Thanks,
James
Master Electronics
As an example I would like to ensure they are working within a branch before they load a program. Once the load occurs I would like to execute some functionality to add the program to current branch if it is not already in it.
As a note I am not currently using the TortoiseSVN integration.
Thanks,
James
Master Electronics
10
Programming / Re: Listing a program to a channel
« on: February 06, 2019, 09:31:57 AM »Thanks Ken, that got me what I needed.
James
11
Programming / Listing a program to a channel
« on: February 05, 2019, 12:05:04 PM »
When listing a program to a channel
list (my_channel)
Pxplus is breaking up the listed line if it is too long.
Rather than this in the file:
0010 print x$;print y$
I get something like this:
0010 print x$;pr
0010:int y$
How do I get the list to have each line complete?
Thanks,
James
Master Electronics
list (my_channel)
Pxplus is breaking up the listed line if it is too long.
Rather than this in the file:
0010 print x$;print y$
I get something like this:
0010 print x$;pr
0010:int y$
How do I get the list to have each line complete?
Thanks,
James
Master Electronics
Pages: [1]