PxPlus User Forum

Twitter Twitter Twitter

Recent Posts

Pages: [1] 2 3 ... 10
1
Language / Re: Shared user slots
« Last post by Mike King on July 19, 2019, 12:01:55 PM »
You are getting an error 13 because in order to change the size of the primary window it has to be dropped then recreated.

Emulation mode doesn't allow you to drop the primary window (0) since the environment you are emulating will not allow it.  If we did allow it, PxPlus would not be providing a proper emulation.

If you want to change the primary window you will need to not run in emulation mode. 

PxPlus native functionality allows you to drop any window as long as you leave a window, any window,  present in your session.
2
Language / REPEAT DATA clarifications
« Last post by James Zukowski on July 19, 2019, 11:01:50 AM »
I'm getting ready to use REPEAT DATA for the first time and would like some clarification on a few points.

After a REPEAT DATA to Primary on Alternate and the processing is done:
  • Is a REPEAT DATA to Primary END required, or does closing the Alternate implicitly END the connection (as is suggested by the example in the documentation)?
  • If the Primary is CLOSEd, I presume the connection is severed. Is the Alternate also automatically closed, or is that explicitly required?
  • Should files be closed in "reverse sequence"?
Thanks for the help!
3
Wish List / character set option
« Last post by Thomas Bock on July 19, 2019, 10:25:21 AM »
I'd like to use a character set option in the OPT part of a [mysql] open statement.
That will enable an application to use its character set against a SQL connection without any need to convert the data iself.
The ODBC-driver for a MySQL-DB supports this already. Perhaps the same option can be used.
4
Language / Re: Shared user slots
« Last post by Gilles on July 19, 2019, 03:21:04 AM »
wdw crash with error 13 on line 30 if PRM('BX')=1
5
Language / Re: Shared user slots
« Last post by Mike King on July 18, 2019, 06:01:06 PM »
You should not be using DEFTTY to resize the screen size.  While it does define a new screen size it also indicates the device as a New terminal which will cause the system to stop sharing the user slot.

If all you want to do is change the size of the screen and using WindX, try the command

wdw 40x15

This will reset your main screen to 40 columns by 15 lines.

It does this by cloning your primary window in order to preserve its contents, then drops the primary window, recreates it the desired size then drops the clone.
6
Language / Re: Shared user slots
« Last post by jasonc on July 18, 2019, 05:43:29 PM »
I got some help from someone offline and got this resolved.  No further response needed.
In case anyone is wondering, changing "deftty" to "deftty window" fixed it.
My description of the problem was slightly off also.  Only the first session I opened behaved as I described.
7
Language / Shared user slots
« Last post by jasonc on July 18, 2019, 04:45:34 PM »
From the reference manual, the '1U' parameter says that if the parameter is off, "PxPlus attempts to use shared user slots for the session".  Noting the word "attempts", what would prevent PxPlus from being able to share a user slot?

The reason I ask is that I can open 3 code screens and all will be sharing the same user slot.
However, if I try to resize the screens to allow a larger viewable area, they are sometimes assigned a dedicated user slot.  It is inconsistent, but happens often enough to cause "User limit exceeded" problems.

Example:
-}?prm('1U')
0
-}?tcb(27)
-17
-}deftty (0)40,15
-}?prm('1U')
1
-}?tcb(27)
10

For some reason, when issuing the deftty directive above, the '1U' parameter gets set and the session is now using a dedicated user slot.  Any suggestions on how to prevent this from using a dedicated user slot?

8
Nomads / Re: Why does a disabled radio button not show which was selected?
« Last post by Dave Fullerton on July 18, 2019, 02:54:44 PM »
Hi Mike:

If you try this, you will see that the radio button doesn't stay:

0010 print 'CS',
0020 print '4D', ! Works with or without this
0030 let rbt=10
0040 radio_button rbt:1,@(10,10,10,2)="{!16x16/Controls/Check_Box_Uncheck|!16x16/Controls/Check_Box}Radio 1"
0050 radio_button rbt:2,@(10,12,10,2)="{!16x16/Controls/Check_Box_Uncheck|!16x16/Controls/Check_Box}Radio 2"
0060 print "Click either button and it will be disabled"
0070 while 1
0080 obtain (0)*
0090 if ctl=4 or eom=esc then break
0100 if ctl=rbt then radio_button read rbt,x; disable control rbt:x; print x," Pressed"
0110 wend

