:pnlgrp.
.************************************************************************
.*  Help for command CRTMIPGM
.************************************************************************
:help name='CRTMIPGM'.
Create MI Program - Help
:p.The Create MI Program (CRTMIPGM) provides an easy
method to invoke the system API QPRCRTPG.
:p.For additional details please refer to the API documentation.
:ehelp.
.*******************************************
.*   Help for parameter PGM
.*******************************************
:help name='CRTMIPGM/PGM'.
Program Name (PGM) - Help
:xh3.Program Name (PGM)
:p.Specifies the program name and the library of the program object to be
created.
:p.This is a required parameter.
:p.:hp2.Program Name:ehp2.
:parml.
:pt.:pv.name:epv.
:pd.
Specify the name of the program object to be created.
:eparml.
:p.:hp2.Library:ehp2.
:parml.
:pt.:pk def.*CURLIB:epk.
:pd.
The program is created in the current library of the job. If no
current library is defined for the job then QGPL will be used.
:pt.:pv.name:epv.
:pd.
Specify the name of library the program will be created in.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter SRCFILE
.*******************************************
:help name='CRTMIPGM/SRCFILE'.
Source file (SRCFILE) - Help
:xh3.Source file (SRCFILE)
:p.Specify the name of the source physical file containing
the source statements to be compiled.
:p.The CRTMIPGM command has been compiled with a source physical
file defined with a record length of 92, 80 characters of actual
source code.
:parml.:pt.:pk def.QMISRC:epk.
:pd.
Source physical file QMISRC will be used
to find the source statements
that will be compiled.
:pt.:pv.name:epv.
:pd.
Specify the name of the source physical file that contains
the source statements to be compliled.
:eparml.
:parml.
:pt.:pk def.*LIBL:epk.
:pd.
The library list of the job will be searched for the named
source physical file.
:pt.:pv.name:epv.
:pd.
Specify the name of the library containing the source physical file.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter SRCMBR
.*******************************************
:help name='CRTMIPGM/SRCMBR'.
Source member (SRCMBR) - Help
:xh3.Source member (SRCMBR)
:p.The name of the member containing the source statements
to be compiled.
:parml.
:pt.:pk def.*PGM:epk.
:pd.
The named of the program being created will be used as the member
name.
:pt.:pv.name:epv.
:pd.
Specify the name of source member that contains the statements
to be compiled.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter TEXT
.*******************************************
:help name='CRTMIPGM/TEXT'.
Text 'description' (TEXT) - Help
:xh3.Text 'description' (TEXT)
:p.A brief description of the program.
:parml.
:pt.:pk def.*SRCMBRTXT:epk.
:pd.
The text description of the source member used to create the program
is used as the object description.
:pt.:pv.character-value:epv.
:pd.
Enter a brief description of the created program object.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter SRCOPT
.*******************************************
:help name='CRTMIPGM/SRCOPT'.
Source option (SRCOPT) - Help
:xh3.Source option (SRCOPT)
:parml.
:pt.:pk def.*USRSPC:epk.
:pd.
Source data from the specified source member will be copied
into a *USRSPC in QTEMP before being compiled.
:pt.:pk.*VAR:epk.
:pd.
Source data from the specified source member will be copied
into a CL variable before being compiled.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter SRCCMP
.*******************************************
:help name='CRTMIPGM/SRCCMP'.
Source compression (SRCCMP) - Help
:xh3.Source compression (SRCCMP)
:p.Specifies whether or not the source data will be compressed
before being stored when SRCOPT(*VAR) is specified. The limit of
a maximimum of 5,000 characters for a CL variable limits the
size of a SRCPOT(*VAR) so using compression decreases the amount
of storage used. Compression is the
phrase used.
Actually this is little more than white space reduction.
:parml.
:pt.:pk.*YES:epk.
:pd.
Extrenuous white space will be removed.
:pt.:pk def.*NO:epk.
:pd.
No modification to the source data will be made.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter REPLACE
.*******************************************
:help name='CRTMIPGM/REPLACE'.
Replace program (REPLACE) - Help
:xh3.Replace program (REPLACE)
:p.Specifies if a new program object will be created when there is an
existing program object of the same name in the same library.
:parml.
:pt.:pk def.*YES:epk.
:pd.
A new program object will be created and any existing program object
of the same name in the specified library will be moved to library
QRPLOBJ.
:pt.:pk.*NO:epk.
:pd.
A new program object will not be created if a program object of the
same name already exists in the specified library.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter USRPRF
.*******************************************
:help name='CRTMIPGM/USRPRF'.
User profile (USRPRF) - Help
:xh3.User profile (USRPRF)
:p.Specifies the user profile under which the compiled program
runs.
:parml.
:pt.:pk def.*USER:epk.
:pd.
The user profile of the user running the program is used as a source
of authority when this program runs.
:pt.:pk.*ADOPT:epk.
:pd.
When the program runs, the object authority
of both the program's owner and user are used.
:pt.:pk.*OWNER:epk.
:pd.
The system uses the user profile of the owner of the program
as a source of authority when this program
runs. Programs called by this program adopt this authority.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter ADPAUT
.*******************************************
:help name='CRTMIPGM/ADPAUT'.
Use adopted authority (ADPAUT) - Help
:xh3.Use adopted authority (ADPAUT)
:p.Whether the system uses the program-adopted authority
from the calling programs as a source of authority when
this program is running. The user must be authorized to
create programs with adopted authority for the *ADPAUT
:parml.
:pt.:pk.*YES:epk.
:pd.
The system uses program-adopted authority from the calling program.
:pt.:pk def.*NO:epk.
:pd.
The system does not use program-adopted authority
 from the calling program.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter AUT
