Catálogo de Movimientos Bancarios

Catálogo de Movimientos Bancarios

Documento	Fecha	Desde
Tipo		Hasta
Operación		Estatus
Carta Orden
Buscar

"; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; if ($ls_operacion=="BUSCAR") { $ls_sql = "SELECT scb_movbco.codemp,scb_movbco.codban,scb_movbco.ctaban,scb_movbco.numdoc,scb_movbco.numordpagmin,benefalt, ". " scb_movbco.codope,scb_movbco.estmov,scb_movbco.cod_pro,scb_movbco.ced_bene, ". " scb_movbco.tipo_destino,scb_movbco.codconmov,scb_movbco.fecmov,scb_movbco.conmov, ". " scb_movbco.nomproben,scb_movbco.monto,scb_movbco.estcon,scb_movbco.estcobing, ". " scb_movbco.chevau,scb_movbco.estimpche,scb_movbco.monobjret,scb_movbco.monret, ". " scb_movbco.procede,scb_movbco.estmovint,scb_movbco.numcarord,scb_banco.nomban, ". " scb_ctabanco.dencta,scb_ctabanco.sc_cuenta,scb_cheques.numchequera,scb_movbco.codtipfon,scb_movbco.estmovcob,scb_movbco.numconint,scb_movbco.tranoreglib,scb_movbco.conanu, ". " (SELECT MAX(codfuefin) ". " FROM scb_movbco_fuefinanciamiento ". " WHERE codemp = scb_movbco.codemp ". " AND codban = scb_movbco.codban ". " AND ctaban = scb_movbco.ctaban ". " AND numdoc = scb_movbco.numdoc ". " AND codope = scb_movbco.codope ". " AND estmov = scb_movbco.estmov) AS fuentefinanciamiento, ". " (SELECT scb_tipofondo.dentipfon FROM scb_tipofondo WHERE scb_tipofondo.codemp=scb_movbco.codemp AND scb_tipofondo.codtipfon=scb_movbco.codtipfon) as dentipfon, scb_movbco.codmon,scb_movbco.tascam,sigesp_moneda.denmon ". " FROM scb_movbco LEFT JOIN sigesp_moneda ON sigesp_moneda.codmon = scb_movbco.codmon LEFT JOIN scb_cheques ". " ON scb_movbco.codemp=scb_cheques.codemp ". " AND scb_movbco.codban=scb_cheques.codban ". " AND scb_movbco.ctaban=scb_cheques.ctaban ". " AND scb_movbco.numdoc=scb_cheques.numche, scb_banco, scb_ctabanco ". " WHERE scb_movbco.codemp='".$as_codemp."' ". " AND scb_movbco.numdoc like '".$ls_documento."' ". " AND scb_movbco.codope<>'OP' ". " AND scb_movbco.codemp=scb_banco.codemp ". " AND scb_movbco.codban=scb_banco.codban ". " AND scb_movbco.codemp=scb_ctabanco.codemp ". " AND scb_movbco.codban=scb_ctabanco.codban ". " AND scb_movbco.ctaban=scb_ctabanco.ctaban"; if((($ls_fecdesde!="")&&($ls_fecdesde!="01/01/1900"))&&(($ls_fechasta!="")&&($ls_fechasta!="01/01/1900"))) { $ls_fecdesde=$fun->uf_convertirdatetobd($ls_fecdesde); $ls_fechasta=$fun->uf_convertirdatetobd($ls_fechasta); $ls_sql=$ls_sql." AND scb_movbco.fecmov>='".$ls_fecdesde."' AND scb_movbco.fecmov<='".$ls_fechasta."'"; } if($ls_codope!="N") { $ls_sql=$ls_sql." AND scb_movbco.codope ='".$ls_codope."'"; } if(($ls_tipo=="P")&&($ls_provben!="")) { $ls_sql=$ls_sql." AND scb_movbco.cod_pro like '".$ls_provben."'"; } elseif(($ls_tipo=="B")&&($ls_provben!="")) { $ls_sql=$ls_sql." AND scb_movbco.ced_bene like'".$ls_provben."'"; } if($ls_estmov!="-") { $ls_sql=$ls_sql." AND scb_movbco.estmov='".$ls_estmov."'"; } if($ls_opener=='sigesp_scb_p_pago_directo.php') { $ls_sql=$ls_sql." AND scb_movbco.estbpd='D'"; } if ($ls_cartaorden!="%%") { $ls_sql=$ls_sql." AND scb_movbco.numcarord like '".$ls_cartaorden."'";; } $ls_sql=$ls_sql." ORDER BY scb_movbco.fecmov ASC,scb_movbco.numdoc ASC"; //echo $ls_sql; $rs_data = $SQL_mov->select($ls_sql);//print $ls_sql; if ($rs_data===false) { $io_msg->message("Error en select movimiento de banco !!!"); echo $SQL_mov->message; } else { $li_totrows = $SQL_mov->num_rows($rs_data); if ($li_totrows>0) { $idfila = 1; while($row=$SQL_mov->fetch_row($rs_data)) { $ls_documento = $row["numdoc"]; $ls_codope = $row["codope"]; $ls_fecha = $fun->uf_formatovalidofecha($row["fecmov"]); $ls_fecha = $fun->uf_convertirfecmostrar($ls_fecha); $ls_estcon = $row["estcon"]; $ls_descripcion = $row["conmov"]; $ldec_monto = $row["monto"]; $ldec_monobjret = $row["monobjret"]; $ldec_monret = $row["monret"]; $ls_procedencia = $row["procede"]; $ls_voucher = $row["chevau"]; $ls_prov = $row["cod_pro"]; $ls_bene = $row["ced_bene"]; $ls_provbene = $row["nomproben"]; $ls_numchequera = $row["numchequera"]; $ls_codban = $row["codban"]; $ls_nomban = $row["nomban"]; $ls_ctaban = $row["ctaban"]; $ls_dencta = $row["dencta"]; $ls_estmov = $row["estmov"]; $ls_cuenta_scg = $row["sc_cuenta"]; $ls_codfuefin = $row["fuentefinanciamiento"]; $li_cobing = $row["estcobing"]; $li_estint = $row["estmovint"]; $li_estcob = $row["estmovcob"]; $ls_codconmov = $row["codconmov"]; $li_estimpche = $row["estimpche"]; $ls_tipo_destino = $row["tipo_destino"]; $ls_numcarord = $row["numcarord"]; $ls_codtipfon = $row["codtipfon"]; $ls_numordpagmin = $row["numordpagmin"]; $ls_numconint = $row["numconint"]; $ls_estreglib = $row["tranoreglib"]; if ($ls_numordpagmin=='-') { $ls_numordpagmin = ""; } $ls_dentipfon = $row["dentipfon"]; $ls_conanu = $row["conanu"]; $io_ctabanco->uf_verificar_saldo($ls_codban,$ls_ctaban,$ldec_saldo); $ldec_saldo = number_format($ldec_saldo,2,",","."); $tascam = number_format($row["tascam"],2,",","."); if($row["benefalt"]){$ls_descripcion .= '
BENEF. ALT:'.$row["benefalt"];} print ""; print ""; print ""; print ""; print ""; print '"; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print '"; print ""; print '"; print ""; print ""; print "'; print ""; $idfila++; } $SQL_mov->free_result($rs_data); } else { $io_msg->message("No se han creado Movimientos Bancarios en el periodo Seleccionado"); } } } print "

"; print "

Documento

Ope.

Est.

Fecha

Concepto

Monto

Monto Obj.Ret.

Monto Ret.

Procede

Voucher

Proveedor

Beneficiario

Nombre Prov.\Benef.

Banco

Nombre Banco

Cuenta

Denominación Cuenta

Carta Orden

".$ls_documento."

".$ls_codope."

".$ls_estmov."

".$ls_fecha."

'.$ls_descripcion."

".number_format($ldec_monto,2,",",".")."

".number_format($ldec_monobjret,2,",",".")."

".number_format($ldec_monret,2,",",".")."

".$ls_procedencia."

".$ls_voucher."

".$ls_prov."

".$ls_bene."

'.$ls_provbene."

".$ls_codban."

'.$ls_nomban."

".$ls_ctaban."

".$ls_dencta."

".$ls_numcarord.'

"; ?>