 RTVSYSVAL (F4)  SNDPGMMSG

o QDATE o Memberi pesan dibawah

 CVTDAT  QSNDDTAQ, QRCVDTAQ, QMHRDQM, QCLRDTAQ,
o QTIME and QMHQRDQD
 RTVJOBA (F4)  RTVOBJDRETRIEVE OBJECT DESCRIPTION
o JOB NAME  CRTDUPOBJ
o USER NAME  RNMOBJ
o JOB NUMBER 
 MONMSG (CPFXXXXX) o
 CALL
o CALL CALL PROGB PARM(&AREA) PGM
PARM(&AREA) /* PROGB */
o CALLPROC
 CALLPRC PRC(PROC1) PARM(’0’)
 CALLPRC PRC(PROC1) PARM(’1’
&TEXT)
 CALLPRC PRC(PROC1) PARM(’1’
’Goodbye’)
 PROC1: PGM PARM(&P1 &P2)
 DCLF FILE (LIB/FILE)
o RCVF
o SNDRCVF
 DCL VAR(&A) TYPE(*CHAR) LEN(X) VALUE(XXX)
o CHGVAR VAR(&A) VALUE(YYY)
 COMMENT
o /* */
o /**
 SYMBOL
o Arithmetic (+, -, *, /)
o Character (*CAT, ||, *BCAT, |>, *TCAT, |<)
o Relational (*EQ, =, *GT, >, *LT, <, *GE, >=,
*LE, <=, *NE, ¬=, *NG, ¬>, *NL, ¬<)
o *AND, *OR
 %SST(character-variable-name starting-position
length)
o IF (%SST(&NAME 1 2) *EQ ’IN’)
 MONMSG MSGID(message-identifier)
CMPDTA(comparison-data) + EXEC(CL-command)
 RTVCFGSRC
o Retrieve Configuration Source
 RTVNETA
o Retrieve Network Attributes
o CHGNETA
o DSPNETA
Yang tidak dapat dilakukan CL:  Removes a specified message from
a specified message queue
1. Menambah atau meng-update data di database o RTVMSG (Retrieve Message)
2. Menggunakan file printer atau ICF
 Copies a predefined message from
3. Menggunakan Subfile dengan Display file
a message file into CL procedure
4. Menggunakan Deskripsi Display File
variables
o SNDPGMMSG (Send Program Message)
 Sends a program message to a
 PGM Command message queue
o PGM Parm(&A) o SNDRPY (Send Reply)
 Declare Command  Sends a reply message to the
o DCL sender of an inquiry message
o DCLF (NAMA RECORD) o SNDUSRMSG (Send User Message)
 CL Processing Command  Sends an informational or inquiry
o CHGVAR message to a display station or
o SNDPGMMSG system operator
o OVRDBF  Logic Control
o DLTF o IF
o CALL(PROG) o DO
o CALLPRC(PROC) o GOTO
o RETURN  Built-in Function
o CVTDATCONVERT DATE o %SUBSTRING (%SST)
o CRTDTAARA, CHGDTAARA, DLTDTAARA, o %SWITCH
DSPDTAARA o %BINARY (%BIN)
o RTVDTAARA COPY DATA AREA TO
VARIABLE
o ENDRCV
o RCVF READ RECORD
o RTVMBRDDESKRIPTION FROM SPESIFIED
DATABASE MEMBER
o SNDF WRITE RECORD TO DISPLAY FILE
o SNDRCVFWRITE RECORD TO DISPLAY FILE
o WAIT
 Messages
o MONMSG (Monitor Message)
 Monitors for escape, status, and
notify messages sent to a program’s
message queue
o RCVMSG (Receive Message)
 Copies a message from a message
queue into CL variables in a CL
procedure
o RMVMSG (Remove Message)
  QDBFSTCCOL
RTVSYSVAL  QDBRCVYWT
 QDECFMT
 QABNORMSW  QDEVNAMING
 QACGLVL  QDEVRCYACN
 QACTJOB  QDSCJOBITV
 QADLACTJ  QDSPSGNINF
 QADLSPLA  QDYNPTYADJ
 QADLTOTJ  QDYNPTYSCD
 QALWOBJRST  QENDJOBLMT
 QALWUSRDMN  QFRCCVNRST
 QASTLVL  QHOUR
 QATNPGM  QHSTLOGSIZ
 QAUDCTL  QIGC
 QAUDENDACN  QIGCCDEFNT
 QAUDFRCLVL  QIGCFNTSIZ
 QAUDLVL  QINACTMSGQ
 QAUDLVL2  QINACTITV
 QAUTOCFG  QIPLDATTIM
 QAUTORMT  QIPLSTS
 QAUTOSPRPT  QIPLTYPE
 QAUTOVRT  QJOBMSGQFL
 QBASACTLVL  QJOBMSGQMX
 QBASPOOL  QJOBMSGQSZ
 QBOOKPATH  QJOBMSGQTL
 QCCSID  QJOBSPLA
 QCENTURY  QKBDBUF
 QCFGMSGQ  QKBDTYPE
 QCHRID  QLANGID
 QCHRIDCTL  QLEAPADJ
 QCMNARB  QLIBLCKLVL
 QCMNRCYLMT  QLMTDEVSSN
 QCNTRYID  QLMTSECOFR
 QCONSOLE  QLOCALE
 QCRTAUT  QMAXACTLVL
 QCRTOBJAUD  QMAXJOB
 QCTLSBSD  QMAXSGNACN
 QCURSYM  QMAXSIGN
 QDATE  QMAXSPLF
 QDATETIME  QMCHPOOL
 QDATFMT  QMINUTE
 QDATSEP  QMLTTHDACN
 QDAY  QMODEL
 QDAYOFWEEK  QMONTH
 QPASTHRSVR  QSTGLOWLMT
 QPFRADJ  QSTRPRTWTR
 QPRBFTR  QSTRUPPGM
 QPRBHLDITV  QSTSMSG
 QPRCFEAT  QSVRAUTITV
 QPRCMLTTSK  QSYSLIBL
 QPRTDEV  QTHDRSCADJ
 QPRTKEYFMT  QTHDRSCAFN
 QPRTTXT  QTIMADJ
 QPWDEXPITV  QTIME
 QPWDLMTAJC  QTIMSEP
 QPWDLMTCHR  QTIMZON
 QPWDLMTREP  QTOTJOB
 QPWDLVL  QTSEPOOL
 QPWDMAXLEN  QUPSDLYTIM
 QPWDMINLEN  QUPSMSGQ
 QPWDPOSDIF  QUSEADPAUT
 QPWDRQDDGT  QUSRLIBL
 QPWDRQDDIF  QUTCOFFSET
 QPWDVLDPGM  QVFYOBJRST
 QPWRDWNLMT  QYEAR
 QPWRRSTIPL
 QQRYDEGREE
 QQRYTIMLMT
 QRCLSPLSTG
 QRETSVRSEC
 QRMTIPL
 QRMTSIGN
 QRMTSRVATR
 QSAVACCPTH
 QSCANFS
 QSCANFSCTL
 QSCPFCONS
 QSECOND
 QSECURITY
 QSETJOBATR
 QSFWERRLOG
 QSHRMEMCTL
 QSPCENV
 QSPLFACN
 QSRLNBR
 QSRTSEQ
 QSRVDMP
 QSTGLOWACN
 JOB  JOBMSGQFL
 USER  DFTCCSID
 NBR  CYMDDATE
 LOGLVL  DECFMT
 LOGSEV  CHRIDCTL
 LOGTYPE  ASPGRP
 LOGCLPGM  SPLFACN
 INQMSGRPY  DATETIME
 OUTQ  TIMZON
 OUTQLIB  TIMZONABBR
 ACGCDE  TIMZONFULL
 DATE  TIMOFFSET
 SWS  THDRSCAFN
 TYPE  RSCAFNGRP
 RTNCDE
 ENDSTS
 RUNPTY JOB
 TIMESLICE Specifies, if the job name is returned, the name
 PURGE of the CL variable that receives the name of the
 DFTWAIT job. The variable must be a character variable
 USRLIBL with a minimum length of 10 characters. If the
 SBMMSGQ job name has fewer characters than the variable
 SBMMSGQLIB allows, the value is padded on the right with
blanks.
 PRTTXT
USER
 DDMCNV
Specifies, if the user name is returned, the name
 BRKMSG of the CL variable that receives the name of the
 DATFMT user profile associated with the job when the job
 DATSEP was started. The user name is the second part of
 CURLIB the qualified job name. The variable must be a
 PRTDEV character variable with a minimum length of 10
 SYSLIBL characters. If the user name has fewer characters
 CURUSER
than the variable allows, the value is padded on
the right with blanks.
 SUBTYPE
NBR
 PRTKEYFMT Specifies, if the job number is being returned,
 TIMSEP the name of the CL variable that receives the
 TSEPOOL unique 6-character number assigned to the job
 DEVRCYACN by the system. The job number is the first part
 STSMSG of the qualified job name.
 SRTSEQ LOGLVL
 SRTSEQLIB Specifies the name of the CL variable that
receives the 1-character value, ranging from 0
 LANGID
through 4, that is the message logging level used
 CNTRYID to determine the type of messages logged in the
 CCSID job log. The variable must be a character
 JOBMSGQMX variable with a minimum length of 1 character.
LOGSEV length of 10 characters. If the output queue
Specifies the name of the CL variable that name has fewer characters than the variable
receives the 2-digit value, ranging from 00 allows, the value is padded on the right with
through 99, which is the minimum severity level blanks.
a message must have before it is logged in the
job log. The variable must be a 2-digit decimal The special value *DEV can be retrieved. This
variable specified with no decimal positions. value indicates that the output queue with the
LOGTYPE same name as the printer device, which is
Specifies the name of the CL variable that specified on either the printer file or the job
receives the special value that indicates the level description, will be used for the spooled output
of text that appears for any message written to of this job.
the job log. The variable must be a character
variable with a minimum length of 10 OUTQLIB
characters. If the special value has fewer Specifies the name of the CL variable that
characters than the variable allows, the value is receives the name of the library that contains the
padded on the right with blanks. output queue being used by the job for spooled
LOGCLPGM output. The library name is the second part of
Specifies the name of the CL variable that the qualified output queue name
receives the special value that indicates whether (output-queue/library-name). The variable must
processed commands in a CL program are being be a character variable with a minimum length
logged in the job log. Note that this logging flag of 10 characters. If the output queue library
only has meaning for commands processed in name has fewer characters than the variable
CL programs which were created with allows, the value is padded on the right with
LOG(*JOB) specified on the Create CL blanks.
Program (CRTCLPGM) command. Additional ACGCDE
information on the job's CL program logging Specifies the name of the CL variable that
flag is in the LOGCLPGM parameter receives the accounting code for the job. The
description in the Change Job (CHGJOB) variable must be a character variable with a
command. The variable must be a character minimum length of 15 characters. If the
variable with a minimum length of 10 accounting code has fewer characters than the
characters. If the special value has fewer variable allows, the value is padded on the right
characters than the variable allows, the value is with blanks.
padded on the right with blanks. DATE
INQMSGRPY Specifies, if the job date is to be returned, the
Specifies the name of the CL variable that name of the CL variable that receives the date
receives the special value that indicates how assigned to the job by the system when the job
inquiry messages are being handled by the job. was started. The variable must be a character
Additional information on the value returned in variable with a minimum length of 6
the variable is in the INQMSGRPY parameter characters. The job date is returned in the date
description in the Change Job (CHGJOB) format for the job.
command. The variable must be a character SWS
variable with a minimum length of 10 Specifies, if the job switch settings are being
characters. If the special value has fewer returned, the name of the CL variable that
characters than the variable allows, the value is receives the status (on or off) value of the eight
padded on the right with blanks. job switches used by the job. The job switches
OUTQ are retrieved as a single 8-character value with
Specifies the name of the CL variable that each of the characters specifying a 1 (on) or 0
receives the name of the output queue being (off) as the value of the associated switch. The
used by the job for spooled output. The variable CL variable must be a character variable with a
must be a character variable with a minimum minimum length of 8 characters.
TYPE priority for the job in which this command is
Specifies, if the type of job environment is used. This value is the highest run priority
being returned, the name of the CL variable that allowed for any thread within the job.
receives the 1-character value representing the Individual threads within the job may have a
environment of the job. A character value of 0 lower run priority. To retrieve the run priority
indicates the job is running as a batch job, and a for the thread in which one is running, use the
1 indicates an interactive job. The variable must Retrieve Current Attributes (QWTRTVCA)
be a character variable with a minimum length API. For additional information on run priority,
of 1 character. refer to this parameter description in the Change
RTNCDE Job (CHGJOB) command. The variable must be
Specifies (if the completion status of an RPG, a 2-digit decimal variable specified with no
COBOL, DFU, or sort utility program is being decimal positions.
returned) the name of the CL variable that TIMESLICE
receives the 5-digit decimal return code. The Specifies the name of the CL variable that
return code is set by these programs before they receives the 7-digit value, ranging from 8
return to the programs that called them. The through 9999999, that is the maximum number
return code indicates the completion status of of milliseconds that a thread within this job can
the last program (of these types) that has run when it is given processing time. For
completed processing within the job, as follows: additional information on time slice, refer to this
0 parameter description under the Change Job
Normal return (RPG, COBOL, DFU, or sort (CHGJOB) command. The variable must be a 7-
Utility) digit decimal variable specified with no decimal
1 positions.
LR (last record) indicator on (RPG) PURGE
2 Specifies the name of the CL variable that
Error-no halt indicator set (RPG, COBOL, receives the special value that indicates whether
DFU, or sort Utility) the job is marked as eligible to move from main
3 storage at the end of a time slice or a long wait
Halt indicator set on (one of the RPG indicators state. For additional information on job purging,
H1 through H9) refer to this parameter description under the
Change Job (CHGJOB) command. The variable
The CL variable must be a five-position decimal must be a character variable with a minimum
variable with no decimal positions. length of 10 characters. If the special value has
fewer characters than the variable allows, the
ENDSTS value is padded on the right with blanks.
Specifies, if checking for a controlled end DFTWAIT
operation, the name of the CL variable that Specifies the name of the CL variable that
receives the end status. The single-character receives the 7-digit value, ranging from 1
value indicates whether a controlled end that through 9999999 (or -1 if the value is set to
affects the job is currently being performed. A *NOMAX), which is the default for the
value of 1 indicates that the system, the maximum number of seconds that the system
subsystem in which the job is running, or the job waits for a machine instruction to acquire a
itself is being ended; a value of 0 indicates no resource. For additional information on wait-
controlled end is being performed. The CL time, refer to the DFTWAIT parameter
variable must be a character variable with a description under the Change Job (CHGJOB)
minimum length of 1 character. command. The variable must be a 7-digit
RUNPTY decimal variable specified with no decimal
Specifies the name of the CL variable that positions.
receives the 2-digit value, ranging from 1 USRLIBL
through 99, that is the run (or processing)
 Specifies the name of the CL variable that allows, the value is padded on the right with
receives the user portion of the thread's library blanks.
list. The variable must be a character variable BRKMSG
with up to 275 variables. Each library name Specifies the name of a CL variable that
returned is left-justified in an 11-character field receives the special value that indicates the
and padded on the right with blanks. mode for break message handling that is in
SBMMSGQ effect for the job. The variable must be a
Specifies the name of the CL variable that character variable with a minimum length of 7
receives the name of a message queue. If this characters. If the special value has fewer
parameter is coded for a RTVJOBA command characters than the variable allows, the value is
in a CL program which is part of a batch job, the padded on the right with blanks.
value returned is associated with the MSGQ DATFMT
parameter on the JOB or SBMJOB command Specifies the name of a CL variable that
which caused the batch job to start running. If receives the special value being used as the date
*NONE was specified for the MSGQ parameter format for the job. The variable must be a
of the JOB or SBMJOB commands, or the CL character variable with a minimum length of 4
program that contains the RTVJOBA command characters. If the special value has fewer than 4
is not part of a batch job, *NONE is returned to characters, the value is padded on the right with
the CL variable coded for this parameter. The blanks.
variable must be a character variable with a DATSEP
minimum length of 10 characters. If the Specifies the name of a CL variable that
message queue name has fewer characters than receives the character being used as the date
the variable allows, the value is padded on the separator character for the job. The variable
right with blanks. must be a character variable with a minimum
SBMMSGQLIB length of 1 character.
Specifies the name of the CL variable that CURLIB
receives the name of the library that contains the Specifies the name of a CL variable that is used
message queue described above. (See the to retrieve the name of the current library for the
SBMMSGQ parameter description above.) The thread. The variable must be a character variable
library name is the second part of the qualified with a minimum length of 10 characters. If the
message queue name. If *NONE is returned for current library name has fewer characters than
the SBMMSGQ parameter, it is also returned the variable allows, the value is padded on the
for this parameter. The variable must be a right with blanks.
character variable with a minimum length of 10 Note: If the thread does not have a current
characters. If the message queue library name library, a value of *NONE is returned in
has fewer characters than the variable allows, this variable.
the value is padded on the right with blanks. PRTDEV
PRTTXT Specifies the name of the CL variable that
Specifies the name of the CL variable that receives the name of the printer device. The
receives the print text for the job. This must be a variable must be a character variable with a
character variable with a minimum length of 30 minimum length of 10 characters. If the printer
characters. More information on this parameter device name has fewer characters than the
is in PRTTXT parameter. variable allows, the value is padded on the right
DDMCNV with blanks.
Specifies the name of a CL variable that SYSLIBL
receives the special value that indicates the Specifies the name of the CL variable that
action taken for DDM conversations on the job. receives the system portion of the thread's
The variable must be a character variable with a library list. The variable must be a character
minimum length of 5 characters. If the special variable with up to 165 characters. Each library
value has fewer characters than the variable
 name returned is left-justified in an 11-character error is encountered on the *REQUESTER
field and padded on the right with blanks. device for interactive jobs. The variable must be
CURUSER a character variable with a minimum length of
Specifies, if the user name is returned, the 10- 13 characters.
character CL variable that receives the name of STSMSG
the current user profile. If the current user name Specifies the name of the CL variable that
has fewer characters than the variable allows, receives the special value indicating how status
the value is padded on the right with blanks. messages are handled for the job. The variable
SUBTYPE must be a character variable with a minimum
Specifies, if the SUBTYPE of job environment length of 7 characters.
is being returned, the 1-character CL variable SRTSEQ
that receives the name of the job environment. Specifies the name of the CL variable that
The valid character values are: receives the name of the sort sequence table
Character used for the job. The special value
Value *LANGIDUNQ, *LANGIDSHR, or *HEX can
* be returned to the variable. The variable must be
Job has no subtype a character variable with a minimum length of
E 10 characters.
Job is running as an evoked job SRTSEQLIB
T Specifies the name of the CL variable that
Job is running as a Multiple Requester Terminal receives the name of the library containing the
(MRT) job sort sequence table to be used for the job. The
J variable must be a character variable with a
Job is running as a prestart job minimum length of 10 characters. If SRTSEQ is
P *LANGIDUNQ, *LANGIDSHR, or *HEX,
Job is running as a print driver blanks are returned in the variable.
PRTKEYFMT LANGID
Specifies the name of the CL variable that Specifies the name of the CL variable that
receives the print key format for the job. The receives the value indicating the language
variable must have a minimum length of 7 identifier to be used for the job. The variable
characters. The special value *NONE, must be a character variable with a minimum
*PRTBDR, *PRTHDR, or *PRTALL is length of 3 characters.
returned. CNTRYID
TIMSEP Specifies the name of the CL variable that
Specifies the name of a CL variable that receives the value indicating the country
receives the character being used as the time identifier to be used for the job. The variable
separator character for the job. The variable must be a character variable with a minimum
must be a character variable with a minimum length of 2 characters.
length of one character. CCSID
TSEPOOL Specifies the name of a CL variable that
Specifies the name of the CL variable that receives the CCSID value being used for the
receives the special value indicating whether job. The variable must be a 5-digit decimal
interactive jobs are moved to another main variable with no decimal positions.
storage pool when they reach the time slice end. JOBMSGQMX
The variable must be a character variable with a Specifies the name of a CL variable that
minimum length of 10 characters. receives the maximum size of the job message
DEVRCYACN queue. The variable must be a 2-digit decimal
Specifies the name of the CL variable that variable with no decimal position.
receives the special value indicating the JOBMSGQFL
recovery action to take for the job when an I/O
 Specifies the action that should be taken when
the job message queue is full. The variable must
have a minimum length of 10 characters. The
special value *NOWRAP, *WRAP, or
*PRTWRAP is returned.
DFTCCSID
Specifies the name of a CL variable that
receives the DFTCCSID value being used for
the job. The variable must be a 5-digit decimal
variable with no decimal positions.
CYMDDATE
Specifies the name of the CL variable that
receives the date assigned to the job by the
system when the job was started. The variable
must be a character variable with a minimum
length of 7 characters. The job date is returned
in the format CYYMMDD, where C is the
century, YY is the year, MM is the month and
DD is the day.
DECFMT
Specifies the name of a CL variable that
receives the character being used as the decimal
format for the job. The variable must be a
character variable with a minimum length of 1
character.
CHRIDCTL
Specifies the name of a CL variable that
receives the value being used as the character
identifier control for the job. The variable must
be a character variable with a minimum length
of 10 characters.