6. QUEL and EQUEL Statements : Inquire_ingres Statement—Get Diagnostic Information : Example
 
Share this page                  
Example
This example shows the use of inquire_ingres to retrieve error message text:
## range of e is employee
loop until (i  > 10)

##  repeat replace e (sal = e.sal*1.1) 
##   where e.empname = goodemps(i))

##  inquire_ingres (err_no = errorno)

if err_no  > 0
##    inquire_ingres (errmsg = errortext)
      print "ingres error: ", err_no
      print errmsg
end if

  i = i + 1
end loop