.*******************************************
:help name='CRTMIPGM/AUT'.
Authority (AUT) - Help
:xh3.Authority (AUT)
:p.Specifies the authority you are giving to users who do not
have specific authority for the object, who are not on an
authorization list, and whose group profile or
supplemental group profiles do not have specific authority
for the object.
:parml.
:pt.:pk def.*LIBCRTAUT:epk.
:pd.
The system determines the authority for the object by
using the value specified for the Create authority
 (CRTAUT) parameter on the Create Library command
 (CRTLIB) for the library containing the object to be
 created.  If the value specified for the CRTAUT
 parameter is changed, the new value will not affect
 any existing objects.
:pt.:pk.*CHANGE:epk.
:pd.
All operations are permitted except those dealing with the object's
existence and its management.
:pt.:pk.*ALL:epk.
:pd.
Complete authority for the program except for transfer of object ownership.
:pt.:pk.*USE:epk.
:pd.
Authority to read or run the compiled program, but not debug or change it.
:p.
:NT.A user must have *USE authority to a program to
obtain a formatted dump of the variables of the program.
To dump variables, the program must also have observable information.
:p.
If you do not want some users to be able to dump the variables,
then give them only *OBJOPR plus *EXECUTE
authority to the program. This will allow them to call the program
but not dump its variables.
:p.
If you do not want any users to be able to dump the variables,
then use Change Program (CHGPGM) to remove the
program's observable information.
:ENT.
:pt.:pk.*EXCLUDE:epk.
:pd.
No authority.
:pt.:pv.authorization-list name:epv.
:pd.
The name of the authorization list which secures the object.
The public authority will be *AUTL
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter LIST
.*******************************************
:help name='CRTMIPGM/LIST'.
Generate listing (LIST) - Help
:xh3.Generate listing (LIST)
:p.Generates an output listing.
:parml.
:pt.:pk def.*YES:epk.
:pd.
Generates a listing.
:pt.:pk.*NO:epk.
:pd.
Does not generate a listing.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter GEN
.*******************************************
:help name='CRTMIPGM/GEN'.
Generate program object (GEN) - Help
:xh3.Generate program object (GEN)
:p.Specifies whether or not to create a program object.
:parml.
:pt.:pk def.*YES:epk.
:pd.
Generates a program and places the program in the appropriate library.
:pt.:pk.*NO:epk.
:pd.
No program is generated. The syntax of the intermediate
representation of the program is checked, and if
the generate listing option is *LIST, a listing is produced.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter XREF
.*******************************************
:help name='CRTMIPGM/XREF'.
Create cross-reference listing (XREF) - Help
:xh3.Create cross-reference listing (XREF)
:p.Whether the listing is to contain a cross-reference
list of variable and data item references.
:parml.
:pt.:pk.*YES:epk.
:pd.
Creates a cross-reference listing of references to variables, labels, or both.
:pt.:pk def.*NO:epk.
:pd.
Does not create a cross-reference listing.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter ATR
.*******************************************
:help name='CRTMIPGM/ATR'.
Create summary listing (ATR) - Help
:xh3.Create summary listing (ATR)
:p.Whether the listing is to contain a list of program attributes.
:parml.
:pt.:pk.*YES:epk.
:pd.
Creates a summary listing section.
:pt.:pk def.*NO:epk.
:pd.
Does not create a summary listing section.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter SUBSCR
.*******************************************
:help name='CRTMIPGM/SUBSCR'.
Constrain arrays (SUBSCR) - Help
:xh3.Constrain arrays (SUBSCR)
:p.Specifies whether additional runtime checks are performed or, if not, what
the expected behaviour that should be expected.
:parml.
:pt.:pk def.*YES:epk.
:pd.
Constrains arrays. This requests additional run-time checks to ensure
that references to array
elements are not outside the bounds of the declare statement.
This option causes the resulting program to run slower.
:p.This is the same as specifying *SUBSCR in the options parameter
of the QPRCRTPG API.
:pt.:pk.*NO:epk.
:pd.
Does not constrain arrays. The results of references to array elements
outside the bounds of the declare statement are not defined.
:p.This is the same as specifying *NOSUBSCR in the options parameter
of the QPRCRTPG API.
:pt.:pk.*FULL:epk.
:pd.
Allows fully unconstrained arrays. This ensures that references
to array elements outside the bounds of the declare statement
act as if the array element actually exists.
:p.This is the same as specifying *UNCON in the options parameter
of the QPRCRTPG API.
:eparml.
:p.
:NT.This program attribute may be changed at run-time using the
Override Program Attributes (OVRPGATR) MI instruction.
:ENT.
:ehelp.
.*******************************************
.*   Help for parameter SUBSTR
.*******************************************
:help name='CRTMIPGM/SUBSTR'.
Constrain strings (SUBSTR) - Help
:xh3.Constrain strings (SUBSTR)
:parml.
:pt.:pk def.*YES:epk.
:pd.
Constrains strings. This requests additional run-time checks
to ensure that references to character
strings are not outside the bounds of the declare statement.
This option causes the resulting program
to run slower.
:pt.:pk.*NO:epk.
:pd.
Does not constrain strings.
The results of substring references outside the bounds of the declare
statement are not defined.
:NT.This program attribute may be changed at run-time using the
Override Program Attributes (OVRPGATR) MI instruction.
:ENT.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter CLRPSSA
.*******************************************
:help name='CRTMIPGM/CLRPSSA'.
Initialise static storage (CLRPSSA) - Help
:xh3.Initialise static storage (CLRPSSA)
:p.Static storage is allocated the first time a program is called.
It remains allocated until explicitly deallocated.
:parml.
:pt.:pk def.*YES:epk.
:pd.
Initializes static storage. This code clears the program static storage area
(PSSA) on entry using the Call External (CALLX) MI instruction.
:pt.:pk.*NO:epk.
:pd.
Does not initialize the PSSA.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter CLRPASA
.*******************************************
:help name='CRTMIPGM/CLRPASA'.
Initialise automatic storage (CLRPASA) - Help
:xh3.Initialise automatic storage (CLRPASA)
:p.Automatic storage is allocated each time a program runs and automatically
deallocated when no longer needed.
:parml.
:pt.:pk def.*YES:epk.
:pd.
Initializes automatic storage. This code clears the program automatic storage
area (PASA) on entry using the Call External (CALLX) MI instruction.
:pt.:pk.*NO:epk.
:pd.
Does not initialize the PASA.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter IGNDEC
.*******************************************
:help name='CRTMIPGM/IGNDEC'.
Ignore decimal data errors (IGNDEC) - Help
:xh3.Ignore decimal data errors (IGNDEC)
:p.Whether errors found in decimal data result in exceptions.
:parml.
:pt.:pk.*YES:epk.
:pd.
Ignores data decimal errors. Decimal values used in numeric operations
ensure they contain valid decimal digit and sign codes.
However, the system treats digits that are not valid as zeros and signs
that are not valid as positive signs. There is no exception signaled.
:NT.In all cases, the system signals decimal data errors if you use data
pointers to address any of the instruction's operands.
:ENT.
:pt.:pk def.*NO:epk.
:pd.
Does not ignore decimal data errors. Decimal values used in
numeric operations are checked for valid
decimal digits and sign codes.
If the system finds an error, it signals an exception.

