How to access IBM's utility program DSNTIAR from my COBOL program in XDB project

Problem:

program is calling DSNTIAR to translate SQL error code.

receiving a 173 on module 'DSNTIAR', when running program

Resolution:

1. make sure that the module that is calling DSNTIAR has embedded sql in it

2.  the call should be as follows:

              CALL 'DSNTIAR' USING SQLCA,

                                  ERROR-MESSAGE,

                                  ERROR-TEXT-LEN

where the the message area is declared similar to the following:

     01 ERROR-MESSAGE.

        05 ERROR-LEN          PIC S9(4) COMP VALUE 1200.

        05 ERROR-TEXT         PIC X(120) OCCURS 10 TIMES.

      01 ERROR-TEXT-LEN        PIC S9(9) COMP VALUE 120.