$ls_desccomp =$_POST["descripcion"];
$ls_provbene =$_POST["provbene"];
$ls_tipo =$_POST["tipo"];
$ls_codban = "---";
$ls_ctaban = "-------------------------";
if($ls_tipo=="P")
{
$ls_prov=$ls_provbene;
$ls_bene="----------";
}
else
{
$ls_bene=$ls_provbene;
$ls_prov="----------";
}
$lb_valido=$in_classcmp->uf_guardar_automatico($ls_comprobante,$ld_fecha,$ls_proccomp,$ls_desccomp,&$ls_prov,
&$ls_bene,$ls_tipo,1,$ls_codban,$ls_ctaban);
$arr_cmp["comprobante"]=$ls_comprobante;
$ld_fecdb=$fun->uf_convertirdatetobd($ld_fecha);
$arr_cmp["fecha"] =$ld_fecdb;
$arr_cmp["procedencia"]=$ls_proccomp;
$arr_cmp["descripcion"]=$ls_desccomp;
$arr_cmp["proveedor"] =$ls_prov;
$arr_cmp["beneficiario"]=$ls_bene;
$arr_cmp["tipo"] =$ls_tipo;
$arr_cmp["codemp"] =$dat["codemp"];
$arr_cmp["tipo_comp"] =1;
if($lb_valido)
{
$ls_cuenta = $_POST["txtcuenta"];
$ls_documento = $_POST["txtdocumento"];
$ning_sel="selected";
}
$ls_codemp=$la_emp["codemp"];
$lb_valido=$io_fecha->uf_valida_fecha_periodo($ls_fecha,$ls_codemp);
if(!($lb_valido))
{
$io_msg->message($io_fecha->is_msg_error);
$ls_fecha="01/01/1900";
}
else
{
$lb_valido=$in_classcmp->uf_guardar_automatico($ls_comprobante,$ld_fecha,$ls_procedencia,$ls_descripcion,
$int_int->is_cod_prov,$int_int->is_ced_ben,$ls_tipo,1,
$ls_codban,$ls_ctaban);
if(!$lb_valido)
{
$io_msg->message($in_classcmp->is_msg_error);
}
}
uf_cargar_dt($la_emp["codemp"],$ls_procedencia,$ls_comprobante,$ld_fecha);
}
if($ls_operacion=="ELIMINAR")
{
$lb_valido=false;
