Difference between revisions of "WrkMsgs"
Houstonking (talk | contribs) (Created page with "The following utility can be used to browse and edit iSeries message files.") |
Houstonking (talk | contribs) |
||
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')