The Change Source File Length command converts one, generic, or all
source files in a library to a source file length that is larger than
the current length. The typical conversion is 92 to 112. The same
text, owner, and authorities are retained. All existing source
members are copied. Conversion to shorter lengths is valid if no
data will be truncated.
You must have all rights to any file being converted.
A typical command would be:
CHGSRCFLEN SRCFILE(*ALL) LIB(xxx) LENGTH(112)
All source files in the library would be converted to a length of
112. All existing members would be copied to the new file.
If any source file is already at a length of 112, it is not converted
and the command completes normally. If any source file is larger
than 112, the source statements are checked to see if any data would
be truncated. If so, the change is rejected and a listing describes
those statements which would be truncated.
The original text and maximum number of members are retained.
The processing attempts to retain the same owner of the file. If the
user of the command is not the owner of the file, ownership can only
be changed if the user has *USE rights to the new owner profile. If
the user of the command does not have *USE rights to the owners
profile, conversion occurs, but the command completes abnormally with
a message describing the error.
CPYSRCF is used internally which will make the source appear as
changed from both a SAVCHGOBJ perspective and the 'last change date'
normally used to determine if the source matches the program object.
The last changed date associated with each source statement does not
change.
CHGSRCFLEN escape messages you can monitor for
----------------------------------------------
None. Escape messages from based on functions will be re-sent.
Command parameters *CMD
------------------
SRCFILE The name of the source file to be converted. A
specific name, a generic name, or *ALL for all
source files in a library may be entered.
LIB The library containing the source files to be
converted. QTEMP may not be used because it is not
in the system file that is read to determine what
files exist.
LENGTH The length of the new source files. It must be a
value from 92 to 240. The default is 112.
If the existing source file has a length equal to
that specified, no conversion occurs and the command
completes normally.
If the existing source file has a length larger than
than length specified, the source statements are
checked to see if any data would be truncated. If
so, the change is rejected and a listing describes
those statements which would be truncated. If no
source data will be truncated, the change occurs.
Restrictions
------------
You must have all rights to any file being changed.
To change ownership of the new file, you must have 'use' rights to
the owning profile.
The original source files must have been created with CRTSRCPF.
Prerequisites
-------------
The following TAA Tools must be on your system:
CHKGENERC Check generic
CHKOBJ2 Check object 2
CHKOBJ3 Check object 3
CVTLIBDBF Convert library data base file
DUPAUT Duplicate authority
EDTVAR Edit variable
FILEFDBCK File feedback
HLRMVMSG HLL Remove message
PRINT Print
RSNLSTMSG Resend last message
RTVDBFA Retrieve data base file attributes
RTVSYSVAL3 Retrieve system value 3
SNDCOMPMSG Send completion message
SNDESCMSG Send escape message
SNDSTSMSG Send status message
Implementation
--------------
None, the tool is ready to use.
Objects used by the tool
------------------------
Object Type Attribute Src member Src file
------ ---- --------- ---------- ----------
CHGSRCFLEN *CMD TAASREK QATTCMD
TAASREKC *PGM CLP TAASREKC QATTCL
TAASREKR *PGM RPG TAASREKR QATTRPG
|