Regards

Dave Fullerton
9
Language / Re: Json labels
« Last post by Mike King on July 17, 2019, 11:08:43 AM »
You can simply load the JSON into an array then spin through all the array indexes.

For example I copied your JSON to the clipboard directly from your posting and ran the following

0010 CLIP_BOARD READ json$
0020 DIM LOAD array${ALL}=json$
0040 FOR n$ INDEX array${ALL}
0050 PRINT n$
0060 NEXT
-:run
title
type
status
detail
trace
filter.vat_number.callbackValue



As you can see it showed all the labels found in the JSON.
10
Language / Json labels
« Last post by johanwichgers on July 17, 2019, 10:14:54 AM »
The filter labels in the json data below are dynamic and i dont know what to expect.
Is there a way to determine what labels(example vat_number) are present in my json so i can find the values ?

{
  "filter": {
    "vat_number": {
      "callbackValue": "The input is not valid"
    }
  },
  "trace": "#0 /home/test.identity.transferro.com/code/src/module/Controller/Api/V1/CustomerController.php(123): Transferro\\IdentityService\\Controller\\Api\\V1\\CustomerController->doCreate(Array)\n#1 /home/test.identity.transferro.com/code/vendor/locosoft/component/src/module/Controller/Api/AbstractApiController.php(393): Transferro\\IdentityService\\Controller\\Api\\V1\\CustomerController->create(Array)\n#2 /home/test.identity.transferro.com/code/vendor/zendframework/zend-mvc/src/Controller/AbstractRestfulController.php(429): Locosoft\\Component\\Controller\\Api\\AbstractApiController->processPostData(Object(Zend\\Http\\PhpEnvironment\\Request))\n#3 /home/test.identity.transferro.com/code/vendor/zendframework/zend-eventmanager/src/EventManager.php(322): Zend\\Mvc\\Controller\\AbstractRestfulController->onDispatch(Object(Zend\\Mvc\\MvcEvent))\n#4 /home/test.identity.transferro.com/code/vendor/zendframework/zend-eventmanager/src/EventManager.php(179): Zend\\EventManager\\EventManager->triggerListeners(Object(Zend\\Mvc\\MvcEvent), Object(Closure))\n#5 /home/test.identity.transferro.com/code/vendor/zendframework/zend-mvc/src/Controller/AbstractController.php(106): Zend\\EventManager\\EventManager->triggerEventUntil(Object(Closure), Object(Zend\\Mvc\\MvcEvent))\n#6 /home/test.identity.transferro.com/code/vendor/zendframework/zend-mvc/src/Controller/AbstractRestfulController.php(313): Zend\\Mvc\\Controller\\AbstractController->dispatch(Object(Zend\\Http\\PhpEnvironment\\Request), Object(Zend\\Http\\PhpEnvironment\\Response))\n#7 /home/test.identity.transferro.com/code/vendor/zendframework/zend-mvc/src/DispatchListener.php(138): Zend\\Mvc\\Controller\\AbstractRestfulController->dispatch(Object(Zend\\Http\\PhpEnvironment\\Request), Object(Zend\\Http\\PhpEnvironment\\Response))\n#8 /home/test.identity.transferro.com/code/vendor/zendframework/zend-eventmanager/src/EventManager.php(322): Zend\\Mvc\\DispatchListener->onDispatch(Object(Zend\\Mvc\\MvcEvent))\n#9 /home/test.identity.transferro.com/code/vendor/zendframework/zend-eventmanager/src/EventManager.php(179): Zend\\EventManager\\EventManager->triggerListeners(Object(Zend\\Mvc\\MvcEvent), Object(Closure))\n#10 /home/test.identity.transferro.com/code/vendor/zendframework/zend-mvc/src/Application.php(332): Zend\\EventManager\\EventManager->triggerEventUntil(Object(Closure), Object(Zend\\Mvc\\MvcEvent))\n#11 /home/test.identity.transferro.com/code/public/index.php(19): Zend\\Mvc\\Application->run()\n#12 {main}",
  "type": "http://www.w3.org/Protocols/rfc2616/rfc2616-sec10.html",
  "title": "Bad Request",
  "status": 400,
  "detail": "Your request parameters didn't validate"
}
Pages: [1] 2 3 ... 10