bdfp1m28 | Programming Concepts and Reference |
Use this macro to free an entry control block (ECB) data level.
Format
- LEVEL=ecblvl
- frees a specific ECB data level, where ecblvl is a hexadecimal
number in the range X'0'-X'F'. Optionally, you
can precede this hexadecimal number with a D to indicate that you are naming a
data level.
Entry Requirements
None.
Normal Return
The specified data level is freed.
Error Return
See Identifying Return Indicators and Errors for information about how to check the error
indicators.
Programming Considerations
- The contents of register 14 (R14) and R15 cannot be predicted across
a TPFDF macro call.
- The contents of R3, which contains the storage address of the SW00SR
slot, are used by TPFDF macro calls. Do not change the value of R3
between macro calls unless you save the value after each macro call and
restore the value before each macro call.
- If you are processing traditional files with TPFDF files by using the
DBOPN macro with the DATA or PARAM parameter specified, you can ensure that a
required ECB data level is free by specifying the DBFRL macro before calling a
program or function that uses a specific data level. However, the DATA
or PARAM parameters are used for migration purposes only.
Examples
Each of the following examples free data level C (also called data level
DC) in an ECB. Freeing the data level ensures that the data level is
available for use by a traditional TPF or ALCS program and that no TPFDF
program can use this level in the ECB.
DBFRL LEVEL=C
DBFRL LEVEL=DC
Related Macros
None.