/*  CUSTSERVCL:  Sets the Library List for the CUSTSERV    */
/*               web service (universal display)           */

PGM

    CHGJOB LOG(4 00 *NOLIST)

    /* Change the following to point to the proper library +
       names for your installation */

    ADDLIBLE LIB(PROFOUNDUI) POSITION(*LAST)
    MONMSG CPF2103

    ADDLIBLE LIB(YOUR-LIBRARY-HERE) POSITION(*LAST)
    MONMSG CPF2103


    CALL PGM(CUSTSERVR)
    MONMSG CPF0000 EXEC(DO)
       DSPJOBLOG JOB(*) OUTPUT(*PRINT)
    ENDDO

ENDPGM