public function cargarCuentas()
{
global $conexionbd;
$this->servidor = $_SESSION['sigesp_servidor_apr'];
$this->usuario = $_SESSION['sigesp_usuario_apr'];
$this->clave = $_SESSION['sigesp_clave_apr'];
$this->basedatos = $_SESSION['sigesp_basedatos_apr'];
$this->gestor = $_SESSION['sigesp_gestor_apr'];
$this->tipoconexionbd = 'ALTERNA';
$this->seleccionarConexion(&$conexionbd);
$consulta = " SELECT spg_cuenta " . " FROM saf_catalogo " . " WHERE trim(spg_cuenta)<>'' " . "UNION " . "SELECT spg_cuenta_act as spg_cuenta " . " FROM saf_activo " . " WHERE trim(spg_cuenta_act)<>'' " . "UNION " . "SELECT spg_cuenta_dep as spg_cuenta " . " FROM saf_activo " . " WHERE trim(spg_cuenta_dep)<>'' " . "UNION " . "SELECT spg_cuenta " . " FROM sigesp_cargos " . " WHERE trim(spg_cuenta)<>'' " . "UNION " . "SELECT spg_cuenta " . " FROM siv_articulo " . " WHERE trim(spg_cuenta)<>'' " . "UNION " . "SELECT spg_cuenta " . " FROM sep_conceptos " . " WHERE trim(spg_cuenta)<>'' " . "UNION " . "SELECT spg_cuenta " . " FROM soc_servicios " . " WHERE trim(spg_cuenta)<>'' " . "UNION " . "SELECT cueprecon as spg_cuenta " . " FROM sno_concepto " . " WHERE trim(cueprecon)<>'' " . "UNION " . "SELECT cueprepatcon as spg_cuenta " . " FROM sno_concepto " . " WHERE trim(cueprepatcon)<>'' " . "UNION " . "SELECT cueprecon as spg_cuenta " . " FROM sno_hconcepto " . " WHERE trim(cueprecon)<>'' " . "UNION " . "SELECT cueprepatcon as spg_cuenta " . " FROM sno_hconcepto " . " WHERE trim(cueprepatcon)<>'' " . " GROUP BY spg_cuenta " . " ORDER BY spg_cuenta ";
$result = $conexionbd->Execute($consulta);
if ($result === false) {
$this->valido = false;
$cadena = 'Error al Seleccionar las Cuentas Presupuestarias.' . '' . $conexionbd->ErrorMsg();
} else {
$arreglo = array();
$j = 0;
while (!$result->EOF) {
$this->spgcuentaorigen = validarTexto($result->fields['spg_cuenta'], 0, 25, '');
$this->spgcuentadestino = '';
$arreglo[$j]['origen'] = $result->fields['spg_cuenta'];
$resultDestino = $this->cargarCuentaDestino();
if (TRIM($arreglo[$j]['origen']) == TRIM($resultDestino->fields['spg_cuentaorigen'])) {
$arreglo[$j]['destino'] = $resultDestino->fields['spg_cuentadestino'];
} else {
$arreglo[$j]['destino'] = '';
}
$j++;
$result->MoveNext();
}
}
return $arreglo;
}
public function cargarCuentas()
{
global $conexionbd;
$this->servidor = $_SESSION['sigesp_servidor_apr'];
$this->usuario = $_SESSION['sigesp_usuario_apr'];
$this->clave = $_SESSION['sigesp_clave_apr'];
$this->basedatos = $_SESSION['sigesp_basedatos_apr'];
$this->gestor = $_SESSION['sigesp_gestor_apr'];
$this->tipoconexionbd = 'ALTERNA';
$this->seleccionarConexion(&$conexionbd);
$consulta = " SELECT c_resultad as sc_cuentaorigen" . " FROM sigesp_empresa " . " WHERE trim(c_resultad)<>'' " . "UNION " . "SELECT c_resultan as sc_cuentaorigen" . " FROM sigesp_empresa " . " WHERE trim(c_resultan)<>'' " . "UNION " . "SELECT scctaben as sc_cuentaorigen" . " FROM sigesp_empresa " . " WHERE trim(scctaben)<>'' " . "UNION " . "SELECT c_financiera as sc_cuentaorigen" . " FROM sigesp_empresa " . " WHERE trim(c_financiera)<>'' " . "UNION " . "SELECT c_fiscal as sc_cuentaorigen" . " FROM sigesp_empresa " . " WHERE trim(c_fiscal)<>'' " . "UNION " . "SELECT sc_cuenta as sc_cuentaorigen" . " FROM rpc_proveedor " . " WHERE trim(sc_cuenta)<>'' " . "UNION " . "SELECT sc_cuenta as sc_cuentaorigen" . " FROM rpc_beneficiario " . " WHERE trim(sc_cuenta)<>'' " . "UNION " . "SELECT sc_cuenta as sc_cuentaorigen" . " FROM saf_activo " . " WHERE trim(sc_cuenta)<>'' " . "UNION " . "SELECT sc_cuenta as sc_cuentaorigen" . " FROM sigesp_deducciones " . " WHERE trim(sc_cuenta)<>'' " . "UNION " . "SELECT sc_cuenta as sc_cuentaorigen" . " FROM siv_articulo " . " WHERE trim(sc_cuenta)<>'' " . "UNION " . "SELECT sc_cuenta as sc_cuentaorigen" . " FROM scb_ctabanco " . " WHERE trim(sc_cuenta)<>'' " . "UNION " . "SELECT sc_cuenta as sc_cuentaorigen" . " FROM scb_colocacion " . " WHERE trim(sc_cuenta)<>'' " . "UNION " . "SELECT sc_cuenta as sc_cuentaorigen" . " FROM sno_beneficiario " . " WHERE trim(sc_cuenta)<>'' " . "UNION " . "SELECT cueconnom as sc_cuentaorigen" . " FROM sno_nomina " . " WHERE trim(cueconnom)<>'' " . "UNION " . "SELECT cueaboper as sc_cuentaorigen" . " FROM sno_personalnomina " . " WHERE trim(cueaboper)<>'' " . "UNION " . "SELECT cueconcon as sc_cuentaorigen" . " FROM sno_concepto " . " WHERE trim(cueconcon)<>'' " . "UNION " . "SELECT cueconpatcon as sc_cuentaorigen" . " FROM sno_concepto " . " WHERE trim(cueconpatcon)<>'' " . "UNION " . "SELECT cueconnom as sc_cuentaorigen" . " FROM sno_hnomina " . " WHERE trim(cueconnom)<>'' " . "UNION " . "SELECT cueaboper as sc_cuentaorigen" . " FROM sno_hpersonalnomina " . " WHERE trim(cueaboper)<>'' " . "UNION " . "SELECT cueconcon as sc_cuentaorigen" . " FROM sno_hconcepto " . " WHERE trim(cueconcon)<>'' " . "UNION " . "SELECT cueconpatcon as sc_cuentaorigen" . " FROM sno_hconcepto " . " WHERE trim(cueconpatcon)<>'' " . " GROUP BY sc_cuentaorigen " . " ORDER BY sc_cuentaorigen ";
$result = $conexionbd->Execute($consulta);
if ($result === false) {
$this->valido = false;
$cadena = 'Error al Seleccionar las Cuentas Contables.' . '' . $conexionbd->ErrorMsg();
} else {
$arreglo = array();
$j = 0;
while (!$result->EOF) {
$this->sccuentaorigen = validarTexto($result->fields['sc_cuentaorigen'], 0, 25, '');
$this->sccuentadestino = '';
$arreglo[$j]['origen'] = $result->fields['sc_cuentaorigen'];
$resultDestino = $this->cargarCuentaDestino();
if (TRIM($arreglo[$j]['origen']) == TRIM($resultDestino->fields['scg_cuentaorigen'])) {
$arreglo[$j]['destino'] = $resultDestino->fields['scg_cuentadestino'];
} else {
$arreglo[$j]['destino'] = '';
}
$j++;
$result->MoveNext();
}
}
return $arreglo;
}
public function procesarEstructuras()
{
global $conexionbd;
$this->mensaje = 'Proceso la actualización de las estructuras presupuestarias';
$conexionbd->StartTrans();
try {
$consulta = " SELECT ep1origen, ep2origen, ep3origen, ep4origen, ep5origen, ep1destino, ep2destino, ep3destino, ep4destino, ep5destino " . " FROM apr_estructurapresupuestaria ";
$resultestructura = $conexionbd->Execute($consulta);
if ($resultestructura === false) {
$this->valido = false;
$cadena = 'Error al Seleccionar las las Estructuras Presupuestarias.' . '' . $conexionbd->ErrorMsg();
} else {
while (!$resultestructura->EOF) {
$ep1ant = validarTexto($resultestructura->fields['ep1origen'], 0, 20, '');
$ep2ant = validarTexto($resultestructura->fields['ep2origen'], 0, 6, '');
$ep3ant = validarTexto($resultestructura->fields['ep3origen'], 0, 3, '');
$ep4ant = validarTexto($resultestructura->fields['ep4origen'], 0, 2, '');
$ep5ant = validarTexto($resultestructura->fields['ep5origen'], 0, 2, '');
$ep1act = validarTexto($resultestructura->fields['ep1destino'], 0, 20, '');
$ep2act = validarTexto($resultestructura->fields['ep2destino'], 0, 6, '');
$ep3act = validarTexto($resultestructura->fields['ep3destino'], 0, 3, '');
$ep4act = validarTexto($resultestructura->fields['ep1destino'], 0, 2, '');
$ep5act = validarTexto($resultestructura->fields['ep1destino'], 0, 2, '');
$consulta = " UPDATE saf_activo " . " SET codestpro1='" . $ep1act . "'," . " codestpro2='" . $ep2act . "', " . " codestpro3='" . $ep3act . "', " . " codestpro4='" . $ep4act . "', " . " codestpro5='" . $ep5act . "' " . " WHERE codestpro1='" . $ep1ant . "' " . " AND codestpro2='" . $ep2ant . "' " . " AND codestpro3='" . $ep3ant . "' " . " AND codestpro4='" . $ep4ant . "' " . " AND codestpro5='" . $ep5ant . "' ";
$result = $conexionbd->Execute($consulta);
if (is_object($result)) {
$consulta = " UPDATE sno_asignacioncargo " . " SET codproasicar='" . $ep1act . $ep2act . $ep3act . $ep4act . $ep5act . "'" . " WHERE codproasicar='" . $ep1ant . $ep2ant . $ep3ant . $ep4ant . $ep5ant . "'";
$result = $conexionbd->Execute($consulta);
}
if (is_object($result)) {
$consulta = " UPDATE sigesp_cargos " . " SET codestpro='" . $ep1act . $ep2act . $ep3act . $ep4act . $ep5act . "'" . " WHERE codestpro='" . $ep1ant . $ep2ant . $ep3ant . $ep4ant . $ep5ant . "'";
$result = $conexionbd->Execute($consulta);
}
if (is_object($result)) {
$consulta = " UPDATE sno_concepto " . " SET codpro='" . $ep1act . $ep2act . $ep3act . $ep4act . $ep5act . "'" . " WHERE codpro='" . $ep1ant . $ep2ant . $ep3ant . $ep4ant . $ep5ant . "'";
$result = $conexionbd->Execute($consulta);
}
if (is_object($result)) {
$consulta = " UPDATE sno_hconcepto " . " SET codpro='" . $ep1act . $ep2act . $ep3act . $ep4act . $ep5act . "'" . " WHERE codpro='" . $ep1ant . $ep2ant . $ep3ant . $ep4ant . $ep5ant . "'";
$result = $conexionbd->Execute($consulta);
}
if (is_object($result)) {
$consulta = " UPDATE sno_proyecto " . " SET estproproy='" . $ep1act . $ep2act . $ep3act . $ep4act . $ep5act . "'" . " WHERE estproproy='" . $ep1ant . $ep2ant . $ep3ant . $ep4ant . $ep5ant . "'";
$result = $conexionbd->Execute($consulta);
}
if (is_object($result)) {
$consulta = " UPDATE sno_hproyecto " . " SET estproproy='" . $ep1act . $ep2act . $ep3act . $ep4act . $ep5act . "'" . " WHERE estproproy='" . $ep1ant . $ep2ant . $ep3ant . $ep4ant . $ep5ant . "'";
$result = $conexionbd->Execute($consulta);
}
if (is_object($result)) {
$consulta = " UPDATE sno_unidadadmin " . " SET codprouniadm='" . $ep1act . $ep2act . $ep3act . $ep4act . $ep5act . "'" . " WHERE codprouniadm='" . $ep1ant . $ep2ant . $ep3ant . $ep4ant . $ep5ant . "'";
$result = $conexionbd->Execute($consulta);
}
if (is_object($result)) {
$consulta = " UPDATE sno_hunidadadmin " . " SET codprouniadm='" . $ep1act . $ep2act . $ep3act . $ep4act . $ep5act . "'" . " WHERE codprouniadm='" . $ep1ant . $ep2ant . $ep3ant . $ep4ant . $ep5ant . "'";
$result = $conexionbd->Execute($consulta);
}
if (is_object($result)) {
$consulta = " UPDATE spg_unidadadministrativa " . " SET codestpro1='" . $ep1act . "'," . " codestpro2='" . $ep2act . "', " . " codestpro3='" . $ep3act . "', " . " codestpro4='" . $ep4act . "', " . " codestpro5='" . $ep5act . "' " . " WHERE codestpro1='" . $ep1ant . "' " . " AND codestpro2='" . $ep2ant . "' " . " AND codestpro3='" . $ep3ant . "' " . " AND codestpro4='" . $ep4ant . "' " . " AND codestpro5='" . $ep5ant . "' ";
$result = $conexionbd->Execute($consulta);
}
$resultestructura->MoveNext();
}
}
} catch (exception $e) {
$this->valido = false;
$this->mensaje = 'Ocurrio un error en la Transferencia. ' . $conexionbd->ErrorMsg();
escribirArchivo($this->archivo, '* Ocurrio un error en la Transferencia. ');
escribirArchivo($this->archivo, '* Error ' . $conexionbd->ErrorMsg());
escribirArchivo($this->archivo, '*******************************************************************************************************');
}
$conexionbd->CompleteTrans();
$this->incluirSeguridad('PROCESAR', $this->valido);
}
public function insertarMovimientoInicial()
{
global $conexionbd;
//$conexionbd->debug = 1;
$conexionbdorigen = conectarBD($_SESSION['sigesp_servidor'], $_SESSION['sigesp_usuario'], $_SESSION['sigesp_clave'], $_SESSION['sigesp_basedatos'], $_SESSION['sigesp_gestor']);
$this->mensaje = 'Inserto el movimiento inicial de existencias de inventario';
//$conexionbd->StartTrans();
try {
//$this->seleccionarConexion(&$conexionbd);
$consulta = " SELECT codemp,codart,codalm,SUM(existencia) AS existencia, \t\t\t\t" . "\t\t(SELECT ultcosart FROM siv_articulo \t\t\t\t\t\t\t\t" . " WHERE siv_articuloalmacen.codemp=siv_articulo.codemp \t\t\t\t" . " AND siv_articuloalmacen.codart=siv_articulo.codart) AS ultcosart \t" . " FROM siv_articuloalmacen \t\t\t\t\t\t\t\t\t\t\t\t\t" . " WHERE existencia > 0 \t\t\t\t\t\t\t\t\t\t\t\t\t\t" . " GROUP BY codemp,codart,codalm \t\t\t\t\t\t\t\t\t\t\t";
$result = $conexionbdorigen->Execute($consulta);
if ($result === false) {
escribirArchivo($this->archivo, '* Error al Seleccionar los Artículos por Almacen. ' . $conexionbd->ErrorMsg());
$this->valido = false;
} elseif (!$result->EOF) {
$comprobante = '000000000000001';
//$fecha = '';
$this->periodo = '';
$solicitante = 'Apertura';
/*$this->servidor = $_SESSION['sigesp_servidor'];
$this->usuario = $_SESSION['sigesp_usuario'];
$this->clave = $_SESSION['sigesp_clave'];
$this->basedatos = $_SESSION['sigesp_basedatos'];
$this->gestor = $_SESSION['sigesp_gestor'];
$this->tipoconexionbd = 'ALTERNA';*/
$this->seleccionarPeriodo();
//$this->seleccionarConexion(&$conexionbd);
$conexionbd->StartTrans();
$consultamov = " INSERT INTO siv_movimiento (nummov,fecmov,nomsol,codusu) " . " VALUES ('" . $comprobante . "','" . $this->periodo . "','" . $solicitante . "','" . $this->codusu . "')";
$resultmov = $conexionbd->Execute($consultamov);
if (!is_object($resultmov)) {
escribirArchivo($this->archivo, '* Error al Insertar el Movimiento Inicial ' . $conexionbd->ErrorMsg());
$this->valido = false;
}
}
while (!$result->EOF) {
$codemp = validarTexto($result->fields['codemp'], 0, 4, '');
$nummov = $comprobante;
$fecmov = $this->periodo;
$codart = validarTexto($result->fields['codart'], 0, 20, '');
$codalm = validarTexto($result->fields['codalm'], 0, 10, '');
$opeinv = 'ENT';
$codprodoc = 'APR';
$numdoc = $comprobante;
$canart = $result->fields['existencia'];
//validar monto!!!!
$cosart = $result->fields['ultcosart'];
$promov = 'APE';
$numdocori = $comprobante;
$candesart = $result->fields['existencia'];
$fecdesart = $this->periodo;
$cosart = $result->fields['ultcosart'];
if ($canart > 0) {
$consulta = " INSERT INTO siv_dt_movimiento (codemp, nummov, fecmov, codart, \t" . "\t\tcodalm, opeinv, codprodoc, numdoc, canart, cosart, \t\t\t" . "\t\tpromov, numdocori, candesart, fecdesart) \t\t\t\t\t" . " VALUES ('" . $codemp . "','" . $nummov . "','" . $fecmov . "','" . $codart . "', \t" . "\t\t'" . $codalm . "','" . $opeinv . "','" . $codprodoc . "','" . $numdoc . "', " . "\t\t" . $canart . "," . $cosart . ",'" . $promov . "','" . $numdocori . "', \t" . "\t\t" . $candesart . ",'" . $fecdesart . "')\t\t\t\t\t\t\t";
$resultdt = $conexionbd->Execute($consulta);
if (!is_object($resultdt)) {
escribirArchivo($this->archivo, '* Error al Insertar los Detalles del movimiento inicial ' . $conexionbd->ErrorMsg());
$this->valido = false;
}
$consulta = " INSERT INTO siv_articuloalmacen (codemp, codart, codalm, existencia) " . " VALUES ('" . $codemp . "','" . $codart . "','" . $codalm . "'," . $canart . ") ";
$resultdt = $conexionbd->Execute($consulta);
if (!is_object($resultdt)) {
escribirArchivo($this->archivo, '* Error al Insertar los Artículos por almacén. ' . $conexionbd->ErrorMsg());
$this->valido = false;
}
}
$result->MoveNext();
}
escribirArchivo($this->archivo, '*******************************************************************************************************');
escribirArchivo($this->archivo, 'El Movimiento Inicial de Inventario se Creo con Exito');
escribirArchivo($this->archivo, '*******************************************************************************************************');
} catch (exception $e) {
$this->valido = false;
$this->mensaje = 'Ocurrio un error en la Transferencia. ' . $conexionbd->ErrorMsg();
escribirArchivo($this->archivo, '* Ocurrio un error en la Transferencia. ');
escribirArchivo($this->archivo, '* Error ' . $conexionbd->ErrorMsg());
escribirArchivo($this->archivo, '*******************************************************************************************************');
}
$conexionbd->CompleteTrans();
$this->incluirSeguridad('PROCESAR', $this->valido);
}
