compile insert EVERRORS *---------------------------------------------------------------------------- * * * OpenInsight Event Error codes for Set_EventStatus and Get_EventStatus * * December 14, 1993 * * * EventErrors format: * = : @fm : : @fm : ... * = : @vm : : @vm : : @vm : ... * *---------------------------------------------------------------------------- /* Comments ======== EV_RETVAL$ is a bit of a hack. Basically we tend to use some events as though they were methods, and there's nothing we can really do about that now, but the problem with that is there isn't any way to return a value from Send_Event to the calling routine. So... what we've done is defined EV999 as a code you can use to denote that the values following it are just data and are _NOT_ an error. As you're limited to an @vm-delimited array you should really be passing back lots of complex data. Internally @vm's are stored as @tm's on the event stack when pushed there via Set_EventStatus so you should really avoid returning anything containing system delimiters. What we really need is Get/Set_Property and Exec_Method to work against a registered type or instance specific "commuter" module, and then we can really implement custom properties and methods, but that's a story for another day methinks... Amended Date Reason ====== ==== ====== Mr C 01 Dec 23 Added EV_QEHANDLED$ Mr C 01 Feb 21 Added EV_RESETSKERR$ Mr C 14 Sep 16 Added EV_PROPVALERR$ Mr C 29 Dec 14 Added EV_ERRVAL$ Mr C 27 Dec 14 Added EV_DSNTESTRUNERROR$ Mr C 19 Sep 14 Added EV_FDSBUILDERROR$ Mr C 04 Sep 14 Added EV_FDSPARSEERROR$ Added EV_RETVAL$ Mr C 25 Feb 14 Added EV_DSNCREATERROR$ Added EV_TPLCREATERROR$ Added EV_INVALIDDSNPROP$ Mr C 12 Nov 13 Added EV_NULLWINNAME$ Mr C 29 Jul 13 Added EV_NULLPROCNAME$ Mr C 21 Feb 06 Added EV_WINMSGVAL$ for returning a value to PS during WINMSG processing. Note this uses the same field in the event stack as event status error codes so PS will not get a return value if Set_EventStatus is used to return an error. */ /////////////////////////////////////////////////////////////////////////////// /////////////////////////////////////////////////////////////////////////////// #ifndef _EVERRORS_ #define _EVERRORS_ /////////////////////////////////////////////////////////////////////////////// /////////////////////////////////////////////////////////////////////////////// equ EV_CODE$ to 1 equ EV_ARGS$ to 2 equ EV_PREFIX$ to "EV" equ EV_UNKNOWNERR$ to "EV100" ; // Unknown Event Handler error equ EV_REQUIREERR$ to "EV101" ; // Required Error equ EV_VALIDERR$ to "EV102" ; // Validation Error equ EV_FORMREADERR$ to "EV103" ; // Form Read Error equ EV_FORMREADSUBERR$ to "EV104" ; // Form Read Sub Error equ EV_NULLKEYERR$ to "EV105" ; // Null Key Error equ EV_NOLOCKERR$ to "EV106" ; // Locking Error equ EV_USERCANCEL$ to "EV107" ; // User Cancel equ EV_NULLPROCNAME$ to "EV108" ; // Null procedure name equ EV_INVALIDPROCNAME$ to "EV109" ; // %1% is not a valid stored procedure name equ EV_PARAMNOTALLOWED$ to "EV110" ; // The %1% stored procedure does not accept parameters equ EV_NULLWINNAME$ to "EV111" ; // Null window name equ EV_DSNCREATERROR$ to "EV112" ; // DSN (IDE Designer) Create Error [%1%] equ EV_TPLCREATERROR$ to "EV113" ; // TPL (IDE ToolPanel) Create Error [%1%] equ EV_INVALIDDSNPROP$ to "EV114" ; // DSN (IDE Designer) PROPCHANGED validation error equ EV_FDSPARSEERROR$ to "EV115" ; // FDS (IDE FormDes) Parser Error [%1%] equ EV_FDSBUILDERROR$ to "EV116" ; // FDS (IDE FormDes) Builder Error [%1%] equ EV_DSNWRITEERROR$ to "EV117" ; // DSN (IDE Designer) Write error [%1%] equ EV_DSNTESTRUNERROR$ to "EV118" ; // DSN (IDE Designer) Test-Run error [%1%] equ EV_PROPVALERR$ to "EV119" ; // Invalid Property Value [%1%] equ EV_QBFPARSEERR$ to "EV130" ; // QBF Parser Error [%1%] equ EV_QBFINITOFF$ to "EV132" ; // Query By Form is not active equ EV_QBFACTIVATELIST$ to "EV133" ; // QBF saved list activation error [%1%] equ EV_QBFINVALIDINDEX$ to "EV134" ; // "%1%" is not a valid position in the QBF result list equ EV_QBFINVALIDID$ to "EV135" ; // "%1%" is not a valid ID in the QBF result list equ EV_RESETSKERR$ to "EV136" ; // Error resetting sequential key counter [%1%] equ EV_WINMSGVAL$ to "EV200" ; // Return WINMSG value to PS equ EV_QEHANDLED$ to "EV300" ; // Handled in QE (Not an error) equ EV_ERRVAL$ to "EV998" ; // Returned error data to the calling proc (usually contains SSP error details) equ EV_RETVAL$ to "EV999" ; // Return data to the calling proc - NOT an error!!! /////////////////////////////////////////////////////////////////////////////// /////////////////////////////////////////////////////////////////////////////// #endif /////////////////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////////////////