RE: C runtime Exception Errors

Here is an excerpt from my service program.  The value imported below will
contain the 7 character message id when an error occurs.  Feel free to
e-mail me if you have any other questions.

d error           s              7    import('_EXCP_MSGID')    

p syscall         b                   export                 
d syscall         pi             7                           
d   cmd                           *   value options(*string) 
                                                             
d system          pr            10i 0 extproc('system')      
d   cmd                           *   value options(*string) 
                                                             
c                   if        system(cmd) <> 0               
c                   return    error                          
c                   else                                     
c                   return    *blanks                        
c                   endif                                    
                                                             
p syscall         e                                          
                                                             


> -----Original Message-----
> From: eric.delong@pmsi-services.com [SMTP:eric.delong@pmsi-services.com]
> Sent: Monday, January 31, 2000 10:20 AM
> To:   midrange-l@midrange.com
> Subject:      C runtime Exception Errors
> 
> 
>      Ok, school me......
>      
>      I'm using the "SYSTEM" function to pass commands from my RPGIV 
>      program. I need to be able to identify any exception messages that 
>      result from my commands, but I can't seem to figure out how to
> capture 
>      these. 
>      
>      I thought _GetExcData might be what I was looking for, but I can't 
>      figure out how to use it in RPG. I'm not really even sure if I can
> use 
>      it in RPG. I'm falling behind on this project because I'm trying to 
>      get a handle on this stuff. Any and all references to TFM will be 
>      gladly accepted! Thanks all.
>      
>      eric.delong@pmsi-services.com
> 
> 
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to
> MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
> david@midrange.com
> +---
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---