";
print "";
print "| Solicitud | ";
print "Estatus | ";
print "Tipo | ";
print "Fecha | ";
print "Misión | ";
print "Ruta | ";
print "Imprimir | ";
print "
";
if($ls_operacion=="BUSCAR")
{
$ls_criterio="";
if($_POST['txtdesde'])
{
$ad_fecregdes=$io_fun->uf_convertirdatetobd($_POST['txtdesde']);
$ls_criterio=$ls_criterio. " AND scv_solicitudviatico.fecsolvia>='".$ad_fecregdes."'";
}
if($_POST['txthasta'])
{
$ad_fecreghas=$io_fun->uf_convertirdatetobd($_POST['txthasta']);
$ls_criterio=$ls_criterio. " AND scv_solicitudviatico.fecsolvia<='".$ad_fecreghas."'";
}
if($_POST['sel_estsolvia']){$ls_criterio=$ls_criterio. " AND scv_solicitudviatico.estsolvia='".$_POST['sel_estsolvia']."'";}
if($_POST['sel_solviaext']!=""){$ls_criterio=$ls_criterio. " AND scv_solicitudviatico.solviaext='".$_POST['sel_solviaext']."'";}
if($ls_cedben)
{
$ls_criterio=$ls_criterio. " AND scv_dt_personal.codper LIKE '%".$ls_cedben."%' ";
}
$ls_sql="SELECT scv_solicitudviatico.codsolvia,scv_solicitudviatico.codmis,scv_solicitudviatico.codrut,".
" scv_solicitudviatico.fecsolvia,scv_solicitudviatico.coduniadm,scv_solicitudviatico.fecsalvia,".
" scv_solicitudviatico.fecregvia,scv_solicitudviatico.obssolvia,".
" scv_solicitudviatico.numdiavia,scv_solicitudviatico.estsolvia,scv_solicitudviatico.solviaext,".
" scv_misiones.denmis,scv_rutas.desrut,denuniadm,scv_solicitudviatico.codfuefin,".
" scv_solicitudviatico.codestpro1,scv_solicitudviatico.codestpro2,scv_solicitudviatico.codestpro3,".
" scv_solicitudviatico.codestpro4,scv_solicitudviatico.codestpro5,scv_solicitudviatico.estcla,".
" scv_solicitudviatico.repcajchi,
(CASE scv_solicitudviatico.solviaext WHEN '1' THEN 'INTERNACIONAL'
WHEN '0' THEN 'NACIONAL'
ELSE 'NACIONAL'
END) AS destipovia,
e_estsolvia.descequiv AS desc_estsolvia
".
" FROM scv_solicitudviatico
LEFT JOIN covensol_sigesp_equiv e_estsolvia ON e_estsolvia.dominio='scv_solicitudviatico'
AND e_estsolvia.campo='estsolvia'
AND e_estsolvia.valor= scv_solicitudviatico.estsolvia::text
LEFT JOIN scv_dt_personal ON scv_solicitudviatico.codsolvia=scv_dt_personal.codsolvia
AND scv_solicitudviatico.codsolvia=scv_dt_personal.codsolvia
AND scv_solicitudviatico.codemp=scv_dt_personal.codemp
,scv_misiones,scv_rutas,spg_unidadadministrativa,spg_dt_unidadadministrativa ".
" WHERE scv_solicitudviatico.codemp='".$ls_codemp."'".
" AND scv_solicitudviatico.codsolvia LIKE '".$ls_codsolvia."'".
" AND scv_misiones.denmis LIKE '".$ls_denmis."'".
" AND scv_rutas.desrut LIKE '".$ls_desrut."'".
" AND scv_solicitudviatico.codemp=scv_misiones.codemp".
" AND scv_solicitudviatico.codmis=scv_misiones.codmis".
" AND scv_solicitudviatico.codemp=scv_rutas.codemp".
" AND scv_solicitudviatico.codrut=scv_rutas.codrut".
" AND scv_solicitudviatico.codemp=spg_unidadadministrativa.codemp".
" AND scv_solicitudviatico.coduniadm=spg_unidadadministrativa.coduniadm ".
" AND spg_dt_unidadadministrativa.codemp=scv_solicitudviatico.codemp ".
" AND spg_dt_unidadadministrativa.estcla=scv_solicitudviatico.estcla ".
" AND spg_dt_unidadadministrativa.codestpro1=scv_solicitudviatico.codestpro1 ".
" AND spg_dt_unidadadministrativa.codestpro2=scv_solicitudviatico.codestpro2 ".
" AND spg_dt_unidadadministrativa.codestpro3=scv_solicitudviatico.codestpro3 ".
" AND spg_dt_unidadadministrativa.codestpro4=scv_solicitudviatico.codestpro4 ".
" AND spg_dt_unidadadministrativa.codestpro5=scv_solicitudviatico.codestpro5 ".
$ls_criterio." ".
" GROUP BY scv_solicitudviatico.codemp, scv_solicitudviatico.codsolvia, scv_solicitudviatico.codmis, ".
" scv_solicitudviatico.codrut,".
" scv_solicitudviatico.fecsolvia,scv_solicitudviatico.coduniadm,scv_solicitudviatico.fecsalvia,".
" scv_solicitudviatico.fecregvia,scv_solicitudviatico.obssolvia,".
" scv_solicitudviatico.numdiavia,scv_solicitudviatico.estsolvia,scv_solicitudviatico.solviaext,".
" scv_misiones.denmis,scv_rutas.desrut,denuniadm,scv_solicitudviatico.codfuefin,".
" scv_solicitudviatico.codestpro1,scv_solicitudviatico.codestpro2,scv_solicitudviatico.codestpro3,".
" scv_solicitudviatico.codestpro4,scv_solicitudviatico.codestpro5,scv_solicitudviatico.estcla,scv_solicitudviatico.repcajchi,e_estsolvia.descequiv".
" ORDER BY scv_solicitudviatico.codsolvia";
$rs_cta=$io_sql->select($ls_sql);
//echo $ls_sql;
if($rs_cta===false)
{
$io_msg->message(" ERROR->".$io_sql->message);
}
$data=$rs_cta;
if($row=$io_sql->fetch_row($rs_cta))
{
$data=$io_sql->obtener_datos($rs_cta);
$arrcols=array_keys($data);
$totcol=count($arrcols);
$ds->data=$data;
$totrow=$ds->getRowCount("codsolvia");
for($z=1;$z<=$totrow;$z++)
{
switch ($ls_destino)
{
case "SOLICITUD":
print "";
$ls_codsolvia=$data["codsolvia"][$z];
$ls_codmis= $data["codmis"][$z];
$ls_denmis= $data["denmis"][$z];
$ls_codrut= $data["codrut"][$z];
$ls_desrut= $data["desrut"][$z];
$ld_fecsolvia= $data["fecsolvia"][$z];
$ls_coduniadm= $data["coduniadm"][$z];
$ls_denuniadm= $data["denuniadm"][$z];
$ld_fecsalvia= $data["fecsalvia"][$z];
$ld_fecregvia= $data["fecregvia"][$z];
$ls_obssolvia= $data["obssolvia"][$z];
$li_numdiavia= $data["numdiavia"][$z];
$ls_estsolvia= $data["estsolvia"][$z];
$li_solviaext= $data["solviaext"][$z];
$ls_codfuefin= $data["codfuefin"][$z];
$ls_codestpro1= $data["codestpro1"][$z];
$ls_codestpro2= $data["codestpro2"][$z];
$ls_codestpro3= $data["codestpro3"][$z];
$ls_codestpro4= $data["codestpro4"][$z];
$ls_codestpro5= $data["codestpro5"][$z];
$ls_estcla= $data["estcla"][$z];
$ld_fecsolvia=$io_fun->uf_convertirfecmostrar($ld_fecsolvia);
$ld_fecsalvia=$io_fun->uf_convertirfecmostrar($ld_fecsalvia);
$ld_fecregvia=$io_fun->uf_convertirfecmostrar($ld_fecregvia);
$li_numdiavia=number_format($li_numdiavia,2,',','.');
$li_repcajchi=$data["repcajchi"][$z];//Campo agregado por OFIMATICA DE VENEZUELA para manejo de viaticos por reposicion de VIATICOS
print "| ".$ls_codsolvia." | ";
print "".$data["desc_estsolvia"][$z]." | ";
print "".$data["destipovia"][$z]." | ";
print "".$ld_fecsolvia." | ";
print "".$ls_denmis." | ";
print "".$ls_desrut." | ";
print "".' '." | ";
print "
";
break;
case "CALCULO":
$ls_estsolvia= $data["estsolvia"][$z];
if($ls_estsolvia=="R")
{
print "";
$ls_codsolvia=$data["codsolvia"][$z];
$ls_codmis= $data["codmis"][$z];
$ls_denmis= $data["denmis"][$z];
$ls_codrut= $data["codrut"][$z];
$ls_desrut= $data["desrut"][$z];
$ld_fecsolvia= $data["fecsolvia"][$z];
$ls_coduniadm= $data["coduniadm"][$z];
$ls_denuniadm= $data["denuniadm"][$z];
$ld_fecsalvia= $data["fecsalvia"][$z];
$ld_fecregvia= $data["fecregvia"][$z];
$ls_obssolvia= $data["obssolvia"][$z];
$li_numdiavia= $data["numdiavia"][$z];
$li_solviaext= $data["solviaext"][$z];
$ls_codfuefin= $data["codfuefin"][$z];
$ld_fecsolvia=$io_fun->uf_convertirfecmostrar($ld_fecsolvia);
$ld_fecsalvia=$io_fun->uf_convertirfecmostrar($ld_fecsalvia);
$ld_fecregvia=$io_fun->uf_convertirfecmostrar($ld_fecregvia);
$li_numdiavia=number_format($li_numdiavia,2,',','.');
$li_repcajchi=$data["repcajchi"][$z];//Campo agregado por OFIMATICA DE VENEZUELA para manejo de viaticos por reposicion de VIATICOS
print "| ".$ls_codsolvia." | ";
print "".$data["desc_estsolvia"][$z]." | ";
print "".$data["destipovia"][$z]." | ";
print "".$ld_fecsolvia." | ";
print "".$ls_denmis." | ";
print "".$ls_desrut." | ";
print " | ";
print "
";
}
break;
case "REPORTESOLICITUDPAGODESDE":
$ls_estsolvia= $data["estsolvia"][$z];
if($ls_estsolvia=="P" OR $ls_estsolvia=="C") // Modificada por Ofimatica de Venezuela el 09-05-2011, agregada esta condicion, ya que la solicitud de pago de viaticos se puede imprimir antes de su aprobacion, ya que muchas veces la aprobacion de dichas solicitudes de pago estan en el departamento de presupuesto, pero estas requieren el fisico (la impresion) de dicha solicitud de pago (Calculo)
{
print "";
$ls_codsolvia=$data["codsolvia"][$z];
$ls_codmis= $data["codmis"][$z];
$ls_denmis= $data["denmis"][$z];
$ls_codrut= $data["codrut"][$z];
$ls_desrut= $data["desrut"][$z];
$ld_fecsolvia= $data["fecsolvia"][$z];
$ls_coduniadm= $data["coduniadm"][$z];
$ls_denuniadm= $data["denuniadm"][$z];
$ld_fecsalvia= $data["fecsalvia"][$z];
$ld_fecregvia= $data["fecregvia"][$z];
$ls_obssolvia= $data["obssolvia"][$z];
$li_numdiavia= $data["numdiavia"][$z];
$li_solviaext= $data["solviaext"][$z];
$ld_fecsolvia=$io_fun->uf_convertirfecmostrar($ld_fecsolvia);
$ld_fecsalvia=$io_fun->uf_convertirfecmostrar($ld_fecsalvia);
$ld_fecregvia=$io_fun->uf_convertirfecmostrar($ld_fecregvia);
$li_numdiavia=number_format($li_numdiavia,2,',','.');
print "| ".$ls_codsolvia." | ";
print "".$data["desc_estsolvia"][$z]." | ";
print "".$data["destipovia"][$z]." | ";
print "".$ld_fecsolvia." | ";
print "".$ls_denmis." | ";
print "".$ls_desrut." | ";
print " | ";
print "
";
}
break;
case "REPORTESOLICITUDPAGOHASTA":
$ls_estsolvia= $data["estsolvia"][$z];
if($ls_estsolvia=="P" OR $ls_estsolvia=="C") // Modificada por Ofimatica de Venezuela el 09-05-2011, agregada esta condicion, ya que la solicitud de pago de viaticos se puede imprimir antes de su aprobacion, ya que muchas veces la aprobacion de dichas solicitudes de pago estan en el departamento de presupuesto, pero estas requieren el fisico (la impresion) de dicha solicitud de pago (Calculo)
{
print "";
$ls_codsolvia=$data["codsolvia"][$z];
$ls_codmis= $data["codmis"][$z];
$ls_denmis= $data["denmis"][$z];
$ls_codrut= $data["codrut"][$z];
$ls_desrut= $data["desrut"][$z];
$ld_fecsolvia= $data["fecsolvia"][$z];
$ls_coduniadm= $data["coduniadm"][$z];
$ls_denuniadm= $data["denuniadm"][$z];
$ld_fecsalvia= $data["fecsalvia"][$z];
$ld_fecregvia= $data["fecregvia"][$z];
$ls_obssolvia= $data["obssolvia"][$z];
$li_numdiavia= $data["numdiavia"][$z];
$li_solviaext= $data["solviaext"][$z];
$ld_fecsolvia=$io_fun->uf_convertirfecmostrar($ld_fecsolvia);
$ld_fecsalvia=$io_fun->uf_convertirfecmostrar($ld_fecsalvia);
$ld_fecregvia=$io_fun->uf_convertirfecmostrar($ld_fecregvia);
$li_numdiavia=number_format($li_numdiavia,2,',','.');
print "| ".$ls_codsolvia." | ";
print "".$data["desc_estsolvia"][$z]." | ";
print "".$data["destipovia"][$z]." | ";
print "".$ld_fecsolvia." | ";
print "".$ls_denmis." | ";
print "".$ls_desrut." | ";
print " | ";
print "
";
}
break;
}
}
}
else
{
$io_msg->message("No hay registros");
}
}
print "
";
?>