Difference between revisions of "WrkMsgs"

From MidrangeWiki
Jump to: navigation, search
(Created page with "The following utility can be used to browse and edit iSeries message files.")
 
Line 1: Line 1:
 
The following utility can be used to browse and edit iSeries message files.
 
The following utility can be used to browse and edit iSeries message files.
 +
 +
<nowiki>/*============================================================================*/
 +
/* 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                          */
 +
/*===============================================================*/</nowiki>
 +
            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')

Revision as of 03:07, 4 June 2014

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')