---------------------------------------------------------------------------------- 
-- File created from C:\Users\egarcia\OneDrive - MARMOTECH, S. A\Equipo Tecnologia\Fuentes\MARMOTECH\PROYECTO\cpdir\cpfmmt001.4fd by Genero Studio
-- WARNING! All changes made in this file will be lost!
----------------------------------------------------------------------------------

SCHEMA smarmotech

TOOLBAR toolbar1
  ITEM adicionar(image="new", text=%"Adicionar")
  ITEM Consultar_modificar(image="find", text=%"Consultar")
  ITEM salir(image="exit", text=%"Salir")
END -- toolbar1

LAYOUT (text=%"FACTURAS PROVEEDORES")
GRID grid1
{

 [label1         ] [cod_sp                |l|cod_|nom_sup                   ]
 [label3        ]  [num_doc   ]             [label4       ]    [fecha_orig]
 [label9        ]  [v_term_sp          ]    [label6        |valor_fac   ]
 [label5           |fecha_proc]
 [label18   ]      [tipo                   ]
 [label11   ]      [bodega            |reporteent]
 [label]           [orden_]
 [label7    ]      [cod_mon     ]     [monto_orde]
 [label8     ]     [detalle                         ]

  <T table1                                                       >
  [tipo1   |aplica_a|tipo_doc|valor_re|valor   ]
  [tipo1   |aplica_a|tipo_doc|valor_re|valor   ]
  [tipo1   |aplica_a|tipo_doc|valor_re|valor   ]
  [tipo1   |aplica_a|tipo_doc|valor_re|valor   ]
  [tipo1   |aplica_a|tipo_doc|valor_re|valor   ]



}
END -- grid1
END -- FACTURAS PROVEEDORES

TABLES
cptb00001
ATTRIBUTES
LABEL label1:label1, text=%"Codigo Suplidor";
COMBOBOX cod_sp=formonly.cod_sp type SMALLINT, tabIndex=1;
LABEL l:label2, text=%"-";
EDIT cod_=cptb00001.cod_sp_sec, tabIndex=2, autoNext, comment=%"Presione Ctrl-W Para busca Suplidor";
EDIT nom_sup=formonly.nom_sup, tabIndex=3, noEntry, color = yellow;
LABEL label3:label3, text=%"Numero Factura";
EDIT num_doc=cptb00001.num_doc, tabIndex=4, upShift;
LABEL label4:label4, text=%"Fecha Factura";
EDIT fecha_orig=cptb00001.fecha_orig, tabIndex=5, format="dd/mm/yyyy";
LABEL label9:label9, text=%"Termino de pago";
COMBOBOX v_term_sp=formonly.v_term_sp type VARCHAR, upShift;
LABEL label6:label6, text=%"Monto Factura";
EDIT valor_fac=formonly.valor_fac type DECIMAL(12,2), tabIndex=7, comment=%"Digite el valor de la factura";
LABEL label5:label5, text=%"Fecha Vencimento";
EDIT fecha_proc=cptb00001.fecha_proc, tabIndex=6, format="dd/mm/yyyy";
LABEL label18:label18, text=%"Inventario";
COMBOBOX tipo=formonly.tipo type CHAR, scroll, comment=%"01-Generales  02-Rov.ltd 03-Locales 04-Miscelaneas";
LABEL label11:label11, text=%"Reporte Entrada";
COMBOBOX bodega=formonly.bodega, scroll, comment=%"Elegir Bodega";
EDIT reporteent=formonly.reporteEntrada;
LABEL label:label10, text=%"Orden";
EDIT orden_=cptb00001.orden_no;
LABEL label7:label7, text=%"Valor Orden";
EDIT cod_mon=formonly.cod_mon, noEntry, comment=%"Elegir Moneda";
EDIT monto_orde=formonly.monto_orden;
LABEL label8:label8, text=%"Observacion";
EDIT detalle=cptb00001.detalle, tabIndex=8, required, upShift;
TABLE table1:table1;
EDIT tipo1=formonly.tipo1, title=%"Tipo";
EDIT aplica_a=formonly.aplica_a, title=%"Aplicacion";
EDIT tipo_doc=formonly.tipo_doc, title=%"Tipo Doc";
EDIT valor_re=formonly.valor_Rep, title=%"Valor Prepago";
EDIT valor=formonly.valor, title=%"Valor aplicar";
END -- ATTRIBUTES

INSTRUCTIONS
SCREEN RECORD record1(formonly.cod_sp,cptb00001.cod_sp_sec,formonly.nom_sup,cptb00001.num_doc,formonly.v_term_sp,cptb00001.fecha_orig,cptb00001.fecha_proc,formonly.valor_fac,formonly.tipo,formonly.bodega,formonly.reporteEntrada,cptb00001.orden_no,formonly.cod_mon,formonly.monto_orden,cptb00001.detalle)
SCREEN RECORD factura1(formonly.tipo1,formonly.aplica_a,formonly.tipo_doc,formonly.valor_Rep,formonly.valor)
END -- INSTRUCTIONS