Forum Post: Help With Subroutine, Can't Find Fault On Calling It.

  • Thread starter Thread starter OctavioOlguin
  • Start date Start date
Status
Not open for further replies.
O

OctavioOlguin

Guest
greetings you all!!! I have this issue, getting me nuts. I have a routine that makes the following call. ON DEFAULT-ACTION OF BROWSE-12 IN FRAME DEFAULT-FRAME /* Paqs. Rechazados */ DO: IF AVAILABLE brCasoPaquete THEN DO: FILE-INFO:FILE-NAME = "procs\suc\sSuc03002.r". IF FILE-INFO:FULL-PATHNAME = ? THEN DO: MESSAGE "No se encontró: sSuc03002.r" VIEW-AS ALERT-BOX ERROR. END. RUN procs\suc\sSuc03002.w (brCasoPaquete.Control#, brCasoPaquete.Nivel, brCasoPaquete.ProdNombre, brCasoPaquete.Sucursal, pUsuario, brCasoPaquete.PesoEtiqueta, brCasoPaquete.PesoLlegada, brCasoPaquete.StatusEtiqueta) . END. CATCH myApp AS Progress.Lang.AppError : MESSAGE "Error (Lang.AppError): " myApp:GETmessage(1) VIEW-AS ALERT-BOX. END CATCH. CATCH mySys AS Progress.Lang.SysError : MESSAGE "Error (Lang.SysError): " mySys:GETmessage(1) VIEW-AS ALERT-BOX. END CATCH. END. The problems is I can debug it step by step, but on test runtime it simply crashes with no error message at all, checked dababases dependencies: ok, file exist: ok, sending lots of messages box at runtime: done, just the call gets error, I did try with no-error on the run, checked for thrown events, to no avail. How could I see the error? i'm desperado Thanks.

Continue reading...
 
Status
Not open for further replies.
Back
Top