?> </div> </td> <td> <a href="<?php echo site_url('gudang/createpdf/' . $mng . '/' . $valdata[$fkolm] . '/' . $valdata['iduser']); ?> " class="btn btn-sm btn-primary" role="group">preview</a> </td> <?php break; case 'invoice': ?> <td> <?php if (getacc($valdata[$fkolm], $mng)) { ?> <?php if (ceksent($valdata[$fkolm], $mng)) { ?> ok <?php } else { ?> <a href="<?php echo site_url('gudang/setemail/' . $valdata[$fkolm] . '/' . $mng); ?> " class="btn btn-success">send email</a> <?php } ?>
function acc_xrate_update($fcid, $nrate, $tab, $key, $accid) { $bacc = getacc($accid); $placc = getAccn('999', '999'); $date = date("d-m-Y"); $refnum = getrefnum(); db_connect(); $sql = "SELECT {$key}, balance, fbalance, (balance/fbalance) as crate FROM {$tab} WHERE fbalance <> 0 AND fcid = '{$fcid}'"; $rslt = db_exec($sql) or errDie("Unable to retrieve balances from Cubit", SELF); while ($rec = pg_fetch_array($rslt)) { $nbal = sprint($rec['fbalance'] * $nrate); db_connect(); $sql = "UPDATE {$tab} SET balance = '{$nbal}' WHERE {$key} = '{$rec[$key]}'"; $uRs = db_exec($sql) or errDie("Unable to retrieve update exchange rate : {$tab}", SELF); if ($nbal > $rec['balance']) { $diff = sprint($nbal - $rec['balance']); // Journal entry (? accounts) writetrans($bacc['accid'], $placc['accid'], $date, $refnum, $diff, "Exchange rate profit."); } else { $diff = sprint($rec['balance'] - $nbal); // Journal entry (? accounts) writetrans($placc['accid'], $bacc['accid'], $date, $refnum, $diff, "Exchange rate loss."); } } }