IAH Agregar parámetros propios al archivo DBN.def

De ABCDWIKI Español
Saltar a: navegación, buscar

1. Definir el parámetro al final del DBN.def, por ejemplo:

UNICODE=Y

2. Editar el iah.xis y bajo <function name="LoadBaseDef"> modificar el bloque

   <field action="replace" tag="5018">
        <pft>(
                if left(v1,instr(v1,'=')-1) : 'FEATURES'  then '^f',mid(v1,instr(v1,'=')+1,size(v1)) fi,
                if left(v1,instr(v1,'=')-1) : 'SEND RESULT BY EMAIL' then '^e',mid(v1,instr(v1,'=')+1,size(v1)) fi,
                if left(v1,instr(v1,'=')-1) : 'KEYRANGE SUFFIX' then '^k',mid(v1,instr(v1,'=')+1,size(v1)) fi,
                if left(v1,instr(v1,'=')-1) : 'SEARCH ACTAB' then '^a',mid(v1,instr(v1,'=')+1,size(v1)) fi,
                if left(v1,instr(v1,'=')-1) : 'SEARCH UCTAB' then '^u',mid(v1,instr(v1,'=')+1,size(v1)) fi,
                if left(v1,instr(v1,'=')-1) : 'UNICODE' then '^z',mid(v1,instr(v1,'=')+1,size(v1)) fi,
            )</pft>
    </field>

Agregando la línea que está resaltada

Entonces, en v5018^z se tendrá el valor de la variable UNICODE que se definió en el DBN.def. Este valor podrá luego ser usado en los formatos del iAH