{
-------------------------------------------------------------------------------
FORMULARIO           :  CCFMRP012
OBJETIVO             :  AUTOZACION DE ORDENES
PROGRAMADOR          :  ING. JUAN SOTO
FECHA REALIZACION    :  Septiembre 25, 2008
-------------------------------------------------------------------------------
}
database marmotech   
screen size 24 by 80
{
     ===========================================================
                      AUTORIZACIONES DE ORDENES
     ===========================================================

	ORDEN NO: [ord      ]
--------------------------------------------------------------------------------------------------
NO. ORDEN  CLIENTE                            FECHA       VALOR         USUARIO    AUTORIZADA  FECHA
                                                                         AUTORIZA              AUTORIZACION 
--------------------------------------------------------------------------------------------------
[ord1  ][cl                                  ][fe        ][v           ][pu1        ][AU    ][fe1        ]
[ord1  ][cl                                  ][fe        ][v           ][pu1        ][AU    ][fe1        ]
[ord1  ][cl                                  ][fe        ][v           ][pu1        ][AU    ][fe1        ]
[ord1  ][cl                                  ][fe        ][v           ][pu1        ][AU    ][fe1        ]
[ord1  ][cl                                  ][fe        ][v           ][pu1        ][AU    ][fe1        ]
}
end
tables
cctb00001
attributes
ord= formonly.num_oc;
ord1  = formonly.num_oc1;
 
cl  = formonly.cliente;
fe  = formonly.fecha_oc type date, autonext, format = "dd/mm/yyyy";
v   = formonly.valor;
pu1  = formonly.us_autoriza;
au   = formonly.estado;
fe1  = formonly.fecha_autorizacion type date ,format="dd/mm/yyyy";
instructions
 screen record sorden[5](num_oc1,cliente,fecha_oc,valor,us_autoriza,estado,fecha_autorizacion)
end