open-insight/SYSPROG/STPROCINS/MVBFS_HANDLER_U2_EQUATES.txt
2024-03-25 15:17:34 -07:00

51 lines
2.4 KiB
Plaintext

Compile Insert MVBFS_HANDLER_U2_EQUATES
* Equates specific to the U2 mvbfs connector
* 06-13-19 rjc Add connectionsting params, labels, descriptions
Equ HOSTNAME$ To "HOSTNAME"
Equ SERVERPORT$ To "SERVERPORT"
Equ SERVERSERVICE$ To "SERVICENAME"
Equ POOLING$ To "POOLING" ; * 08-29-12 rjc
Equ MINPOOL$ To "MINPOOL"
Equ MAXPOOL$ To "MAXPOOL"
Equ TIMEOUT$ To "TIMEOUT" ; * 05-19-19 rjc
*Equ USERNAME$ To "USERNAME"
*Equ PASSWORD$ To "PASSWORD"
Equ APPLICATION$ To "APPLICATION"
* Connection specific params
* The dsn will ask for these in order to build the propery panel
Equ CONNECTION_STRING_PARAMS$ To hostname$ :@vm:SERVERPORT$:@vm:APPLICATION$:@vm:SERVERSERVICE$:@vm:POOLING$:@vm:MINPOOL$:@vm:MAXPOOL$:@vm:TIMEOUT$
Equ CONNECTION_STRING_LABELS$ To "Server":@vm:"Port" :@vm:"Account":@vm:"ServerService":@vm:"Connection Pooling":@vm:"Minimum Pool":@vm:"Maximum Pool":@vm:"Connection Timeout"
Equ CONNECTION_STRING_ICONVS$ To "" :@vm:"MD0" :@vm:"" :@vm:"" :@vm:"(B)" :@vm:"MD0" :@vm:"MD0" :@vm:"MD0"
Equ CONNECTION_STRING_DESCRIPTIONS$ To "The name or ip address of the U2 server" |
:@vm: "server port" |
:@vm: "The U2 account you want to link to"|
:@vm: "The server service" |
:@vm: "Use connection pooling the Pooling flag is checked true" |
:@vm: "Minimum pool size" |
:@vm: "Maximum pool size" |
:@vm: "Seconds to wait before timing out the connection"
Equ U2U_COM_OBJECT$ To "OIBFSHelper_10_2.OI4U2U"
* execute status
equ SV_OK$ to 0 ;* Action successful
equ SV_ON_ERROR$ To 1 ;* Action took ON ERROR clause
equ SV_ELSE$ to 2 ;* Action took ELSE clause
equ SV_ERROR$ to 3 ;* Action failed. Error text available
equ SV_LOCKED$ to 4 ;* Action took LOCKED clause
equ SV_PROMPT$ to 5 ;* Server requesting input
/* Uniobject status codes
equ UVS_COMPLETE to 0 //' Execution complete
equ UVS_REPLY to 1 // ' Waiting for a reply
equ UVS_MORE to 2 // ' More data to come
equ UVE_NOERROR to 0 // ' No error
*/