Abel LópezandClaude Sonnet 5
b27b20d42d
- Registrar noprmt002 en mbsERP.4pw junto con noprgb000.4gl (FUNCIONES_NO), nofmmt002.per/nofmwd001.per (FORMULARIOS_NO) y adfmwd004.per (FORMULARIOS_AD, compartido con ADMINISTRACION) - Copiar el diccionario de esquema smarmotech.sch a nodir/addir (faltaba, igual que en otros directorios ya corregidos) - Corregir typo "database marmotech" -> "smarmotech" en nofmwd001.per Co-Authored-By: Claude Sonnet 5 <noreply@anthropic.com>
37 lines
1.4 KiB
Plaintext
37 lines
1.4 KiB
Plaintext
{
|
|
------------------------------------------------------------------------
|
|
FORMULARIO : NOFMWD001
|
|
OBJETIVO : Pantalla que muestra los movimientos
|
|
Es utilizada por: NOPRMT002
|
|
PROGRAMADOR : Ing. Betania Guerrero Perez
|
|
FECHA REALIZACION : Agosto 20, 1993
|
|
------------------------------------------------------------------------
|
|
}
|
|
DATABASE smarmotech
|
|
SCREEN SIZE 24 by 80
|
|
{
|
|
Busqueda de Movimientos
|
|
\g-----------------------------------------------------------------\g
|
|
Codigo Descripcion Cant. Cia. Cant. Emp.
|
|
\g-----------------------------------------------------------------\g
|
|
[f1] [f3 ][f4 ][f5 ]
|
|
[f1] [f3 ][f4 ][f5 ]
|
|
[f1] [f3 ][f4 ][f5 ]
|
|
[f1] [f3 ][f4 ][f5 ]
|
|
[f1] [f3 ][f4 ][f5 ]
|
|
[f1] [f3 ][f4 ][f5 ]
|
|
}
|
|
end
|
|
tables
|
|
notb00002
|
|
attributes
|
|
f1 = notb00002.cod_mov,autonext;
|
|
f3 = notb00002.descrip_mov,upshift,
|
|
comments = "<Esc> Busca Todos Los Movimientos";
|
|
f4 = notb00002.cantidad_cia;
|
|
f5 = notb00002.cantidad_emp;
|
|
instructions
|
|
screen record s_movimiento[6] (cod_mov,descrip_mov,cantidad_cia,cantidad_emp)
|
|
delimiters " "
|
|
end
|