Files
MBS/PROYECTO/otrodir/cpfmwd010.per
T

59 lines
2.9 KiB
Plaintext

----------------------------------------------------------------------------------
-- cpfmwd010.per - Ataduras de reportes de entrada / ordenes / activo
----------------------------------------------------------------------------------
SCHEMA smarmotech
LAYOUT (text=%"Reportes de Entrada / Ordenes")
GRID grid1
{
[label1 |nom_sup ]
[label2 |inv_tipo ] [buscar ]
[label4 ]
<T tdisp >
[sel |entrada_d |orden_d |cod_mon_d|moneda_d |valor_d]
[sel |entrada_d |orden_d |cod_mon_d|moneda_d |valor_d]
[sel |entrada_d |orden_d |cod_mon_d|moneda_d |valor_d]
[sel |entrada_d |orden_d |cod_mon_d|moneda_d |valor_d]
[sel |entrada_d |orden_d |cod_mon_d|moneda_d |valor_d]
[agregar ] [quitar ]
[label5 ]
<T tata >
[tipo_a |desc_a |entrada_a |orden_a |valor_a ]
[tipo_a |desc_a |entrada_a |orden_a |valor_a ]
[tipo_a |desc_a |entrada_a |orden_a |valor_a ]
[tipo_a |desc_a |entrada_a |orden_a |valor_a ]
[tipo_a |desc_a |entrada_a |orden_a |valor_a ]
[aceptar ] [cancelar ]
}
END
END
ATTRIBUTES
LABEL label1:label1, text=%"Proveedor:";
EDIT nom_sup=formonly.nom_sup, tabIndex=1, noEntry, color = yellow;
LABEL label2:label2, text=%"Inventario:";
COMBOBOX inv_tipo=formonly.inv_tipo type CHAR, tabIndex=2;
BUTTON buscar:buscar, text=%"Buscar";
LABEL label4:label4, text=%"DISPONIBLES";
TABLE tdisp:tdisp, width = 67 characters;
EDIT sel=formonly.sel, tabIndex=3, title=%"[X]";
EDIT entrada_d=formonly.entrada_d, tabIndex=4, title=%"Rep.Entrada", noEntry;
EDIT orden_d=formonly.orden_d, tabIndex=5, title=%"Orden", noEntry;
EDIT cod_mon_d=formonly.cod_mon_d, tabIndex=96, title=%"", noEntry, invisible;
EDIT moneda_d=formonly.moneda_d, tabIndex=6, title=%"Moneda", noEntry;
EDIT valor_d=formonly.valor_d, tabIndex=7, title=%"Valor", noEntry;
BUTTON agregar:agregar, text=%"Agregar >>";
BUTTON quitar:quitar, text=%"<< Quitar";
LABEL label5:label5, text=%"ATADAS";
TABLE tata:tata, width = 67 characters;
EDIT tipo_a=formonly.tipo_a, tabIndex=8, title=%"Tipo", noEntry;
EDIT desc_a=formonly.desc_a, tabIndex=9, title=%"Inventario", noEntry;
EDIT entrada_a=formonly.entrada_a, tabIndex=10, title=%"Rep.Entrada", noEntry;
EDIT orden_a=formonly.orden_a, tabIndex=11, title=%"Orden", noEntry;
EDIT valor_a=formonly.valor_a, tabIndex=12, title=%"Valor", noEntry;
BUTTON aceptar:aceptar, text=%"Aceptar";
BUTTON cancelar:cancelar, text=%"Cancelar";
END
INSTRUCTIONS
SCREEN RECORD tdisp(formonly.sel,formonly.entrada_d,formonly.orden_d,formonly.cod_mon_d,formonly.moneda_d,formonly.valor_d)
SCREEN RECORD tata(formonly.tipo_a,formonly.desc_a,formonly.entrada_a,formonly.orden_a,formonly.valor_a)
SCREEN RECORD record1(formonly.nom_sup,formonly.inv_tipo)
END