diff --git a/PROYECTO/mbsERP.4pw b/PROYECTO/mbsERP.4pw index 06259f9..9bf96a6 100644 --- a/PROYECTO/mbsERP.4pw +++ b/PROYECTO/mbsERP.4pw @@ -481,6 +481,7 @@ + @@ -527,6 +528,10 @@ + + + + diff --git a/PROYECTO/nodir/noprmt024.4gl b/PROYECTO/nodir/noprmt024.4gl index a707bec..992c6af 100644 --- a/PROYECTO/nodir/noprmt024.4gl +++ b/PROYECTO/nodir/noprmt024.4gl @@ -160,7 +160,18 @@ FUNCTION adpcad023() LET numero_msg = 1 CALL msg(numero_msg) - NEXT FIELD nom_puesto + CLEAR FORM + LET puesto.nom_puesto = NULL + LET puesto.otra_descripcion = NULL + LET puesto.funciones = NULL + LET puesto.funcion1 = NULL + LET puesto.nivel_sal = NULL + LET puesto.salario_min = NULL + LET puesto.salario_max = NULL + LET puesto.tipo_puesto = NULL + LET puesto.supervisor = NULL + LET puesto.cod_puesto_sirla = NULL + NEXT FIELD nom_puesto