PageRenderTime 57ms CodeModel.GetById 20ms RepoModel.GetById 1ms app.codeStats 0ms

/diezmotabla.php

https://github.com/fredd-for/emaus_tesoreria
PHP | 685 lines | 482 code | 94 blank | 109 comment | 80 complexity | 1a2dfbd9399a7739c0ea94100735f5e5 MD5 | raw file
Possible License(s): LGPL-2.1
  1. <?php
  2. session_start(); // Initialize session data
  3. ob_start(); // Turn on output buffering
  4. ?>
  5. <?php include "ewcfg6.php" ?>
  6. <?php include "ewmysql6.php" ?>
  7. <?php include "phpfn6.php" ?>
  8. <?php include "diezmoinfo.php" ?>
  9. <?php include "usuarioinfo.php" ?>
  10. <?php include "userfn6.php" ?>
  11. <?php include "Connections/conexion.php" ?>
  12. <?php
  13. header("Expires: Mon, 26 Jul 1997 05:00:00 GMT"); // Date in the past
  14. header("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT"); // Always modified
  15. header("Cache-Control: private, no-store, no-cache, must-revalidate"); // HTTP/1.1
  16. header("Cache-Control: post-check=0, pre-check=0", false);
  17. header("Pragma: no-cache"); // HTTP/1.0
  18. ?>
  19. <?php
  20. // Define page object
  21. $diezmo_list = new cdiezmo_list();
  22. $Page =& $diezmo_list;
  23. // Page init processing
  24. $diezmo_list->Page_Init();
  25. // Page main processing
  26. $diezmo_list->Page_Main();
  27. ?>
  28. <script type="text/javascript">
  29. $(function () {
  30. $('input#id_search').quicksearch('table table#table_example #contenidoTbody tr');
  31. });
  32. </script>
  33. <?php
  34. mysql_select_db($database_conexion, $conexion);
  35. $query_miembro = "SELECT * FROM miembro WHERE diezma=1 ORDER BY paterno, materno, nombre asc";
  36. $mostrar_miembro= mysql_query($query_miembro, $conexion) or die(mysql_error());
  37. $total_miembro= mysql_num_rows($mostrar_miembro);
  38. //echo $_GET['x_fecha'];
  39. $fechaExplode = explode("-", $_GET['x_fecha']);
  40. $x_fecha = date("Y-m-d",mktime(0,0,0,$fechaExplode[1], $fechaExplode[0], $fechaExplode[2]));
  41. ?>
  42. <table cellspacing="0" class="ewGrid"><tr><td class="ewGridContent">
  43. <div>
  44. <fieldset>
  45. BUSCAR= <input type="text" name="search" value="" id="id_search" size="50"/>
  46. </fieldset>
  47. </div>
  48. <div class="ewGridMiddlePanel">
  49. <form name="fdiezmolist" id="fdiezmolist" class="ewForm" action="diezmo_guardar.php" method="post">
  50. <table id="table_example" cellspacing="0" rowhighlightclass="ewTableHighlightRow" rowselectclass="ewTableSelectRow" roweditclass="ewTableEditRow" class="ewTable ewTableSeparate">
  51. <thead><!-- Table header -->
  52. <tr class="ewTableHeader">
  53. <td>No</td>
  54. <td>Apellidos y Nombres</td>
  55. <td>Diezmo</td>
  56. <td>TOTAL</td>
  57. </tr>
  58. </thead>
  59. <tbody id="contenidoTbody">
  60. <?php
  61. $contador=1;
  62. While($row_miembro=mysql_fetch_assoc($mostrar_miembro)){
  63. mysql_select_db($database_conexion, $conexion);
  64. $query_diezmo = "SELECT montoDiezmo FROM diezmo WHERE idMiembro='".$row_miembro['idMiembro']."' AND fecha='".$x_fecha."'";
  65. $mostrar_diezmo= mysql_query($query_diezmo, $conexion) or die(mysql_error());
  66. $row_diezmo=mysql_fetch_assoc($mostrar_diezmo);
  67. $total_diezmo= mysql_num_rows($mostrar_diezmo);
  68. ?>
  69. <tr>
  70. <td><?php echo $contador ?><input type="hidden" name="x_idMiembro<?php echo $contador?>" id="x_idMiembro<?php echo $contador?>" value="<?php echo $row_miembro['idMiembro']?>"></td>
  71. <td><?php echo utf8_encode($row_miembro['paterno']." ".$row_miembro['materno'].", ".$row_miembro['nombre']);?></td>
  72. <td><input type="text" name="x_diezmo<?php echo $contador?>" id="x_diezmo<?php echo $contador?>" size="5" value="<?php echo $row_diezmo['montoDiezmo']?>"></td>
  73. <td></td>
  74. </tr>
  75. <?php
  76. $contador++;
  77. }
  78. ?>
  79. </tbody>
  80. <tr align="center"><td colspan="4">
  81. <input type="hidden" name="x_contador" value="<?php echo $contador;?>">
  82. <input type="hidden" name="x_fecha" value="<?php echo $x_fecha;?>">
  83. <input type="submit" name="guardar" value="GUARDAR">
  84. </td></tr>
  85. </table>
  86. </form></div></td></tr></table>
  87. <?php
  88. //
  89. // Page Class
  90. //
  91. class cdiezmo_list {
  92. // Page ID
  93. var $PageID = 'list';
  94. // Table Name
  95. var $TableName = 'diezmo';
  96. // Page Object Name
  97. var $PageObjName = 'diezmo_list';
  98. // Page Name
  99. function PageName() {
  100. return ew_CurrentPage();
  101. }
  102. // Page Url
  103. function PageUrl() {
  104. $PageUrl = ew_CurrentPage() . "?";
  105. global $diezmo;
  106. if ($diezmo->UseTokenInUrl) $PageUrl .= "t=" . $diezmo->TableVar . "&"; // add page token
  107. return $PageUrl;
  108. }
  109. // Message
  110. function getMessage() {
  111. return @$_SESSION[EW_SESSION_MESSAGE];
  112. }
  113. function setMessage($v) {
  114. if (@$_SESSION[EW_SESSION_MESSAGE] <> "") { // Append
  115. $_SESSION[EW_SESSION_MESSAGE] .= "<br>" . $v;
  116. } else {
  117. $_SESSION[EW_SESSION_MESSAGE] = $v;
  118. }
  119. }
  120. // Show Message
  121. function ShowMessage() {
  122. if ($this->getMessage() <> "") { // Message in Session, display
  123. echo "<p><span class=\"ewMessage\">" . $this->getMessage() . "</span></p>";
  124. $_SESSION[EW_SESSION_MESSAGE] = ""; // Clear message in Session
  125. }
  126. }
  127. // Validate Page request
  128. function IsPageRequest() {
  129. global $objForm, $diezmo;
  130. if ($diezmo->UseTokenInUrl) {
  131. //IsPageRequest = False
  132. if ($objForm)
  133. return ($diezmo->TableVar == $objForm->GetValue("t"));
  134. if (@$_GET["t"] <> "")
  135. return ($diezmo->TableVar == $_GET["t"]);
  136. } else {
  137. return TRUE;
  138. }
  139. }
  140. //
  141. // Class initialize
  142. // - init objects
  143. // - open connection
  144. //
  145. function cdiezmo_list() {
  146. global $conn;
  147. // Initialize table object
  148. $GLOBALS["diezmo"] = new cdiezmo();
  149. // Initialize other table object
  150. $GLOBALS['usuario'] = new cusuario();
  151. // Intialize page id (for backward compatibility)
  152. if (!defined("EW_PAGE_ID"))
  153. define("EW_PAGE_ID", 'list', TRUE);
  154. // Initialize table name (for backward compatibility)
  155. if (!defined("EW_TABLE_NAME"))
  156. define("EW_TABLE_NAME", 'diezmo', TRUE);
  157. // Open connection to the database
  158. $conn = ew_Connect();
  159. // Initialize list options
  160. $this->ListOptions = new cListOptions();
  161. }
  162. //
  163. // Page_Init
  164. //
  165. function Page_Init() {
  166. global $gsExport, $gsExportFile, $diezmo;
  167. global $Security;
  168. $Security = new cAdvancedSecurity();
  169. if (!$Security->IsLoggedIn()) $Security->AutoLogin();
  170. if (!$Security->IsLoggedIn()) {
  171. $Security->SaveLastUrl();
  172. $this->Page_Terminate("login.php");
  173. }
  174. $Security->TablePermission_Loading();
  175. $Security->LoadCurrentUserLevel($this->TableName);
  176. $Security->TablePermission_Loaded();
  177. if (!$Security->IsLoggedIn()) {
  178. $Security->SaveLastUrl();
  179. $this->Page_Terminate("login.php");
  180. }
  181. if (!$Security->CanList()) {
  182. $Security->SaveLastUrl();
  183. $this->Page_Terminate("login.php");
  184. }
  185. $diezmo->Export = @$_GET["export"]; // Get export parameter
  186. $gsExport = $diezmo->Export; // Get export parameter, used in header
  187. $gsExportFile = $diezmo->TableVar; // Get export file, used in header
  188. if ($diezmo->Export == "excel") {
  189. header('Content-Type: application/vnd.ms-excel');
  190. header('Content-Disposition: attachment; filename=' . $gsExportFile .'.xls');
  191. }
  192. // Global page loading event (in userfn6.php)
  193. Page_Loading();
  194. // Page load event, used in current page
  195. $this->Page_Load();
  196. }
  197. //
  198. // Page_Terminate
  199. // - called when exit page
  200. // - if URL specified, redirect to the URL
  201. //
  202. function Page_Terminate($url = "") {
  203. global $conn;
  204. // Page unload event, used in current page
  205. $this->Page_Unload();
  206. // Global page unloaded event (in userfn*.php)
  207. Page_Unloaded();
  208. // Close Connection
  209. $conn->Close();
  210. // Go to URL if specified
  211. if ($url <> "") {
  212. ob_end_clean();
  213. header("Location: $url");
  214. }
  215. exit();
  216. }
  217. var $lDisplayRecs; // Number of display records
  218. var $lStartRec;
  219. var $lStopRec;
  220. var $lTotalRecs;
  221. var $lRecRange;
  222. var $sSrchWhere;
  223. var $lRecCnt;
  224. var $lEditRowCnt;
  225. var $lRowCnt;
  226. var $lRowIndex;
  227. var $lOptionCnt;
  228. var $lRecPerRow;
  229. var $lColCnt;
  230. var $sDeleteConfirmMsg; // Delete confirm message
  231. var $sDbMasterFilter;
  232. var $sDbDetailFilter;
  233. var $bMasterRecordExists;
  234. var $ListOptions;
  235. var $sMultiSelectKey;
  236. //
  237. // Page main processing
  238. //
  239. function Page_Main() {
  240. global $objForm, $gsSearchError, $Security, $diezmo;
  241. $this->lDisplayRecs = 20;
  242. $this->lRecRange = 10;
  243. $this->lRecCnt = 0; // Record count
  244. // Search filters
  245. $sSrchAdvanced = ""; // Advanced search filter
  246. $sSrchBasic = ""; // Basic search filter
  247. $sFilter = "";
  248. $this->sSrchWhere = ""; // Search WHERE clause
  249. $this->sDeleteConfirmMsg = "�Quiere borrar este registro?"; // Delete confirm message
  250. // Master/Detail
  251. $this->sDbMasterFilter = ""; // Master filter
  252. $this->sDbDetailFilter = ""; // Detail filter
  253. if ($this->IsPageRequest()) { // Validate request
  254. // Set up records per page dynamically
  255. $this->SetUpDisplayRecs();
  256. // Handle reset command
  257. $this->ResetCmd();
  258. // Set Up Sorting Order
  259. $this->SetUpSortOrder();
  260. } // End Validate Request
  261. // Restore display records
  262. if ($diezmo->getRecordsPerPage() <> "") {
  263. $this->lDisplayRecs = $diezmo->getRecordsPerPage(); // Restore from Session
  264. } else {
  265. $this->lDisplayRecs = 20; // Load default
  266. }
  267. // Load Sorting Order
  268. $this->LoadSortOrder();
  269. // Build filter
  270. $sFilter = "";
  271. if (!$Security->CanList()) {
  272. $sFilter = "(0=1)"; // Filter all records
  273. }
  274. if ($this->sDbDetailFilter <> "")
  275. $sFilter = ($sFilter <> "") ? "($sFilter) AND (" . $this->sDbDetailFilter . ")" : $this->sDbDetailFilter;
  276. if ($this->sSrchWhere <> "")
  277. $sFilter = ($sFilter <> "") ? "($sFilter) AND (". $this->sSrchWhere . ")" : $this->sSrchWhere;
  278. // Set up filter in Session
  279. $diezmo->setSessionWhere($sFilter);
  280. $diezmo->CurrentFilter = "";
  281. // Export data only
  282. if (in_array($diezmo->Export, array("html","word","excel","xml","csv"))) {
  283. $this->ExportData();
  284. $this->Page_Terminate(); // Terminate response
  285. exit();
  286. }
  287. }
  288. // Set up number of records displayed per page
  289. function SetUpDisplayRecs() {
  290. global $diezmo;
  291. $sWrk = @$_GET[EW_TABLE_REC_PER_PAGE];
  292. if ($sWrk <> "") {
  293. if (is_numeric($sWrk)) {
  294. $this->lDisplayRecs = intval($sWrk);
  295. } else {
  296. if (strtolower($sWrk) == "all") { // Display all records
  297. $this->lDisplayRecs = -1;
  298. } else {
  299. $this->lDisplayRecs = 20; // Non-numeric, load default
  300. }
  301. }
  302. $diezmo->setRecordsPerPage($this->lDisplayRecs); // Save to Session
  303. // Reset start position
  304. $this->lStartRec = 1;
  305. $diezmo->setStartRecordNumber($this->lStartRec);
  306. }
  307. }
  308. // Set up Sort parameters based on Sort Links clicked
  309. function SetUpSortOrder() {
  310. global $diezmo;
  311. // Check for an Order parameter
  312. if (@$_GET["order"] <> "") {
  313. $diezmo->CurrentOrder = ew_StripSlashes(@$_GET["order"]);
  314. $diezmo->CurrentOrderType = @$_GET["ordertype"];
  315. $diezmo->UpdateSort($diezmo->idDiezmo); // Field
  316. $diezmo->UpdateSort($diezmo->idMiembro); // Field
  317. $diezmo->UpdateSort($diezmo->fecha); // Field
  318. $diezmo->UpdateSort($diezmo->montoDiezmo); // Field
  319. $diezmo->setStartRecordNumber(1); // Reset start position
  320. }
  321. }
  322. // Load Sort Order parameters
  323. function LoadSortOrder() {
  324. global $diezmo;
  325. $sOrderBy = $diezmo->getSessionOrderBy(); // Get order by from Session
  326. if ($sOrderBy == "") {
  327. if ($diezmo->SqlOrderBy() <> "") {
  328. $sOrderBy = $diezmo->SqlOrderBy();
  329. $diezmo->setSessionOrderBy($sOrderBy);
  330. }
  331. }
  332. }
  333. // Reset command based on querystring parameter cmd=
  334. // - RESET: reset search parameters
  335. // - RESETALL: reset search & master/detail parameters
  336. // - RESETSORT: reset sort parameters
  337. function ResetCmd() {
  338. global $diezmo;
  339. // Get reset cmd
  340. if (@$_GET["cmd"] <> "") {
  341. $sCmd = $_GET["cmd"];
  342. // Reset sort criteria
  343. if (strtolower($sCmd) == "resetsort") {
  344. $sOrderBy = "";
  345. $diezmo->setSessionOrderBy($sOrderBy);
  346. $diezmo->idDiezmo->setSort("");
  347. $diezmo->idMiembro->setSort("");
  348. $diezmo->fecha->setSort("");
  349. $diezmo->montoDiezmo->setSort("");
  350. }
  351. // Reset start position
  352. $this->lStartRec = 1;
  353. $diezmo->setStartRecordNumber($this->lStartRec);
  354. }
  355. }
  356. // Set up Starting Record parameters based on Pager Navigation
  357. function SetUpStartRec() {
  358. global $diezmo;
  359. if ($this->lDisplayRecs == 0)
  360. return;
  361. if ($this->IsPageRequest()) { // Validate request
  362. if (@$_GET[EW_TABLE_START_REC] <> "") { // Check for "start" parameter
  363. $this->lStartRec = $_GET[EW_TABLE_START_REC];
  364. $diezmo->setStartRecordNumber($this->lStartRec);
  365. } elseif (@$_GET[EW_TABLE_PAGE_NO] <> "") {
  366. $this->nPageNo = $_GET[EW_TABLE_PAGE_NO];
  367. if (is_numeric($this->nPageNo)) {
  368. $this->lStartRec = ($this->nPageNo-1)*$this->lDisplayRecs+1;
  369. if ($this->lStartRec <= 0) {
  370. $this->lStartRec = 1;
  371. } elseif ($this->lStartRec >= intval(($this->lTotalRecs-1)/$this->lDisplayRecs)*$this->lDisplayRecs+1) {
  372. $this->lStartRec = intval(($this->lTotalRecs-1)/$this->lDisplayRecs)*$this->lDisplayRecs+1;
  373. }
  374. $diezmo->setStartRecordNumber($this->lStartRec);
  375. }
  376. }
  377. }
  378. $this->lStartRec = $diezmo->getStartRecordNumber();
  379. // Check if correct start record counter
  380. if (!is_numeric($this->lStartRec) || $this->lStartRec == "") { // Avoid invalid start record counter
  381. $this->lStartRec = 1; // Reset start record counter
  382. $diezmo->setStartRecordNumber($this->lStartRec);
  383. } elseif (intval($this->lStartRec) > intval($this->lTotalRecs)) { // Avoid starting record > total records
  384. $this->lStartRec = intval(($this->lTotalRecs-1)/$this->lDisplayRecs)*$this->lDisplayRecs+1; // Point to last page first record
  385. $diezmo->setStartRecordNumber($this->lStartRec);
  386. } elseif (($this->lStartRec-1) % $this->lDisplayRecs <> 0) {
  387. $this->lStartRec = intval(($this->lStartRec-1)/$this->lDisplayRecs)*$this->lDisplayRecs+1; // Point to page boundary
  388. $diezmo->setStartRecordNumber($this->lStartRec);
  389. }
  390. }
  391. // Load recordset
  392. function LoadRecordset($offset = -1, $rowcnt = -1) {
  393. global $conn, $diezmo;
  394. // Call Recordset Selecting event
  395. $diezmo->Recordset_Selecting($diezmo->CurrentFilter);
  396. // Load list page SQL
  397. $sSql = $diezmo->SelectSQL();
  398. if ($offset > -1 && $rowcnt > -1) $sSql .= " LIMIT $offset, $rowcnt";
  399. // Load recordset
  400. $conn->raiseErrorFn = 'ew_ErrorFn';
  401. $rs = $conn->Execute($sSql);
  402. $conn->raiseErrorFn = '';
  403. // Call Recordset Selected event
  404. $diezmo->Recordset_Selected($rs);
  405. return $rs;
  406. }
  407. // Load row based on key values
  408. function LoadRow() {
  409. global $conn, $Security, $diezmo;
  410. $sFilter = $diezmo->KeyFilter();
  411. // Call Row Selecting event
  412. $diezmo->Row_Selecting($sFilter);
  413. // Load sql based on filter
  414. $diezmo->CurrentFilter = $sFilter;
  415. $sSql = $diezmo->SQL();
  416. if ($rs = $conn->Execute($sSql)) {
  417. if ($rs->EOF) {
  418. $LoadRow = FALSE;
  419. } else {
  420. $LoadRow = TRUE;
  421. $rs->MoveFirst();
  422. $this->LoadRowValues($rs); // Load row values
  423. // Call Row Selected event
  424. $diezmo->Row_Selected($rs);
  425. }
  426. $rs->Close();
  427. } else {
  428. $LoadRow = FALSE;
  429. }
  430. return $LoadRow;
  431. }
  432. // Load row values from recordset
  433. function LoadRowValues(&$rs) {
  434. global $diezmo;
  435. $diezmo->idDiezmo->setDbValue($rs->fields('idDiezmo'));
  436. $diezmo->idMiembro->setDbValue($rs->fields('idMiembro'));
  437. $diezmo->fecha->setDbValue($rs->fields('fecha'));
  438. $diezmo->montoDiezmo->setDbValue($rs->fields('montoDiezmo'));
  439. $diezmo->monto2->setDbValue($rs->fields('monto2'));
  440. $diezmo->monto3->setDbValue($rs->fields('monto3'));
  441. }
  442. // Render row values based on field settings
  443. function RenderRow() {
  444. global $conn, $Security, $diezmo;
  445. // Call Row_Rendering event
  446. $diezmo->Row_Rendering();
  447. // Common render codes for all row types
  448. // idDiezmo
  449. $diezmo->idDiezmo->CellCssStyle = "";
  450. $diezmo->idDiezmo->CellCssClass = "";
  451. // idMiembro
  452. $diezmo->idMiembro->CellCssStyle = "";
  453. $diezmo->idMiembro->CellCssClass = "";
  454. // fecha
  455. $diezmo->fecha->CellCssStyle = "";
  456. $diezmo->fecha->CellCssClass = "";
  457. // montoDiezmo
  458. $diezmo->montoDiezmo->CellCssStyle = "";
  459. $diezmo->montoDiezmo->CellCssClass = "";
  460. if ($diezmo->RowType == EW_ROWTYPE_VIEW) { // View row
  461. // idDiezmo
  462. $diezmo->idDiezmo->ViewValue = $diezmo->idDiezmo->CurrentValue;
  463. $diezmo->idDiezmo->CssStyle = "";
  464. $diezmo->idDiezmo->CssClass = "";
  465. $diezmo->idDiezmo->ViewCustomAttributes = "";
  466. // idMiembro
  467. $diezmo->idMiembro->ViewValue = $diezmo->idMiembro->CurrentValue;
  468. $diezmo->idMiembro->CssStyle = "";
  469. $diezmo->idMiembro->CssClass = "";
  470. $diezmo->idMiembro->ViewCustomAttributes = "";
  471. // fecha
  472. $diezmo->fecha->ViewValue = $diezmo->fecha->CurrentValue;
  473. $diezmo->fecha->ViewValue = ew_FormatDateTime($diezmo->fecha->ViewValue, 7);
  474. $diezmo->fecha->CssStyle = "";
  475. $diezmo->fecha->CssClass = "";
  476. $diezmo->fecha->ViewCustomAttributes = "";
  477. // montoDiezmo
  478. $diezmo->montoDiezmo->ViewValue = $diezmo->montoDiezmo->CurrentValue;
  479. $diezmo->montoDiezmo->CssStyle = "";
  480. $diezmo->montoDiezmo->CssClass = "";
  481. $diezmo->montoDiezmo->ViewCustomAttributes = "";
  482. // idDiezmo
  483. $diezmo->idDiezmo->HrefValue = "";
  484. // idMiembro
  485. $diezmo->idMiembro->HrefValue = "";
  486. // fecha
  487. $diezmo->fecha->HrefValue = "";
  488. // montoDiezmo
  489. $diezmo->montoDiezmo->HrefValue = "";
  490. }
  491. // Call Row Rendered event
  492. $diezmo->Row_Rendered();
  493. }
  494. // Export data in XML or CSV format
  495. function ExportData() {
  496. global $diezmo;
  497. $sCsvStr = "";
  498. // Default export style
  499. $sExportStyle = "h";
  500. // Load recordset
  501. $rs = $this->LoadRecordset();
  502. $this->lTotalRecs = $rs->RecordCount();
  503. $this->lStartRec = 1;
  504. // Export all
  505. if ($diezmo->ExportAll) {
  506. $this->lStopRec = $this->lTotalRecs;
  507. } else { // Export 1 page only
  508. $this->SetUpStartRec(); // Set up start record position
  509. // Set the last record to display
  510. if ($this->lDisplayRecs < 0) {
  511. $this->lStopRec = $this->lTotalRecs;
  512. } else {
  513. $this->lStopRec = $this->lStartRec + $this->lDisplayRecs - 1;
  514. }
  515. }
  516. if ($diezmo->Export == "xml") {
  517. $XmlDoc = new cXMLDocument();
  518. } else {
  519. echo ew_ExportHeader($diezmo->Export);
  520. // Horizontal format, write header
  521. if ($sExportStyle <> "v" || $diezmo->Export == "csv") {
  522. $sExportStr = "";
  523. ew_ExportAddValue($sExportStr, 'idDiezmo', $diezmo->Export);
  524. ew_ExportAddValue($sExportStr, 'idMiembro', $diezmo->Export);
  525. ew_ExportAddValue($sExportStr, 'fecha', $diezmo->Export);
  526. ew_ExportAddValue($sExportStr, 'montoDiezmo', $diezmo->Export);
  527. echo ew_ExportLine($sExportStr, $diezmo->Export);
  528. }
  529. }
  530. // Move to first record
  531. $this->lRecCnt = $this->lStartRec - 1;
  532. if (!$rs->EOF) {
  533. $rs->MoveFirst();
  534. $rs->Move($this->lStartRec - 1);
  535. }
  536. while (!$rs->EOF && $this->lRecCnt < $this->lStopRec) {
  537. $this->lRecCnt++;
  538. if (intval($this->lRecCnt) >= intval($this->lStartRec)) {
  539. $this->LoadRowValues($rs);
  540. // Render row for display
  541. $diezmo->RowType = EW_ROWTYPE_VIEW; // Render view
  542. $this->RenderRow();
  543. if ($diezmo->Export == "xml") {
  544. $XmlDoc->BeginRow();
  545. $XmlDoc->AddField('idDiezmo', $diezmo->idDiezmo->CurrentValue);
  546. $XmlDoc->AddField('idMiembro', $diezmo->idMiembro->CurrentValue);
  547. $XmlDoc->AddField('fecha', $diezmo->fecha->CurrentValue);
  548. $XmlDoc->AddField('montoDiezmo', $diezmo->montoDiezmo->CurrentValue);
  549. $XmlDoc->EndRow();
  550. } else {
  551. if ($sExportStyle == "v" && $diezmo->Export <> "csv") { // Vertical format
  552. echo ew_ExportField('idDiezmo', $diezmo->idDiezmo->ExportValue($diezmo->Export, $diezmo->ExportOriginalValue), $diezmo->Export);
  553. echo ew_ExportField('idMiembro', $diezmo->idMiembro->ExportValue($diezmo->Export, $diezmo->ExportOriginalValue), $diezmo->Export);
  554. echo ew_ExportField('fecha', $diezmo->fecha->ExportValue($diezmo->Export, $diezmo->ExportOriginalValue), $diezmo->Export);
  555. echo ew_ExportField('montoDiezmo', $diezmo->montoDiezmo->ExportValue($diezmo->Export, $diezmo->ExportOriginalValue), $diezmo->Export);
  556. } else { // Horizontal format
  557. $sExportStr = "";
  558. ew_ExportAddValue($sExportStr, $diezmo->idDiezmo->ExportValue($diezmo->Export, $diezmo->ExportOriginalValue), $diezmo->Export);
  559. ew_ExportAddValue($sExportStr, $diezmo->idMiembro->ExportValue($diezmo->Export, $diezmo->ExportOriginalValue), $diezmo->Export);
  560. ew_ExportAddValue($sExportStr, $diezmo->fecha->ExportValue($diezmo->Export, $diezmo->ExportOriginalValue), $diezmo->Export);
  561. ew_ExportAddValue($sExportStr, $diezmo->montoDiezmo->ExportValue($diezmo->Export, $diezmo->ExportOriginalValue), $diezmo->Export);
  562. echo ew_ExportLine($sExportStr, $diezmo->Export);
  563. }
  564. }
  565. }
  566. $rs->MoveNext();
  567. }
  568. // Close recordset
  569. $rs->Close();
  570. if ($diezmo->Export == "xml") {
  571. header("Content-Type: text/xml");
  572. echo $XmlDoc->XML();
  573. } else {
  574. echo ew_ExportFooter($diezmo->Export);
  575. }
  576. }
  577. // Page Load event
  578. function Page_Load() {
  579. //echo "Page Load";
  580. }
  581. // Page Unload event
  582. function Page_Unload() {
  583. //echo "Page Unload";
  584. }
  585. // Form Custom Validate event
  586. function Form_CustomValidate(&$CustomError) {
  587. // Return error message in CustomError
  588. return TRUE;
  589. }
  590. }
  591. ?>