EDA_GetLastDBError

Funkcia vráti detailný popis DB chyby, v prípade ak pri práci s EDA došlo k DB chybe.

Deklarácia

%EDA_GetLastDBError(
   TEXT in _errorStr,
   INT  out _errorCode
  );

Parametre

	Parameter	Dátový typ	Typ	Popis
1	errorStr	TEXT	IN	Text chyby.
2	errorCode	INT	OUT	Chybový (návratový) kód.

Príklad použitia

 BEGIN
  INT _errorCode, _dbErrorCode
  TEXT _function, _dbErrorMsg
  RECORD NOALIAS (SD.EDA_CalcFunction_Params_V1) _calcParams
  RECORD NOALIAS (SD.EDA_Arr_Obj) _values
 
  ; pokusi sa nacitat data z neexistujucej tabulky
  _function := "VEKTOR _v;" + %Chr(10)
  _function := _function + "_v := %LoadData(""SELECT CURRENT_DATE, Count(*) FROM UNKNOWN_TABLE"");" + %Chr(10)
  _function := _function + "RETURN _v;"
  _calcParams[1]^structVersion := 1
  CALL %EDA_CalcFunctionRec(10, _function, SysTime, SysTime, 0, _calcParams, _values, 1, _errorCode)
  ; ocakavam databazovu chybu
  IF _errorCode != 4 THEN
   RETURN
  ENDIF
 
  CALL %EDA_GetLastDBError(_dbErrorMsg, _dbErrorCode)
  ; ocakavam ORA-00942: table or view does not exist
  IF _dbErrorCode != 942 THEN
    RETURN
  ENDIF
 END

Súvisiace stránky: