{
$readonly="";
$ldec_mondeb=0;
$ldec_diferencia=0;
$ldec_monhab=0;
$ls_comprobante = $_POST["txtcomprobante"];
$ls_procede = $_POST["txtproccomp"];
$ls_fecha = $_POST["txtfecha"];
$ls_tipo = $_POST["tipo"];
$ls_provbene = $_POST["txtprovbene"];
$ls_desproben = $_POST["txtdesproben"];
$ls_descripcion = $_POST["txtdesccomp"];
$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_existe=$in_classcmp->uf_verificar_comprobante($ls_codemp,$ls_procede,$ls_comprobante);
if($lb_existe)
{
$io_msg->message(" El Comprobante ya existe. El Sistema generara un nuevo numero de Comprobante");
$ls_comprobante = $in_classcmp->uf_generar_num_cmp($la_emp["codemp"],'SPIAUM');
}
}
$ls_desccomp =$_POST["descripcion"];
$ls_provbene =$_POST["provbene"];
$ls_tipo =$_POST["tipo"];
$ls_tipomod = $_POST["tipomod"];
$ls_codtipomod = $_POST["codtipomod"];
if ($ls_tipomod==1)
{
$ls_read="readonly";
}
else
{
$ls_read="";
}
$ls_bene="----------";
$ls_prov="----------";
$lb_valido=$int_fec->uf_valida_fecha_periodo($ld_fecha,$ls_codemp);
if(!($lb_valido))
{
$msg->message($int_fec->is_msg_error);
}
else
{
$in_classcmp->io_sql->begin_transaction();
$ls_existe=$in_classcmp->uf_select_comprobante($ls_codemp,$ls_proccomp,$ls_comprobante,$ld_fecha);
if (($ls_tipomod==1)&&(!$ls_existe))
{
$lb_valido=$in_classcmp->uf_update_tipo($ls_codemp,$ls_codtipomod);
}
case "GUARDAR":
/*-------CÓDIGO AGREGADO MULTIPLES INSERT SIMULTANIOS---------*/
require_once("../shared/class_folder/sigesp_c_generar_consecutivo.php");
$io_keygenV= new sigesp_c_generar_consecutivo();
$ls_codsolvia= $io_keygenV->uf_generar_numero_nuevo("SCV","scv_solicitudviatico","codsolvia","SCV",8,"","","");
$verificar = 'verifica';
unset($io_keygenV);
/*------------------------------------------------------------*/
$li_totrows= $io_fun_viaticos->uf_obtenervalor("totalfilas","");
$li_totrowspersonal= $io_fun_viaticos->uf_obtenervalor("totalfilaspersonal","");
uf_repintarpersonal($lo_objectpersonal,$li_totrowspersonal);
uf_repintarasignaciones($lo_object,$li_totrows);
$lb_valido=$io_fun_viaticos->uf_select_cierre_presupuestario();
if($lb_valido)
{
$lb_valido=$io_fec->uf_valida_fecha_periodo($ld_fecsolvia,$ls_codemp);
if($lb_valido)
{
if($li_solviaext==1)
{
$lb_existe=$io_scv->uf_scv_load_config($ls_codemp,"SCV","CONFIG","INTERNACIONALES",$ls_spgcta);
}
else
{
$lb_existe=$io_scv->uf_scv_load_config($ls_codemp,"SCV","CONFIG","NACIONALES",$ls_spgcta);
}
if($lb_existe)
{
$lb_valido=$io_scv->uf_scv_select_cuentaspg($ls_codemp,$ls_spgcta,$ls_codestpro1,$ls_codestpro2,
$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,$ls_estcla);
if(!$lb_valido)
