dwh/prm_trsry_tran_plugin.php

135 lines
4.6 KiB
PHP
Raw Permalink Normal View History

2023-10-02 10:26:17 +00:00
<?php
$PARENT_SCRIPTNAME='prm_trsry_tran.php';
include_once 'script_auth.php';
include_once 'class/PregReplaceCallbackClass.php';
include_once 'init/initialisation_parameter.php';
$ora_obj = new ORAConnectionClass('init/ORA_INIT.php');
$ora_res = $ora_obj->ORA_PConnect();
if (!$ora_res){
echo "<BR>Error : " . htmlspecialchars($ora_obj->last_error_msg) . "<br>";
exit();
}
initParamTemplate();
$result = getList($ora_obj);
echo $result;
unset($_SESSION['TEMPLATE_ARRAY_ADDR']);
if ($ora_obj->conn) {
$ora_obj->ORA_Close();
#echo "connection closed.<br>";
}
function initParamTemplate(){
$paramTemplate['ELEMENT'] = <<< params
<tr id="tr<<COUNTER>>" class="font11" onmouseover="changeColor(this,'#FFFF99');" onmouseout="changeColor(this,'#F7F7F7');" onclick="javascript:modifyData('<<TRANS_CODE>>');">
<td width=35 align=right><<COUNTER>>.</td>
<td align=left><<TRANS_CODE>></td>
<td align=left><<TRANS_CODE_DESC>></td>
<td align=left><<TRANS_IDR_CODE>></td>
<td align=left><<TRANS_IDR_CODE_DESC>></td>
<td align=left><<TRANS_TYPE_DESC>></td>
<td align=left><<BN_FLAG_DESC>></td>
</tr>
params;
$paramTemplate['CONTAINER'] = <<< params
<table width="100%" cellpadding="2" cellspacing="1" border="0" style="layout:auto">
<tr>
<td align=left class="orangetitle" nowrap>Kode Transaksi Treasury</td>
<td align=right>
<button id="ADD_BTN" name="addData" class="print" onclick="javascript:newData();">
<img src="images/button_add_icon.gif" width="12" height="12">
<span id="AddBtnLink" class="font10">&nbsp;Add New&nbsp;</span>
</button>
<button id="PRINT_BTN" name="printData" class="print">
<img src="images/icon_printer.gif" width="12" height="12">
<span id="AddBtnLink" class="font10">&nbsp;Print&nbsp;</span>
</button>
<input type="hidden" name="ACTION">
</td>
</tr>
<tr>
<table width="100%" cellpadding="2" cellspacing="1" border="0" style="layout:auto">
<tr class="table_form_header">
<th align=left width=35>No.</th>
<th align=left colspan=2>Kode Transaksi Valas</th>
<th align=left colspan=2>Kode Transaksi IDR</th>
<th align=left>Tipe Transaksi Valas</th>
<th align=left>Jenis Valas</th>
</tr>
<<LIST>>
</table>
</tr>
</table>
params;
$paramTemplate['NORESULT'] = <<< params
<table width="100%" cellpadding="2" cellspacing="1" border="0" style="layout:auto">
<tr>
<td align=left class="orangetitle" nowrap>Kode Transaksi Treasury</td>
<td align=right>
<input type="hidden" name="ACTION">
</td>
</tr>
<tr>
<table width="100%" cellpadding="2" cellspacing="1" border="0" style="layout:auto">
<tr class="table_form_header">
<th align=left width=35>No.</th>
<th align=left>Kode Transaksi Valas</th>
<th align=left>Kode Transaksi IDR</th>
<th align=left>Tipe Transaksi Valas</th>
<th align=left>Jenis Valas</th>
</tr>
<tr>
<td colspan="5" class="font12BRed" align=center>NO DATA FOUND</td>
</tr>
</table>
</tr>
</table>
params;
$_SESSION['TEMPLATE_ARRAY_ADDR'] = &$paramTemplate;
}
function getList(&$ora_obj){
$templObj = new PregReplaceCallbackClass('');
$templObj->SetTemplateArray('TEMPLATE_ARRAY_ADDR');
$paramSQL = <<< sql
SELECT t.trans_code,
( SELECT trname FROM a2tr_staging WHERE trcode = t.trans_code) trans_code_desc,
t.trans_idr_code,
( SELECT trname FROM a2tr_staging WHERE trcode = t.trans_idr_code) trans_idr_code_desc,
DECODE(t.trans_type, 'B', 'Buy', 'Sell') trans_type_desc,
DECODE(t.bn_flag, 'B', 'Bank Note', 'TT') bn_flag_desc
FROM trsry_tran_code_tab t
ORDER BY t.trans_code
sql;
$paramArray = $ora_obj->ORA_SelectData($paramSQL,null,null,OCI_FETCHSTATEMENT_BY_ROW);
$_SESSION['ARRAY_ADDR_VAR'] = &$variable_array;
if ($ora_obj->nrows>0) {
foreach ($paramArray as $pkey => $pval) {
$variable_array['COUNTER']++;
foreach ($pval as $tkey => $tval) {
$variable_array[$tkey] = htmlspecialchars($tval);
}
$templObj->SetFormatName('ELEMENT');
$list .= $templObj->PregReplaceCallback();
}
$variable_array['LIST'] = $list;
$templObj->SetFormatName('CONTAINER');
$result = $templObj->PregReplaceCallback();
} else {
$templObj->SetFormatName('NORESULT');
$result = $templObj->PregReplaceCallback();
}
return $result;
}
?>