jsoto/MBS
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Commit inicial: fuentes MBS ERP (Genero 6) + .gitignore + docs/SETUP_PC_MBS.md

Browse Source
This commit is contained in:
jsoto
2026-08-18 20:59:52 -04:00
commit 454973e269
5978 changed files with 2664094 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
PROYECTO/nodir/nofmcs005.per
+52
View File
@@ -0,0 +1,52 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMCS005
OBJETIVO : Pantalla que consulta los empleados atado al
movimiento que genera el prog. GENERACION NOMINA
Es utilizada por: NOFMCS005
PROGRAMADOR : Ing. Juan Soto
FECHA REALIZACION : Diciembre 17, 1993
------------------------------------------------------------------------
}
database marmotech
screen size 24 by 80
{
Numero de Nomina [f002] Tipo de Empleado [c] [te ]
Codigo Movimiento [c1][ca ]
\g--------------------------------------------------------------------------
Empleados Cantidad Valor
\g--------------------------------------------------------------------------
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
Total [t4 ]
}
end
tables
notb00008,notb00002,
adtb00003
attributes
f002 = notb00008.num_nomi,autonext,
comments = "Digite el numero de nomina";
c = notb00008.tipo_emp,autonext,upshift,
comments = "Digite Q- Quincenal, S- Semanal, V- Vendedor";
te = formonly.descr,noentry;
c1 = notb00008.cod_mov,autonext,
comments = "Digite el codigo de movimiento o Presione Ctrl-W para busqueda";
ca = formonly.descripcion,noentry;
f4 = notb00008.num_emp;
t4 = formonly.p_total;
b = formonly.nombre;
f005 = notb00008.cantidad,noentry;
f006 = notb00008.valor,noentry;
instructions
screen record consart[10] (num_emp,nombre,cantidad,valor)
delimiters " "
end