En ocasiones al utilizar los mandatos, utilizamos los valores
que no son los que IBM ofrece por omisión.
Esto no es un problema, pero nos obliga a recordar siempre cual es el valor que debemos de
modificar.
El AS400 nos ayuda ofreciendonos el mandato CHGCMDDFT (Cambiar valor por omisión de
mandato).
Voy a utilizar un ejemplo que ilustrará perfectamente como funciona este mandato.
Suponiendo que cada vez que debemos crear un fichero queramos que el mismo reutilice los
registros suprimidos y que por lo tanto ejecutamos el mandato: CRTPF
FILE(QGPL/MIFICHERO) SRCFILE(PRODUCCION/QDDSSRC) REUSEDLT(*YES)
Donde REUSEDLT tiene como valor por omisión *NO
Para modificar el valor por omisión de REUSEDLT
utilizaremos el mandato CHGCMDDFT de la siguiente
forma:
CHGCMDDFT CMD(CRTPF) NEWDFT('REUSEDLT(*yes)')
donde CMD es el mandato cuyo parámetro deseamos
modificar y NEWDFT el parámetro y su nuevo valor.
Desde este momento, el valor por omisión del parámetro
REUSEDLT del mandato CRTPF siempre será *YES y
el mandato anterior podriamos ejecutarlo:
CRTPF FILE(QGPL/MIFICHERO) SRCFILE(PRODUCCION/QDDSSRC)
Suponiendo que el parámetro por omisión a modificar
este compuesto por varios valores, como el parámetro
SIZE del comando CPYF (Número inicial de registros,
número incremento registros y máximo de incrementos),
el cambio de los valores por omisión se haria
de la manera siguiente:
CHGCMDDFT CRTPF ('SIZE(*NOMAX *N *N)')
|