:eparml.
:p.
The following list contains the MI instructions this option affects:
ADDN, CMPNV, CVTCN, CVTDFFP, CVTNC, CPYNV, DIV, DIVREM,
EDIT, EXTRMAG, MULT, NEG, REM, SCALE, SUBN.
:NT.
When you specify *IGNDEC, the system may still signal the decimal data
exception. That is, other MI instructions and instruction combinations
not listed above may signal the decimal data exception when the system
finds decimal data that is bad.
:ENT.


:ehelp.
.*******************************************
.*   Help for parameter IGNBIN
.*******************************************
:help name='CRTMIPGM/IGNBIN'.
Ignore binary data size errors (IGNBIN) - Help
:xh3.Ignore binary data size errors (IGNBIN)
:p.Specifies how the system handles data size errors in binary data.
:parml.
:pt.:pk.*YES:epk.
:pd.
The system ignores binary data size errors. This is used when an
overflow or underflow occurs on a computation and when a control MI
instruction has a receiver that is a binary field. The receiver contains
the left-truncated result.
:pt.:pk def.*NO:epk.
:pd.
The system handles binary data size errors normally. When a binary size error
occurs, an exception issignaled and the receiver contains the left-truncated
result.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter OVERLAP
.*******************************************
:help name='CRTMIPGM/OVERLAP'.
Coincident instruction support (OVERLAP) - Help
:xh3.Coincident instruction support (OVERLAP)
:p.The system overlaps coincident operands between the source and receiver
operands in one or more program instructions. Coincident operands are operands
that overlap physically, in storage.
:parml.
:pt.:pk def.*YES:epk.
:pd.
Supports coincident operands. If you specify *OVERLAP, the operands on an
MI instruction mayoverlap. Therefore, the system cannot use the receiver on
an instruction as a work area during operations that produce the final result.
This can require more processor resource for running theinstruction but it
ensures valid results if an overlap occurs.
:pt.:pk.*NO:epk.
:pd.
Does not support coincident operands. You guarantee that coincident
operand overlap will not occur while running the instruction.
Therefore, the system can use the receiver on an instruction as a work area
during operations performed to produce the final result.
Using the receiver as a work area does not use as much processor
resource as would be required to
move the final result from an internal work area to the receiver.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter DUP
.*******************************************
:help name='CRTMIPGM/DUP'.
Allow duplicate declares (DUP) - Help
:xh3.Allow duplicate declares (DUP)
:p.Whether or not duplicate declare statements (DCL) are flagged as errors
or not.
:parml.
:pt.:pk.*YES:epk.
:pd.
This allows a program object to be declared more than once.
This requests that program objects declared more than once be pooled
and not be diagnosed as errors.
:pt.:pk def.*NO:epk.
:pd.
This does not allow a program object to be declared more than once.
This requests that duplicate declare (DCL) statements be diagnosed as errors.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter OPT
.*******************************************
:help name='CRTMIPGM/OPT'.
Optimise (OPT) - Help
:xh3.Optimise (OPT)
:p.If the created program object is optimised or not.
:parml.
:pt.:pk.*YES:epk.
:pd.
This optimizes the program. In most instances, this produces the smallest
and best running program. Occasionally, the source program may signal a MCH2802
escape message during processing. If this occurs, you should not optimize
the program.
:pt.:pk def.*NO:epk.
:pd.
This does not optimize the program. This requests the normal level code
optimization when you create the program.
:eparml.
:ehelp.
.*******************************************
.*   Help for parameter TGTRLS
.*******************************************
:help name='CRTMIPGM/TGTRLS'.
Target release (TGTRLS) - Help
:xh3.Target release (TGTRLS)
:p.The release of the operating system on which you intend to use the object
being created. You can use the object on a system with the specified release
or with any subsequent release of the operating system installed.
:parml.
:pt.:pk def.*CURRENT:epk.
:pd.
The object is to be used on the release of the operating system currently
running on your system.
:pt.:pk.*PRV:epk.
:pd.
The object is to be used on the previous release with modification
level 0 of the operating system.
:pt.:pk.V5R4M0:epk.
:pd.
:pt.:pk.V6R1M0:epk.
:pd.
:pt.:pk.V7R1M0:epk.
:pd.
:eparml.
:ehelp.
:epnlgrp.