Change S/36 Source Attributes (CHGS36SRCA)
| Where allowed to run: All environments (*ALL) Threadsafe: No |
Parameters Examples Error messages |
The Change System/36 Source Attributes (CHGS36SRCA) command changes the attributes of the specified source member.
| Top |
Parameters
| Keyword | Description | Choices | Notes |
|---|---|---|---|
| MBR | S/36 source member | Name | Required, Key, Positional 1 |
| FILE | Source file | Qualified object name | Optional, Key, Positional 2 |
| Qualifier 1: Source file | Name, QS36SRC | ||
| Qualifier 2: Library | Name, *LIBL, *CURLIB | ||
| SRCTYPE | Source type | *SAME, ARS36, ASM36, BASP36, BAS36, BGC36, BGD36, BGF36, CBL36, DFU36, DSPF36, DTA36, FOR36, MNU36, MSGF36, PHL36, RPG36, RPT36, SRT36, WSU36, UNS36 | Optional |
| REFNBR | Reference number | 0-999999, *SAME, *NEXT | Optional |
| RCDLEN | Logical record length | 40-120, *SAME, *FILE | Optional |
| MAXDEV | Maximum devices | 0-256, *SAME | Optional |
| DFRWRT | Defer write | *SAME, *YES, *NO | Optional |
| Top |
S/36 source member (MBR)
Specifies the name of the source member that is having its attributes changed.
This is a required parameter.
- source-member-name
- Specify the name of the source member.
| Top |
Source file (FILE)
Specifies the name of the physical file containing the source member.
- QS36SRC
- Specifies the name of the default physical file.
- source-file-name
- Specify the name of the physical file.
The possible library values are:
- *LIBL
- The library list is used to locate the file.
- *CURLIB
- The current library for the job is used to locate the file. If no library is specified as the current library for the job, QGPL is used.
- library-name
- Specify the library where the file is located.
| Top |
Source type (SRCTYPE)
Specifies the source type of the source member.
- *SAME
- The SRCTYPE value does not change.
- source-type
- Specify the source type of the source member.
- Value
- Type of Member
- ARS36
- Automatic response member
- ASM36
- Assembler member
- BASP36
- BASIC procedure (source member)
- BAS36
- BASIC member
- BGC36
- Business graphics utility member
- BGD36
- Business graphics utility data member
- BGF36
- Business graphics utility format member
- CBL36
- COBOL member
- DFU36
- Data file utility member
- DSPF36
- Display format member
- DTA36
- Data member
- FOR36
- FORTRAN member
- MNU36
- Menu member
- MSGF36
- Message member
- PHL36
- Telephone list member
- RPG36
- RPG member
- RPT36
- RPG automatic report member
- SRT36
- Sort member
- WSU36
- Work station utility member
- UNS36
- Unspecified
| Top |
Reference number (REFNBR)
Specifies the reference number assigned to the source member.
- *SAME
- The REFNBR value does not change.
- *NEXT
- The current reference number is increased by one.
- reference-number
- Specify the reference number of the procedure member. Valid values range from 0 through 999,999.
| Top |
Logical record length (RCDLEN)
Specifies the logical record length of the statements in the source member.
| Top |
Maximum devices (MAXDEV)
Specifies the maximum number of devices for an SFGR source member.
- *SAME
- The maximum number of devices does not change.
- number-of-devices
- Specify the maximum number of devices for a source member. Valid values range from 0 through 256.
| Top |
Defer write (DFRWRT)
Specifies that the writing of data to the display file is delayed until a read operation is requested. Control is returned to the requesting program immediately after the data is received for output. This may result in improved performance.
- *SAME
- The postpone option does not change. If the DFRWRT source attribute has not been set, *YES is used.
- *YES
- When a write request is made, control is returned after the buffer is processed. The actual display of data may take place later when a read or combined read/write operation is performed. The program buffer is immediately available for the next read or combined read/write operation.
- *NO
- When a write request is made, control is not returned to the requesting program until the input/output request is completed. The data is shown and the input/output feedback information is available.
| Top |
Examples
Example 1: Specifying Maximum Devices and Record Length
CHGS36SRCA MBR(SFGRSRC) FILE(SDALIB/QS36SRC) REFNBR(*NEXT)
RCDLEN(80) MAXDEV(5)
This command changes source member SFGRSRC in file QS36SRC in library SDALIB to allow up to five devices and to have a record length of 80. It also increases the current reference number by one.
Example 2: Turning Off the Defer Write Attribute
CHGS36SRCA MBR(SFGRSRC) FILE(SDALIB/QS36SRC) REFNBR(*NEXT)
RCDLEN(80) MAXDEV(5) DFRWRT(*NO)
This command changes source member SFGRSRC in the file QS36SRC in library SDALIB to allow up to five devices and to have a record length of 80. It also increases the current reference number by one and turns off the defer write attribute.
| Top |
Error messages
*ESCAPE Messages
- CPF2C0A
- Member &3 attributes not changed.
- CPF2C0B
- Changing attributes not allowed for SSP member &3.
- CPF2C08
- File &1 is not a source file.
- CPF9803
- Cannot allocate object &2 in library &3.
- CPF9812
- File &1 in library &2 not found.
- CPF9815
- Member &5 file &2 in library &3 not found.
- CPF9820
- Not authorized to use library &1.
- CPF9822
- Not authorized to file &1 in library &2.
- CPF9826
- Cannot allocate file &2.
| Top |