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 */