$formato_obj = "v1'|',v10'|',v20'|',v30'|',v40'|',v50'|',v60'|',v100'|',f(mfn,1,0)/"; $query = "&Expresion=TRANS_M_" . $arrHttp["usuario"] . "&base=suspml&cipar={$db_path}" . "par/suspml.par&Pft=" . $formato_obj; $IsisScript = $xWxis . "cipres_usuario.xis"; include "../common/wxis_llamar.php"; $multa = array(); foreach ($contenido as $linea) { // echo $linea."<br>"; $multa[] = $linea; } $nmulta = 0; if (count($multa) > 0) { $sanctions_output .= "<br><strong>" . $msgstr["fine"] . "</strong>\r\n\t\t<table width=95% bgcolor=#cccccc><th>" . $msgstr["status"] . "</th>\r\n\t\t<th>" . $msgstr["date"] . "</th><th>" . $msgstr["concept"] . "</th><th>" . $msgstr["amount"] . "</th><th>" . $msgstr["comments"] . "</th>"; foreach ($multa as $linea) { $p = explode("|", $linea); $nmulta = $nmulta + 1; $fecha1 = PrepararFecha($p[3]); $sanctions_output .= "<tr><td bgcolor=white align=center valign=top>" . $status[$p[1]] . "</td>\r\n\t\t\t\t<td bgcolor=white nowrap align=center valign=top>" . $fecha1 . "</td><td bgcolor=white nowrap align=center valign=top>" . $p[4] . "</td><td bgcolor=white nowrap align=center valign=top>" . $p[5] . "<td bgcolor=white valign=top>" . $p[7] . "</td>"; } $sanctions_output .= "</table>"; } if ($sanctions_output != "" and isset($arrHttp["inventory"])) { $ec_output .= "<font color=red><strong>" . $msgstr["pending_sanctions"] . "</strong></font>"; } ProduceOutput($ec_output . $sanctions_output); //===================================================================================== function ProduceOutput($ec_output) { global $msgstr, $arrHttp, $reservas_p, $signatura, $posicion_cola, $msg_1, $cont, $institution_name, $db_path; include "../common/header.php"; echo "<body>"; include "../common/institutional_info.php";
$Expresion = urlencode($Expresion); $pft_inventory = LeerPft("loans_inventorynumber.pft"); $pft_inventory = "(" . $pft_inventory . "/)"; $query = "&Opcion=disponibilidad&base={$catalog_db}&cipar={$db_path}" . "par/{$catalog_db}.par&Expresion=" . $Expresion . "&Pft={$pft_inventory}"; include "../common/wxis_llamar.php"; foreach ($contenido as $val) { if (trim($val) != "") { ShowItems($val); } } echo "</table>"; echo "<p>"; echo "</div></div>"; include "../common/footer.php"; echo "</body></html>"; function ShowItems($item) { if (substr($item, 0, 8) != '$$TOTAL:') { $l = explode('$$$', $item); echo "<tr><td bgcolor=white></td>"; echo "<td bgcolor=white>" . $l[0] . "</td>";
<div class="formContent"> <form name=sanctions method=post action=sanctions_update.php onSubmit="return false"> <?php // se presenta la información del usuario $formato_us = $db_path . "users/loans/" . $_SESSION["lang"] . "/loans_usdisp.pft"; if (!isset($formato_us)) { $formato_us = $db_path . "users/loans/" . $lang_db . "/loans_usdisp.pft"; } $query = "&Expresion=CO_" . $arrHttp["usuario"] . "&base=users&cipar={$db_path}/par/users.par&Formato=" . $formato_us; $contenido = ""; $IsisScript = $xWxis . "cipres_usuario.xis"; include "../common/wxis_llamar.php"; foreach ($contenido as $linea) { echo $linea . "\n"; } include "sanctions_read.php"; //se incluye el procedimiento para leer las sanciones $fecha_exp = ""; $fecha_dia = PrepararFecha(date("Ymd")); $fecha_exp = $fecha_dia; if (count($susp) > 0) { // se determina el vencimiento de la última sanción $sancion = $susp[count($susp) - 1]; $p = explode("|", $sancion); if ($p[6] > $fecha_dia) { $exp_date = mktime(0, 0, 0, substr($p[6], 4, 2), substr($p[6], 6, 2) + 1, substr($p[6], 0, 4)); $exp_date = date("Ymd", $exp_date); $fecha_exp = PrepararFecha($exp_date); } else { $fecha_exp = $fecha_dia; }