----------------------------------------------------------------------------------
-- 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