The Update PFILE in DDS source command causes the PFILE statement in
a LF source member to be changed. This can simplify batch create
steps involving logical files where different libraries are used. A
qualified name is supported.
Assume you have a batch create process that creates the physical file
FILEA and the logical file FILEAL in a specific library. If you
already have a FILEA physical file on the library list, it is likely
that the new FILEA will be built over the wrong file.
By changing the LF source PFILE keyword before using CRTLF, you can
cause the logical to be built over the proper physical.
A typical command would be:
UPDPFILE SRCFILE(QDDSSRC) MBR(xxx)
PFILE(LIBX/FILEA)
The member must be a LF or LF38 source type. The letters PFILE are
searched in the source beginning at position 45 of the statement (the
P must be in position 45). Only the first PFILE keyword is
considered. The command ensures that no other keywords (or comments)
appear in the same keyword area of the PFILE statement.
The source statement is changed to match what was entered on the
command.
The following are examples of valid existing PFILE statements that
can be changed:
A R xxx PFILE(ABC)
A R xxx PFILE(LIB1/ABC)
A R xxx PFILE(*LIBL/ABC)
The following are invalid conditions:
A R xxx PFILE(ABC)
A R xxx PFILE(ABC) TEXT('..')
If *LIBL is used as the PFILE library qualifier, a simple name such
as PFILE(ABC) is used.
Command parameters *CMD
------------------
SRCFILE The qualified name of the source file. The library
value defaults to *LIBL. *CURLIB may also be used.
MBR The member to be changed. It must be a LF or LF38
source type.
PFILE The qualified name of the PFILE to be used. *LIBL
is the default for the library qualifier. If *LIBL
is used, a non-qualified name is used for the PFILE.
The PFILE keyword must begin in position 45 of the
source. There can be no other keywords or comments
on the same statement. Only the first PFILE keyword
is changed.
Restrictions
------------
Valid DDS LF source must exist.
See previous comments.
Prerequisites
-------------
The following TAA Tools must be on your system:
CHKOBJ3 Check object 3
EDTVAR Edit variable
HLRMVMSG HLL Remove message
SNDCOMPMSG Send completion message
SNDESCMSG Send escape message
Implementation
--------------
None, the tool is ready to use.
Objects used by the tool
------------------------
Object Type Attribute Src member Src file
------ ---- --------- ---------- ----------
UPDPFILE *CMD TAASRDS QATTCMD
TAASRDSC *PGM CLP TAASRDSC QATTCL
TAASRDSR *PGM RPG TAASRDSR QATTRPG
|
