WrkMsgs

From MidrangeWiki
Revision as of 03:09, 4 June 2014 by Houstonking (talk | contribs)
Jump to: navigation, search

The following utility can be used to browse and edit iSeries message files.

/*============================================================================*/ /* Name...: WRKMSGS */ /* Version: n/a */ /* Purpose: Work with Message Descriuptions */ /* Summary: */ /*  : 1) Call CL */ /* Params : */ /*  : i_FILE  : Message File name */ /*  : i_LIB  : Message File lib */ /* Useage : */ /* Compile: */ /* CRTCMD ??CMD(*LIBL/WRKMSGS) */ /*  ??PGM(*LIBL/WRKMSGSC) */ /*  ?*SRCFILE(*LIBL/QCMDSRC) */ /*  ?*SRCMBR(WRKMSGS) */ /*  ??REPLACE(*NO) */ /* Log....: */ /* 06AUG11 JEK- Updated */ /* Notes..: */ /* COURTESY OF CLOVER BUSINESS ASSOCIATES LTD 1997 */ /*============================================================================*/

            CMD        PROMPT('Work with message descriptions')
            PARM       KWD(FILE) TYPE(FILE) MIN(1) PROMPT('MESSAGE +
                         FILE NAME (GEN*,*ALL)')
FILE:       QUAL       TYPE(*GENERIC) LEN(10) SPCVAL((*ALL)) MIN(1)
            QUAL       TYPE(*NAME) DFT(*LIBL) SPCVAL((*LIBL) +
                         (*USRLIBL) (*ALLUSR) (*ALL)) +
                         PROMPT('LIBRARY')