Files
2026-09-22 20:38:51 -04:00

86 lines
3.9 KiB
Plaintext

schema decomarmol
ACTION defaults
ACTION suplidor (TEXT="Busca Suplidor", IMAGE="find")
END
TOOLBAR
ITEM nuevo (TEXT="Orden de Compras", IMAGE="new", COMMENT="Nueva Orden")
ITEM buscar (TEXT="Buscar Ordenes de Compras", IMAGE="find", COMMENT="Criterio de busqueda")
SEPARATOR
ITEM salir (TEXT="Salir", IMAGE="quit")
END
LAYOUT (TEXT="ORDENES DE COMPRAS",STYLE="basic")
GRID
{
<G Generales >
Orden No. [f000 ] Tipo Orden[a0 ] Fecha[f001 ]
Codigo Suplidor[f2][f003][sh ][a1 ]
Codigo de Pago [f4 ] Via[a2 ]
Enviada [l] Fecha [f008 ]Pago [m]Fecha Pago[f009 ]
Cierre [n] Puerto[p1 ] No.Prof[f005 ]
Codigo Moneda [cm ]
<g g2 >
<t t1 >
[re ][a ][g ][t ][se ][des ][f8 ][f3 ] [f6 ][f7 ]
[re ][a ][g ][t ][se ][des ][f8 ][f3 ] [f6 ][f7 ]
[re ][a ][g ][t ][se ][des ][f8 ][f3 ] [f6 ][f7 ]
[re ][a ][g ][t ][se ][des ][f8 ][f3 ] [f6 ][f7 ]
[re ][a ][g ][t ][se ][des ][f8 ][f3 ] [f6 ][f7 ]
N.A.B. [F9 ] Nomenclatura [k ]
}
end
END
tables
cotb00005, cotb00006,
intb00001, cotb00008,
cotb00014, cotb00024,
cotb00001, cotb00015
attributes
GROUP g2: TEXT="Detalle Orden";
re = formonly.num_req,autonext,noentry,comments =
"Digite Numero de Requisicion o Presione Ctrl-w Para Busqueda",
TITLE="Requisicion";
a = cotb00015.cod_n,TITLE="CLASE";
g = cotb00015.cod_grupo,TITLE="GRUPO";
t = cotb00015.cod_tipo,TITLE="TIPO";
se = cotb00015.cod_sec,TITLE="SECUENCIA";
des = formonly.descripcion,noentry,scroll;
f8 = formonly.unidad,noentry;
k = formonly.descrip1,noentry;
f3 = cotb00008.cantidad,TITLE="CANTIDAD";
f9 = cotb00005.cod_nab,noentry,TITLE="CODIGO ARANCELARIO";
f6 = cotb00008.precio,TITLE="PRECIO";
f7 = formonly.valor,noentry,TITLE="VALOR";
f000 = formonly.num_oc;
COMBOBOX a0 = formonly.tipo;
f001 = cotb00014.fech_oc,autonext,format = "dd/mm/yyyy",
comments ="Digite la fecha de elaboracion de la orden";
f005 = cotb00014.num_pr,autonext,
comments ="Digite el numero de la proforma o cotizacion";
f2 = cotb00014.cod_sp,autonext,
comments =
"Digite el codigo del suplidor o Presione Ctrl-W para busqueda";
f003 = cotb00014.cod_sp_sec,autonext,
comments =
"Digite la secuencia del suplidor o Presione Ctrl-W para busqueda";
a1 = cotb00001.nom_sp,noentry;
COMBOBOX f4 = cotb00014.term_sp;
COMBOBOX a2 = cotb00014.via,
comments ="Digite 01 = Maritima, 02 = Aerea, 03 = Terrestre";
COMBOBOX l = cotb00014.enviada,include = ("S","N");
f008 = cotb00014.fech_enviada, format = "dd/mm/yyyy";
COMBOBOX m = cotb00014.pago, include = ("S","N");
f009 = cotb00014.fech_pago, format = "dd/mm/yyyy";
n = cotb00014.cierre,noentry,include = ("S","N");
COMBOBOX p1 = formonly.cod_pt, comments =
"Digite el puerto de embarque o Presione Ctrl-W para busqueda";
COMBOBOX cm = formonly.cod_mon;
BUTTON sh: suplidor;
instructions
screen record consart (num_req,cod_n,cod_grupo,cod_tipo,cod_sec,descripcion,unidad,
cantidad,precio,valor)
end