*COMDECK PBNIL
       NAM  PBNIL 
       SPC  2 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*                    PBNIL                                            * 
*                                                                     * 
*           DO NOTHING PROGRAM - SATISFIES EXTERNAL REFERENCES        * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
       SPC  2 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
**OVERVIEW -  THIS PROGRAM EXISTS TO RESOLVE UNSATISFIED EXTERNALS    * 
*             THAT OCCUR IN *MPLINK*. INSTEAD OF *IF DEF(ING) PASCAL  * 
*             OBJECT CODE -- THIS APPROACH WAS DEEMED MORE ACCEPTABLE * 
*             FROM A MAINTENANCE VIEW-POINT.                          * 
*                                                                     * 
**INPUT -     NOTHING                                                 * 
*                                                                     * 
**OUTPUT -    NOTHING                                                 * 
*                                                                     * 
**TYPICAL USE -                                                       * 
*             IF *PERFORM* IS NOT DEFINED AT VARIANT BUILD TIME,      * 
*             *MPLINK* GIVES UNSATISFIED EXTERNAL REFERENCE ERRORS    * 
*             FOR *PNSGATH*. THIS PROBLEM CAN NOW BE SOLVED BY        * 
*             EQUATING *PNSGATH* TO *PBNIL3* I.E. *SYN,PNSGATH,PBNIL3.* 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
       SPC  2 
       ENT  PBNIL0        - CALL WITH NO PARAMETERS PASSED
       ENT  PBNIL1        - CALL WITH ONE PARAMETER PASSED
       ENT  PBNIL2        - CALL WITH TWO PARAMETERS PASSED 
       ENT  PBNIL3        - CALL WITH THREE PARAMETERS PASSED 
       ENT  PBNIL4        - CALL WITH FOUR PARAMETERS PASSED
       SPC  3 
PBNIL0 0    0             - ENTRY *PBNIL0*
       JMP* (PBNIL0)      - EXIT
       SPC  2 
PBNIL1 0    0             - ENTRY *PBNIL1*
       RAO* PBNIL1        - BUMP RETURN ADDRESS 
       JMP* (PBNIL1)      - EXIT
       SPC  2 
PBNIL2 0    0             - ENTRY *PBNIL2*
       RAO* PBNIL2        - BUMP RETURN ADDRESS BY TWO
       RAO* PBNIL2
       JMP* (PBNIL2)      - EXIT
       SPC  2 
PBNIL3 0    0             - ENTRY *PBNIL3*
       RAO* PBNIL3        - BUMP RETURN ADDRESSS BY THREE 
       RAO* PBNIL3
       RAO* PBNIL3
       JMP* (PBNIL3)      - EXIT
       SPC  2 
PBNIL4 0    0             - ENTRY *PBNIL4*
       RAO* PBNIL4        - BUMP RETURN ADDRESS BY FOUR 
       RAO* PBNIL4
       RAO* PBNIL4
       RAO* PBNIL4
       JMP* (PBNIL4)      - EXIT
       SPC  3 
       END  PBNIL 
