/*=================================================================================== */
      /* MIT License                                                                        */
      /* Copyright (c) 2016 TEMBO Technology Labs (Pty) Ltd.                                */
      /* Author: Tommy Atkins - Chief Development Officer                                   */
      /*                                                                                    */
      /* Permission is hereby granted, free of charge, to any person obtaining a copy of    */
      /* this software and associated documentation files (the "Software"), to deal in the  */
      /* Software without restriction, including without limitation the rights to use, copy,*/
      /* modify, merge, publish, distribute, sublicense, and/or sell copies of the Software,*/
      /* and to permit persons to whom the Software is furnished to do so, subject to the   */
      /* following conditions:                                                              */
      /*                                                                                    */
      /* The above copyright notice and this permission notice shall be included in all     */
      /* copies or substantial portions of the Software.                                    */
      /* ================================================================================== */
      /* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED,*/
      /* INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A      */
      /* PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT */
      /* HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION  */
      /* OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE     */
      /* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.                             */
      /*=================================================================================== */
             STRPGMEXP  PGMLVL(*CURRENT) SIGNATURE('V1.0')
             EXPORT     SYMBOL(ERR00)          /* Clear Current Message Queue               */
             EXPORT     SYMBOL(ERR01)          /* Move *DIAG Messages                       */
             EXPORT     SYMBOL(ERR02)          /* Re-Send *ESCAPE Message                   */
             EXPORT     SYMBOL(ERR03)          /* Move *DIAG and Re-Send *ESCAPE Messages   */
             EXPORT     SYMBOL(ERR04)          /* Retrieve *LAST Message Id                 */
             EXPORT     SYMBOL(ERR05)          /* Move *DIAG and *ESCAPE Messages           */
             EXPORT     SYMBOL(ERR06)          /* Move *ESCAPE Messages Only                */
             EXPORT     SYMBOL(ERR10)          /* Send *DIAG Message                        */
             EXPORT     SYMBOL(ERR11)          /* Send *ESCAPE Message                      */
             EXPORT     SYMBOL(ERR12)          /* Send *INFO Message to *EXT                */
             EXPORT     SYMBOL(ERR13)          /* Send *STATUS Message to *EXT              */
             EXPORT     SYMBOL(ERR20)          /* Retrieve Message Text RETURN=132          */
             EXPORT     SYMBOL(ERR21)          /* Retrieve Message Help RETURN=3000         */
             EXPORT     SYMBOL(ERR50)          /* Convert SQLSTATE to Error Message         */
             EXPORT     SYMBOL(CallStkEnt)     /* Retrieve Target CSE for Error Handlers    */
             ENDPGMEXP