msg=new class_mensajes(); } function uf_conectar($usuario,$clave,$host,$SID) { putenv("ORACLE_HOME=/usr/lib/oracle/xe/app/oracle/product/10.2.0/server"); putenv("LD_LIBRARY_PATH=/usr/lib/oracle/xe/app/oracle/product/10.2.0/server/lb"); $conec=&ADONewConnection("oci8"); $conec->connectSID = true; $conec->Connect($host,$usuario,$clave, $SID); //$conec->debug = true; $conec->SetFetchMode(ADODB_FETCH_ASSOC); if($conec===false) { $this->msg->message("No pudo conectar al servidor de base de datos, contacte al administrador del sistema"); exit(); } return $conec; } } $io_conect = new sigesp_include(); $io_conexion = $io_conect->uf_conectar('SYSTEM','sudeseg','200.109.99.5:1523','saesp'); $io_sql = new class_sql($io_conexion); $ls_sql = " SELECT * FROM ( SELECT comc_division || comc_grupo || comc_sub_grupo || comc_cuenta || comc_sub_cuenta_1 || comc_sub_cuenta_2 || comc_sub_cuenta_3 AS sc_cuenta,COMC_DE_CUENTA_CONTABLE,COMC_TP_CUENTA,COMC_COAA_TP_AUXILIAR_1,COMC_COAA_TP_AUXILIAR_2, ROWNUM AS FILAS FROM cont_maestros_contables WHERE comc_cjcm_cd_compania=1 ORDER BY comc_division,comc_grupo,comc_sub_grupo,comc_cuenta, comc_sub_cuenta_1,comc_sub_cuenta_2,comc_sub_cuenta_3 )WHERE ROWNUM < 20 "; $rs=$io_sql->select($ls_sql); if ($rs===false){ echo $io_sql->message; return false; } foreach($rs as $fila){ echo $fila['COMC_DE_CUENTA_CONTABLE'].' - '.$fila['SC_CUENTA'].'
'; } ?>