Registra noprmt018 (Pago Prest. en Efectivo) y corrige bug de fecha

Se agrega noprmt018 al proyecto usando nofmmt018.per.

Se corrige conversion CONVERT(CHAR,fecha,103) hacia variable DATE en
nopcmf018(), mismo patron de error -1205 "Invalid month in date"
encontrado en otros programas de nomina.

Probado ciclo completo: Adicionar, Consultar-modificar/Buscar,
Escoger y eLiminar sobre empleado 4124 (cod_mov=12).

Co-Authored-By: Claude Sonnet 5 <noreply@anthropic.com>
This commit is contained in:
Abel López
2026-09-22 12:44:22 -04:00
co-authored by Claude Sonnet 5
parent 12bb4e837b
commit 31fbc9a3b9
2 changed files with 6 additions and 1 deletions
+5
View File
@@ -478,6 +478,7 @@
<File filePath="nodir/nofmmt208.per"/>
<File filePath="nodir/nofmmt011.4fd"/>
<File filePath="nodir/nofmmt016.per"/>
<File filePath="nodir/nofmmt018.per"/>
</Library>
<Library binaryName="FUNCIONES_NO" id="-306412216" label="FUNCIONES_NO">
<File filePath="nodir/noprgb000.4gl"/>
@@ -512,6 +513,10 @@
<Configuration commandLineArguments="alopez Lopez2023" id="-700000058" label="Configuration"/>
<File filePath="nodir/noprmt016.4gl"/>
</Application>
<Application binaryName="noprmt018" dependencies="-1026233879,-764824792,-306412216,-335228674" id="-700000059" label="noprmt018">
<Configuration commandLineArguments="alopez Lopez2023" id="-700000060" label="Configuration"/>
<File filePath="nodir/noprmt018.4gl"/>
</Application>
</Group>
<Group id="1667448785" label="PRODUCTOS TERMINADOS">
<Library binaryName="FORMULARIOS_IP" dependencies="-1026233879" id="-1826025351" label="FORMULARIOS_IP">
+1 -1
View File
@@ -277,7 +277,7 @@ FUNCTION nopcmf018()
criterio clipped," ORDER BY a.num_emp,a.departamento,a.num_nomi"
}
" SELECT DISTINCT a.num_emp,a.departamento,a.nivel_emp,a.cod_puesto, ",
" a.num_nomi,CONVERT(CHAR(10),a.fecha,103),a.cod_mov,a.valor*-1,a.status_t,a.us_crea, ",
" a.num_nomi,a.fecha,a.cod_mov,a.valor*-1,a.status_t,a.us_crea, ",
"cast(a.fech_crea as varchar(20)) ",
" FROM notb00008 a where a.status_t is null and a.clase_mov = 'P' AND ",
criterio clipped," ORDER BY a.num_emp,a.departamento,a.num_nomi"