jpegueroandClaude Sonnet 5
b6085d4140
Instruccion de Johnny: todos los directorios de fuentes de inventario deben migrarse de la carpeta temporal PROYECTOS a la carpeta real PROYECTO, ya que PROYECTOS sera eliminada. Se elimino tambien un archivo suelto sin relacion llamado "ipdir" que existia en PROYECTO (del commit inicial) y bloqueaba el nombre de la carpeta. Co-Authored-By: Claude Sonnet 5 <noreply@anthropic.com>
40 lines
1.2 KiB
Plaintext
40 lines
1.2 KiB
Plaintext
|
|
|
|
{
|
|
=============================================================================
|
|
FORMULARIO : IPFMWD009
|
|
OBJETIVO : Desplegar los codigos y nombres de la maestra de
|
|
clientes
|
|
PROGRAMA Q. LO USA : IPPRMT044
|
|
AUTOR : JUAN F. SOTO
|
|
FECHA : FEBRERO 6, 1999
|
|
=============================================================================
|
|
}
|
|
DATABASE marmotech
|
|
SCREEN
|
|
{
|
|
\g-----------------------------------------------\g
|
|
Codigo Nombre
|
|
\g-----------------------------------------------\g
|
|
[sp]-[cod ] [nom ]
|
|
[sp]-[cod ] [nom ]
|
|
[sp]-[cod ] [nom ]
|
|
[sp]-[cod ] [nom ]
|
|
[sp]-[cod ] [nom ]
|
|
[sp]-[cod ] [nom ]
|
|
[sp]-[cod ] [nom ]
|
|
[sp]-[cod ] [nom ]
|
|
}
|
|
end
|
|
tables
|
|
vetb00004
|
|
attributes
|
|
sp = vetb00004.tipo_cliente,comments = "Digite tipo Cliente";
|
|
cod = vetb00004.sec_cliente;
|
|
nom = vetb00004.nombre;
|
|
instructions delimiters " "
|
|
screen record s_cliente[8](tipo_cliente,sec_cliente,nombre)
|
|
end
|
|
|
|
|