{
-----------------------------------------------------------------------------
FORMULARIO      : CCFMMT008
OBJETIVO        : Requisiciones Despachos
REALIZADO POR   : Ing. Juan Soto
FECHA           : Octubre 11, 2010
-----------------------------------------------------------------------------
}
SCHEMA smarmotech  
ACTION DEFAULTS
  ACTION busca_parametros (TEXT="Ejecuta Busqueda",IMAGE="find")
  ACTION cancel (TEXT="Cancela Operacion",IMAGE="stop")
  ACTION procesa (TEXT="Procesa Requisicion",IMAGE="mail")
  ACTION sale    (TEXT="Salir Consulta",IMAGE="exit")
  ACTION siguiente (TEXT="Siguiente",IMAGE="arr2right")
  ACTION anterior  (TEXT="Anterior",IMAGE="arr2left")
  ACTION primero  (TEXT="Primero",IMAGE="arr2beg")
  ACTION Actualizar (TEXT="Actualiza",IMAGE="edit")
  ACTION anular (TEXT="Anula",IMAGE="garbage2")
  ACTION ultimo (TEXT="Ultimo",IMAGE="arr2right")
END

TOOLBAR 
ITEM nuevo (TEXT="Requisicion", IMAGE="new", COMMENT="Nueva Requisicion")
  ITEM buscar (TEXT="Buscar Requisicion", IMAGE="find", COMMENT="Criterio de busqueda")
 SEPARATOR
  ITEM salir (TEXT="Salir", IMAGE="quit")
END

LAYOUT (TEXT="Requisiciones Despachos",STYLE="basic")
SCROLLGRID

{
<G "Generales"                                      ><G "Parametros Busqueda"                       >
   Numero                                              Orden      [ord   ]Fecha[fe2        ]
   Requisicion    [n1     ]    Fecha [f1        ]      Cotizacion [cot   ]       
   Solicitado Por [p1   ] [v1                   ]
   Aprobada   Por [ap1  ] [ap2                  ]      ESTADO     [es           ]

<G "Detalle"                                                                                                                                                                                                                              >
  <t t1                                                                                                                                                                                                                                  >
   [ck   ][x1    ][fe1       ][c10    ][x10][x11  ][x12                              ][x6     ][x2  ][x3  ][x4  ][x5  ][d1                                ][u1 ][x9       ][Z10     ][x7           ][z1    ][z2          ][x8           ]
   [ck   ][x1    ][fe1       ][c10    ][x10][x11  ][x12                              ][x6     ][x2  ][x3  ][x4  ][x5  ][d1                                ][u1 ][x9       ][Z10     ][x7           ][z1    ][z2          ][x8           ]
   [ck   ][x1    ][fe1       ][c10    ][x10][x11  ][x12                              ][x6     ][x2  ][x3  ][x4  ][x5  ][d1                                ][u1 ][x9       ][Z10     ][x7           ][z1    ][z2          ][x8           ]
   [ck   ][x1    ][fe1       ][c10    ][x10][x11  ][x12                              ][x6     ][x2  ][x3  ][x4  ][x5  ][d1                                ][u1 ][x9       ][Z10     ][x7           ][z1    ][z2          ][x8           ]  
   

<G                                                                                                                     >
   [       :b1        :b2       :b3      ]
   [       :b4        :b5       :b6         :b7      :b8      :b9       :b10  ]
 
 }
 END  
end
tables
cctb00001
attributes
CHECKBOX ck= formonly.procesa type char,NOT NULL,TITLE="PROCESA",comments="Coteje este registro para procesar",VALUEUNCHECKED="NO",VALUECHECKED="SI",DEFAULT="NO";
n1  = formonly.num_req,format="&&&&&&",style="title";
LABEL f1  = formonly.fecha_requisicion,style="title",format="dd/mm/yyyy";
LABEL p1  = formonly.sec_vend,style="title";
v1  = formonly.nombre_vendedor,style="title";
ap1  = formonly.sec_vend_a,noentry;
ap2 = formonly.nombre_a,noentry;
es  = formonly.estado_req,noentry;
ord = formonly.busca_orden,
      comments="Digite orden o especifique rango con los dos puntos( : ), ejemplo: 1724:1730";
fe2 = formonly.busca_fecha,
      comments="Digite Fecha o Rango con los dos Puntos ( : ), ejemplo: 100910:103110";
cot = formonly.busca_cotizacion,
      comments = "Digite Cotizacion o Rango con los dos Puntos ( : ), ejemplo: 2040:2050";
LABEL x1=   formonly.num_oc,TITLE="ORDEN";
LABEL fe1=  formonly.fecha,format="dd/mm/yyyy",TITLE="FECHA ORDEN";
LABEL c10=  formonly.cotizacion_no,TITLE="COTIZACION";
LABEL X10=  formonly.tipo_cliente,TITLE="CODIGO";
LABEL x11=  formonly.sec_cliente, TITLE="CODIGO";
LABEL x12=  formonly.nombre,TITLE="NOMBRE";
LABEL x2=   formonly.cod_n,TITLE="CLASE";
LABEL x3=   formonly.cod_grupo,TITLE="GRUPO";
LABEL x4=   formonly.cod_tipo,TITLE="TIPO";
LABEL x5=   formonly.cod_Sec,TITLE="SECUENCIA";
LABEL d1=   formonly.descripcion,TITLE="DESCRIPCION";
LABEL u1=   formonly.unidad_med,TITLE="UNIDAD MED";
x6=   formonly.cantidad,TITLE="CANTIDAD";
LABEL x7=   formonly.precio,TITLE="PRECIO",FORMAT="###,###.##";
LABEL z1=   formonly.descuento,TITLE="%DESCUENTO",FORMAT="###.##";
LABEL z2=   formonly.descvalor,TITLE="VALOR DESC",FORMAT="###,###.##";
LABEL x8=   formonly.valor,TITLE="VALOR",FORMAT="##,###,###.##";
LABEL x9=   formonly.cantidad_ord,TITLE="ORDENADA";
LABEL Z10=  formonly.cantidad_pendiente,TITLE="PENDIENTE",style="rojo";
 BUTTON b1: busca_parametros;
 BUTTON b2: cancel;
  BUTTON b3: procesa ;
  BUTTON b4: sale    ;
  BUTTON b5: siguiente ;
  BUTTON b6: anterior  ;
  BUTTON b7: primero  ;
  BUTTON b8: Actualizar ;
  BUTTON b9: anular ;
  BUTTON b10: ultimo ;
instructions
 screen record s_requisi (procesa,num_oc,fecha,cotizacion_no,tipo_cliente,sec_cliente,nombre,cantidad,cod_n,cod_grupo,cod_tipo,cod_sec,descripcion,unidad_med,cantidad_ord,cantidad_pendiente,precio,descuento,descvalor,valor)
 
 delimiters " "
end