<select name="tgl_end" id="tgl_end" style="width: 50px;" onkeypress="focusNext( 'bln_end', event, 'thn_start', this)" class="inputan">
<? for($i=1;$i<32;$i++) {
$tgl = tambahNol($i, 2);
if($tgl==($tgl_skr)) $sel = "selected";
else $sel = "";
?>
<option value="<?=$tgl?>" <?=$sel?> ><?=$i?></option>
<? } ?>
</select>
<select name="bln_end" id="bln_end" style="width: 100px;" onkeypress="focusNext( 'thn_end', event, 'tgl_end', this)" class="inputan">
<? for($i=1;$i<13;$i++) {
$bln = tambahNol($i, 2);
if($bln==$bln_skr) $sel = "selected";
else $sel = "";
?>
<option value="<?=$bln?>" <?=$sel?> ><?=bulanIndo($i, "F")?></option>
<? } ?>
</select>
<select name="thn_end" id="thn_end" style="width: 70px;" onkeypress="focusNext( 'tampil', event, 'bln_end', this)" class="inputan">
<? for($i=$thn;$i<=$thn_skr;$i++) {
if($i==$thn_skr) $sel = "selected";
else $sel = "";
?>
<option value="<?=$i?>" <?=$sel?> ><?=$i?></option>
<? } ?>
</select>
</td>
</tr>
<tr>
<td colspan="2" style="text-align: center;"><input type="button" name="tampil" id="tampil" value="Tampilkan" class="inputan" onclick="xajax_list_data(xajax.getFormValues('form_kunjungan'));" onkeypress="focusNext( 'jangka_waktu', event, 'thn', this)" /></td>
</tr>
$this->thoni_fpdf->SetFont('helvetica', '', 10);
$this->thoni_fpdf->Cell(19, 0.5, $config['bas_branch_address'], 0, 0, 'L');
$this->thoni_fpdf->Cell(-10.5);
$this->thoni_fpdf->SetFont('helvetica', 'B', 18);
$this->thoni_fpdf->Cell(19, 1, 'Atombizz For Clinic', 0, 0, 'R');
$this->thoni_fpdf->Ln(0.4);
$this->thoni_fpdf->SetFont('helvetica', '', 10);
$this->thoni_fpdf->Cell(19, 0.5, $config['bas_branch_phone'], 0, 0, 'L');
$this->thoni_fpdf->Ln(0.4);
$this->thoni_fpdf->Cell(19, 0.5, $config['bas_branch_email'] . ' / ' . $config['bas_branch_domain'], 0, 0, 'L');
/* Fungsi Line untuk membuat garis */
$this->thoni_fpdf->Line(1, 2.8, 28.5, 2.8);
$this->thoni_fpdf->Line(1, 2.85, 28.5, 2.85);
$this->thoni_fpdf->Ln(1);
$this->thoni_fpdf->SetFont('helvetica', 'B', 16);
$this->thoni_fpdf->Cell(28.8, 0.5, 'DAFTAR GAJI BULAN ' . bulanIndo($param['bulan']) . ' / ' . $param['tahun'], 0, 0, 'C');
/* -------------- Header Halaman selesai ------------------------------------------------*/
$x = $this->thoni_fpdf->GetX();
$y = $this->thoni_fpdf->GetY() + 1;
$this->thoni_fpdf->SetFont('helvetica', 'B', 9);
$this->thoni_fpdf->SetXY(1, $y + 0.7);
$this->thoni_fpdf->SetWidths(array(1, 4, 4, 3, 3, 3, 3, 3, 3.5));
$this->thoni_fpdf->SetAligns(array('C', 'C', 'C', 'C', 'C', 'C', 'C', 'C', 'C'));
$this->thoni_fpdf->Row(array('No.', 'Kode Karyawan', 'Nama Karyawan', 'Gaji Pokok', 'Bonus', 'Tunjangan Lain', 'Hutang', 'Potongan Lain', 'Total'));
$no = 1;
$i = 0;
$total = 0;
$this->thoni_fpdf->SetFont('helvetica', '', 9);
foreach ($data as $key => $value) {
$this->thoni_fpdf->SetAligns(array('C', 'L', 'L', 'R', 'R', 'R', 'R', 'R', 'R'));
$this->thoni_fpdf->Row(array($no, $value->employee_code, $value->employee_name, format_rupiah($value->gaji_pokok), format_rupiah($value->bonus), format_rupiah($value->tunjang_lain), format_rupiah($value->hutang), format_rupiah($value->potongan_Lain), format_rupiah($value->total)));
function list_data($val) {
unset($_SESSION[igd][pendapatan]);
//get data karcis dan BHP
$objResponse = new xajaxResponse;
$kon = new Konek;
$title = "Laporan Pembagian Jasa IRD";
if($val[jangka_waktu] == "tahun") {
$q = "AND YEAR(kw.tgl) BETWEEN '".$val[thn_start]."' AND '".$val[thn_end]."'";
$title .= "\nPeriode " . $val[thn_start] . " - " . $val[thn_end];
} elseif($val[jangka_waktu] == "bulan") {
$q = "AND EXTRACT(YEAR_MONTH FROM kw.tgl) BETWEEN '".$val[thn_start].$val[bln_start]."' AND '".$val[thn_end].$val[bln_end]."'";
$title .= "\nPeriode " . bulanIndo($val[bln_start], "F") . " " . $val[thn_start] . " - " . bulanIndo($val[bln_end], "F") . " " . $val[thn_end];
} else {
$q = "AND DATE(kw.tgl) BETWEEN '".$val[thn_start]."-".$val[bln_start]."-".$val[tgl_start]."' AND '".$val[thn_end]."-".$val[bln_end]."-".$val[tgl_end]."'";
$title .= "\nPeriode " . tanggalIndo($val[thn_start] . "-" . $val[bln_start] . "-" . $val[tgl_start], "j F Y") . " - " . tanggalIndo($val[thn_end] . "-" . $val[bln_end] . "-" . $val[tgl_end], "j F Y");
}
$sql = "
SELECT
kb.nama as nama,
hak.nama as nama_hak,
SUM(ROUND(kb.mampu_bayar_bhp * bhp_p)) as bhp_p,
SUM(ROUND(kb.mampu_bayar_bhp * bhp_rs_adm)) as bhp_rs_adm,
SUM(ROUND(kb.mampu_bayar_bhp * bhp_rs_op)) as bhp_rs_op,
SUM(ROUND(kb.mampu_bayar_jasa * jasa_p)) as jasa_p,
SUM(ROUND(kb.mampu_bayar_jasa * jasa_rs_adm)) as jasa_rs_adm,
SUM(ROUND(kb.mampu_bayar_jasa * jasa_rs_sdm)) as jasa_rs_sdm,
SUM(ROUND(kb.mampu_bayar_jasa * jasa_rs_kembang)) as jasa_rs_kembang,
SUM(ROUND(kb.mampu_bayar_jasa * jasa_rs_op)) as jasa_rs_op,
SUM(ROUND(kb.mampu_bayar_jasa * spesialis * netto)) as spesialis,
SUM(ROUND(kb.mampu_bayar_jasa * spesialis_pendamping * netto)) as spesialis_pendamping,
SUM(ROUND(kb.mampu_bayar_jasa * perawat_perinatologi * netto)) as perawat_perinatologi,
SUM(ROUND(kb.mampu_bayar_jasa * dr_umum * netto)) as dr_umum,
SUM(ROUND(kb.mampu_bayar_jasa * dr_gigi * netto)) as dr_gigi,
SUM(ROUND(kb.mampu_bayar_jasa * assisten_non_dokter * netto)) as assisten_non_dokter,
SUM(ROUND(kb.mampu_bayar_jasa * spesialis_anestesi * netto)) as spesialis_anestesi,
SUM(ROUND(kb.mampu_bayar_jasa * aknest * netto)) as aknest,
SUM(ROUND(kb.mampu_bayar_jasa * gizi * netto)) as gizi,
SUM(ROUND(kb.mampu_bayar_jasa * fisioterapi * netto)) as fisioterapi,
SUM(ROUND(kb.mampu_bayar_jasa * analis_pa * netto)) as analis_pa,
SUM(ROUND(kb.mampu_bayar_jasa * bidan * netto)) as bidan,
SUM(ROUND(kb.mampu_bayar_jasa * perawat * netto)) as perawat,
SUM(ROUND(kb.mampu_bayar_jasa * penunjang * netto)) as penunjang,
SUM(ROUND(kb.mampu_bayar_jasa * ugp * netto)) as ugp,
SUM(ROUND(kb.mampu_bayar_jasa * grabaf * netto)) as grabaf,
SUM(ROUND(kb.mampu_bayar_jasa * zakat * netto)) as zakat,
SUM(ROUND(pajak * (kb.mampu_bayar_jasa - kb.mampu_bayar_jasa * kb.jasa_p - kb.mampu_bayar_jasa * kb.jasa_rs_op - kb.mampu_bayar_jasa * kb.jasa_rs_kembang - kb.mampu_bayar_jasa * kb.jasa_rs_adm - kb.mampu_bayar_jasa * kb.jasa_rs_sdm))) as pajak,
SUM(kb.mampu_bayar_bhp+kb.mampu_bayar_jasa) as mampu_bayar
FROM
kunjungan_bayar kb
JOIN kunjungan_kamar kk ON (kk.id = kb.kunjungan_kamar_id)
JOIN hak ON (hak.id = kb.hak_id)
JOIN kwitansi kw ON (kw.id = kb.kwid)
WHERE
(kb.karcis_id IS NOT NULL OR kb.bhp_id IS NOT NULL)
AND kw.tempat_pembayaran = 'IRD'
$q
GROUP BY
kb.karcis_id, kb.bhp_id, kb.hak_id
";
//$objResponse->addAssign("debug", "innerHTML", nl2br($sql));
$kon->sql = $sql;
$kon->execute();
$data_karcis = $kon->getAll();
$table = new Table;
$table->anime_bg_color = false;
$table->addTh("Jasa", "Pemilik", "BHP", "JASA RS", "Sp", "Sp1", "SpAn", "UGP", "GRABAF", "Prwt", /*"Ass Non Dokter", "Aknest", "Gizi", "Fisio", "Analis PA", "Bidan", */"Pnjg", "Zakat", "Pajak", "Sub Total");
$table->addExtraTh("rowspan=\"2\"", "rowspan=\"2\"", "colspan=\"5\"", "colspan=\"5\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"");
$table->addTh("Pemda", "Adm", "Op", "Rad", "Lab", "Pemda", "Adm", "Sdm", "Bang", "Op");
for($i=0;$i<sizeof($data_karcis);$i++) {
$table->addRow(
$data_karcis[$i][nama],
$data_karcis[$i][nama_hak],
$data_karcis[$i][bhp_p],
$data_karcis[$i][bhp_rs_adm],
$data_karcis[$i][bhp_rs_op],
"?",
"?",
uangIndo($data_karcis[$i][jasa_p], false),
uangIndo($data_karcis[$i][jasa_rs_adm], false),
uangIndo($data_karcis[$i][jasa_rs_sdm], false),
uangIndo($data_karcis[$i][jasa_rs_kembang], false),
uangIndo($data_karcis[$i][jasa_rs_op], false),
uangIndo($data_karcis[$i][spesialis], false),
uangIndo($data_karcis[$i][spesialis_pendamping], false),
uangIndo($data_karcis[$i][spesialis_anestesi], false),
//uangIndo($data_karcis[$i][dr_umum] + $data_karcis[$i][dr_gigi] + $data_karcis[$i][ugp], false),
uangIndo($data_karcis[$i][ugp], false),
uangIndo($data_karcis[$i][grabaf], false),
//uangIndo($data_karcis[$i][perawat] + $data_karcis[$i][perawat_perinatologi], false),
uangIndo($data_karcis[$i][perawat], false),
/*uangIndo($data_karcis[$i][assisten_non_dokter], false),
uangIndo($data_karcis[$i][aknest], false),
uangIndo($data_karcis[$i][gizi], false),
uangIndo($data_karcis[$i][fisioterapi], false),
uangIndo($data_karcis[$i][analis_pa], false),
uangIndo($data_karcis[$i][bidan], false),*/
uangIndo($data_karcis[$i][penunjang], false),
uangIndo($data_karcis[$i][zakat], false),
uangIndo($data_karcis[$i][pajak], false),
uangIndo($data_karcis[$i][mampu_bayar], false)
/*
$data_karcis[$i][assisten_non_dokter],
$data_karcis[$i][aknest],
$data_karcis[$i][gizi],
$data_karcis[$i][fisioterapi],
$data_karcis[$i][analis_pa],
$data_karcis[$i][bidan],
*/
);
$table->addExtraTr("onclick=\"setBg(this);\"");
$total[bhp_p] += $data_karcis[$i][bhp_p];
$total[bhp_rs_adm] += $data_karcis[$i][bhp_rs_adm];
$total[bhp_rs_op] += $data_karcis[$i][bhp_rs_op];
$total[jasa_p] += $data_karcis[$i][jasa_p];
$total[jasa_rs_adm] += $data_karcis[$i][jasa_rs_adm];
$total[jasa_rs_sdm] += $data_karcis[$i][jasa_rs_sdm];
$total[jasa_rs_kembang] += $data_karcis[$i][jasa_rs_kembang];
$total[jasa_rs_op] += $data_karcis[$i][jasa_rs_op];
$total[spesialis] += $data_karcis[$i][spesialis];
$total[spesialis_pendamping] += $data_karcis[$i][spesialis_pendamping];
$total[spesialis_anestesi] += $data_karcis[$i][spesialis_anestesi];
//$total[ugp] += $data_karcis[$i][dr_umum] + $data_karcis[$i][dr_gigi] + $data_karcis[$i][ugp];
$total[ugp] += $data_karcis[$i][ugp];
$total[grabaf] += $data_karcis[$i][grabaf];
//$total[perawat] += $data_karcis[$i][perawat]+$data_karcis[$i][perawat_perinatologi];
$total[perawat] += $data_karcis[$i][perawat];
/*$total[assisten_non_dokter] += $data_karcis[$i][assisten_non_dokter];
$total[aknest] += $data_karcis[$i][aknest];
$total[gizi] += $data_karcis[$i][gizi];
$total[fisioterapi] += $data_karcis[$i][fisioterapi];
$total[analis_pa] += $data_karcis[$i][analis_pa];
$total[bidan] += $data_karcis[$i][bidan];*/
$total[penunjang] += $data_karcis[$i][penunjang];
$total[zakat] += $data_karcis[$i][zakat];
$total[pajak] += $data_karcis[$i][pajak];
$total[mampu_bayar] += $data_karcis[$i][mampu_bayar];
}
$table->addTfoot(
"Total",
uangIndo($total[bhp_p], false),
uangIndo($total[bhp_rs_adm], false),
uangIndo($total[bhp_rs_op], false),
"?",
"?",
uangIndo($total[jasa_p], false),
uangIndo($total[jasa_rs_adm], false),
uangIndo($total[jasa_rs_sdm], false),
uangIndo($total[jasa_rs_kembang], false),
uangIndo($total[jasa_rs_op], false),
uangIndo($total[spesialis], false),
uangIndo($total[spesialis_pendamping], false),
uangIndo($total[spesialis_anestesi], false),
uangIndo($total[ugp], false),
uangIndo($total[grabaf], false),
uangIndo($total[perawat], false),
/*uangIndo($total[assisten_non_dokter], false),
uangIndo($total[aknest], false),
uangIndo($total[gizi], false),
uangIndo($total[fisioterapi], false),
uangIndo($total[analis_pa], false),
uangIndo($total[bidan], false), */
uangIndo($total[penunjang], false),
uangIndo($total[zakat], false),
uangIndo($total[pajak], false),
uangIndo($total[mampu_bayar], false)
);
$table->addExtraTfoot("colspan=\"2\"");
$content = $table->build();
$judul = nl2br($title);
$objResponse->addAssign("title", "innerHTML", $judul);
$objResponse->addAssign("list_data", "innerHTML", $content);
$_SESSION[igd][pendapatan][title] = $judul;
$_SESSION[igd][pendapatan][content] = $content;
return $objResponse;
}
public function table_gaji()
{
$param = $this->input->post();
$data = $this->mlp->get_daftar_gaji($param);
$table = '';
$i = 1;
foreach ($data->result() as $key => $value) {
$table .= '
<tr>
<td width="50px">' . $i . '</td>
<td width="100px">' . bulanIndo($value->bulan) . '</td>
<td width="100px">' . $value->tahun . '</td>
<td>' . $value->employee_code . '</td>
<td>' . $value->employee_name . '</td>
<td width="125px">' . format_rupiah($value->penerimaan) . '</td>
<td width="125px">' . format_rupiah($value->potongan) . '</td>
<td width="125px">' . format_rupiah($value->total) . '</td>
</tr>
';
$i++;
}
$table_null = '
<tr>
<td colspan="8">Tidak ada data.</td>
</tr>
';
echo isset($value) ? $table : $table_null;
}
<? for($i=$thn;$i<=$thn_skr;$i++) {
if($i==$thn_skr) $sel = "selected";
else $sel = "";
?>
<option value="<?=$i?>" <?=$sel?> ><?=$i?></option>
<? } ?>
</select>
</td>
</tr>
<tr>
<td>Target : </td>
<td>
<table cellpadding="0" cellspacing="2" border="0" class="form">
<? for($i=1;$i<13;$i++):?>
<tr>
<td style="width:100px"><?=bulanIndo($i, "F")?></td>
<td>
<? if($i==1) : ?>
<input type="text" size="30" name="bulan_<?=$i?>" id="bulan_<?=$i?>" onkeypress="focusNext( 'bulan_<?=($i+1)?>', event, 'tahun', this)" class="inputan_angka" />
<? elseif($i==12) :?>
<input type="text" size="30" name="bulan_<?=$i?>" id="bulan_<?=$i?>" onkeypress="focusNext( 'tampil', event, 'bulan_<?=($i-1)?>', this)" class="inputan_angka" />
<? else : ?>
<input type="text" size="30" name="bulan_<?=$i?>" id="bulan_<?=$i?>" onkeypress="focusNext( 'bulan_<?=($i+1)?>', event, 'bulan_<?=($i-1)?>', this)" class="inputan_angka" />
<? endif;?>
</td>
</tr>
<? endfor; ?>
</table>
</td>
</tr>
<tr>
function list_data($val) {
unset($_SESSION[keuangan][lap_keuangan_bulanan]);
//get data karcis dan BHP
$objResponse = new xajaxResponse;
$kon = new Konek;
$title = "Laporan Keuangan Bulanan";
$title .= "\nTahun " . $val[tahun];
$sql = "
SELECT
MONTH(kw.tgl) as bulan,
SUM(kb.mampu_bayar_bhp+kb.mampu_bayar_jasa) as bayar,
CASE
WHEN rk.cara_bayar IS NOT NULL THEN rk.cara_bayar
WHEN lk.cara_bayar IS NOT NULL THEN lk.cara_bayar
ELSE kk.cara_bayar
END as cara_bayar,
CASE
WHEN rk.jenis_askes IS NOT NULL THEN rk.jenis_askes
WHEN lk.jenis_askes IS NOT NULL THEN lk.jenis_askes
ELSE kk.jenis_askes
END as jenis_askes
FROM
kunjungan_bayar kb
LEFT JOIN kunjungan_kamar kk ON (kk.id = kb.kunjungan_kamar_id)
LEFT JOIN lab_kunjungan lk ON (lk.id = kb.lab_kunjungan_id)
LEFT JOIN radio_kunjungan rk ON (rk.id = kb.radio_kunjungan_id)
JOIN kwitansi kw ON (kw.id = kb.kwid)
WHERE
YEAR(kw.tgl) = '".$val[tahun]."'
AND kb.kwid IS NOT NULL
GROUP BY
MONTH(kw.tgl), kk.cara_bayar, lk.cara_bayar, rk.cara_bayar, kk.jenis_askes, lk.jenis_askes, rk.jenis_askes
ORDER BY
MONTH(kw.tgl)
";
//$objResponse->addAssign("debug", "innerHTML", nl2br($sql));
$kon->sql = $sql;
$kon->execute();
$data = $kon->getAll();
$table = new Table;
$table->cellspacing = "0";
$table->anime_bg_color = false;
$table->addTh("No", "Bulan", "Cara Pembayaran", "Jumlah", "Kumulatif", "Target", "% Pendapatan", "% Kumulatif");
$table->addExtraTh("rowspan=\"2\"", "rowspan=\"2\"", "colspan=\"7\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"");
$table->addTh("Umum", "Jamsostek", "Dana Reksa Desa", "Kontrak", "Askeskin", "Askes Lain", "Lain-lain");
$table->addTh("1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", "14");
$new = array();
for($i=0;$i<sizeof($data);$i++) {
if($data[$i][bulan] == $data[$i-1][bulan]) {
if($data[$i][cara_bayar] == "UMUM") {
$new[$data[$i][bulan]][UMUM] = $data[$i][bayar];
} elseif($data[$i][cara_bayar] == "JAMSOSTEK") {
$new[$data[$i][bulan]][JAMSOSTEK] = $data[$i][bayar];
} elseif($data[$i][cara_bayar] == "DANA REKSA DESA") {
$new[$data[$i][bulan]][DANA_REKSA_DESA] = $data[$i][bayar];
} elseif($data[$i][cara_bayar] == "KONTRAK") {
$new[$data[$i][bulan]][KONTRAK] = $data[$i][bayar];
} elseif($data[$i][cara_bayar] == "ASKES"){
if($data[$i][jenis_askes] == "Askes Kin") {
$new[$data[$i][bulan]][ASKESKIN] = $data[$i][bayar];
} else {
$new[$data[$i][bulan]][ASKES_LAIN] = $data[$i][bayar];
}
} else {
$new[$data[$i][bulan]][LAIN] = $data[$i][bayar];
}
$new[$data[$i][bulan]][JUMLAH] += $data[$i][bayar];
} else {
if($data[$i][cara_bayar] == "UMUM") {
$new[$data[$i][bulan]][UMUM] = $data[$i][bayar];
} elseif($data[$i][cara_bayar] == "JAMSOSTEK") {
$new[$data[$i][bulan]][JAMSOSTEK] = $data[$i][bayar];
} elseif($data[$i][cara_bayar] == "DANA REKSA DESA") {
$new[$data[$i][bulan]][DANA_REKSA_DESA] = $data[$i][bayar];
} elseif($data[$i][cara_bayar] == "KONTRAK") {
$new[$data[$i][bulan]][KONTRAK] = $data[$i][bayar];
} elseif($data[$i][cara_bayar] == "ASKES"){
if($data[$i][jenis_askes] == "Askes Kin") {
$new[$data[$i][bulan]][ASKESKIN] = $data[$i][bayar];
} else {
$new[$data[$i][bulan]][ASKES_LAIN] = $data[$i][bayar];
}
} else {
$new[$data[$i][bulan]][LAIN] = $data[$i][bayar];
}
$new[$data[$i][bulan]][JUMLAH] = $data[$i][bayar];
}
}
for($i=1;$i<13;$i++) {
$bulan = bulanIndo($i, "F");
$kumulatif += $new[$i][JUMLAH];
$persen_pendapatan = @round($new[$i][JUMLAH]*100/$kumulatif,2);
$persen_kumulatif = @round($kumulatif*100/$val["bulan_" . $i],2);
$table->addRow(
$i,
$bulan,
uangIndo($new[$i][UMUM], false),
uangIndo($new[$i][JAMSOSTEK], false),
uangIndo($new[$i][DANA_REKSA_DESA], false),
uangIndo($new[$i][KONTRAK], false),
uangIndo($new[$i][ASKESKIN], false),
uangIndo($new[$i][ASKES_LAIN], false),
uangIndo($new[$i][LAIN], false),
uangIndo($new[$i][JUMLAH], false),
uangIndo($kumulatif, false),
uangIndo($val["bulan_" . $i], false),
uangIndo($persen_pendapatan, false),
uangIndo($persen_kumulatif)
);
$table->addExtraTd(
"",
"",
"style=\"text-align:right\"",
"style=\"text-align:right\"",
"style=\"text-align:right\"",
"style=\"text-align:right\"",
"style=\"text-align:right\"",
"style=\"text-align:right\"",
"style=\"text-align:right\"",
"style=\"text-align:right\"",
"style=\"text-align:right\"",
"style=\"text-align:right\"",
"style=\"text-align:right\"",
"style=\"text-align:right\""
);
$total[UMUM] += $new[$i][UMUM];
$total[JAMSOSTEK] += $new[$i][JAMSOSTEK];
$total[DANA_REKSA_DESA] += $new[$i][DANA_REKSA_DESA];
$total[KONTRAK] += $new[$i][KONTRAK];
$total[ASKESKIN] += $new[$i][ASKESKIN];
$total[ASKES_LAIN] += $new[$i][ASKES_LAIN];
$total[LAIN] += $new[$i][LAIN];
$total[JUMLAH] += $new[$i][JUMLAH];
$total[kumulatif] += $kumulatif;
$total[target] += $val["bulan_" . $i];
$table->addExtraTr("onclick=\"setBg(this);\"");
}
$table->addTfoot(
"TOTAL",
uangIndo($total[UMUM], false),
uangIndo($total[JAMSOSTEK], false),
uangIndo($total[DANA_REKSA_DESA], false),
uangIndo($total[KONTRAK], false),
uangIndo($total[ASKESKIN], false),
uangIndo($total[ASKES_LAIN], false),
uangIndo($total[LAIN], false),
uangIndo($total[JUMLAH], false),
uangIndo($total[kumulatif], false),
uangIndo($total[target], false),
"-","-"
);
$table->addExtraTfoot("colspan=\"2\"");
$content = $table->build();
$judul = nl2br($title);
//$objResponse->addAlert(print_r($new));
$objResponse->addAssign("title", "innerHTML", $judul);
$objResponse->addAssign("list_data", "innerHTML", $content);
$_SESSION[keuangan][lap_keuangan_bulanan][title] = $judul;
$_SESSION[keuangan][lap_keuangan_bulanan][content] = $content;
return $objResponse;
}
$this->thoni_fpdf->Ln(0.5);
$this->thoni_fpdf->SetFont('helvetica', 'B', 10);
$this->thoni_fpdf->Cell(19, 1, 'Nama Karyawan', 0, 0, 'L');
$this->thoni_fpdf->SetFont('helvetica', '', 10);
$this->thoni_fpdf->Cell(-15.5);
$this->thoni_fpdf->Cell(19, 1, ':', 0, 0, 'L');
$this->thoni_fpdf->Cell(-18.5);
$this->thoni_fpdf->Cell(19, 1, $faktur->employee_name, 0, 0, 'L');
$this->thoni_fpdf->Ln(0.5);
$this->thoni_fpdf->SetFont('helvetica', 'B', 10);
$this->thoni_fpdf->Cell(19, 1, 'Penggajian Periode', 0, 0, 'L');
$this->thoni_fpdf->SetFont('helvetica', '', 10);
$this->thoni_fpdf->Cell(-15.5);
$this->thoni_fpdf->Cell(19, 1, ':', 0, 0, 'L');
$this->thoni_fpdf->Cell(-18.5);
$this->thoni_fpdf->Cell(19, 1, bulanIndo($faktur->bulan) . ' ' . $faktur->tahun, 0, 0, 'L');
$this->thoni_fpdf->Line(1, 4.8, 20, 4.8);
$this->thoni_fpdf->Ln(1.3);
$this->thoni_fpdf->SetFont('helvetica', 'B', 12);
$this->thoni_fpdf->Cell(19, 1, 'PENERIMAAN', 0, 0, 'L');
$this->thoni_fpdf->SetFont('helvetica', 'B', 12);
$this->thoni_fpdf->Cell(-9);
$this->thoni_fpdf->Cell(19, 1, 'POTONGAN', 0, 0, 'L');
$this->thoni_fpdf->Ln(0.75);
$this->thoni_fpdf->SetFont('helvetica', 'B', 10);
$this->thoni_fpdf->Cell(19, 1, 'Gaji Pokok', 0, 0, 'L');
$this->thoni_fpdf->SetFont('helvetica', '', 10);
$this->thoni_fpdf->Cell(-15.5);
$this->thoni_fpdf->Cell(19, 1, ':', 0, 0, 'L');
$this->thoni_fpdf->Cell(-18.5);
$this->thoni_fpdf->Cell(19, 1, format_rupiah($faktur->gaji_pokok), 0, 0, 'L');
function get_lap_rl2a1($val) {
$objResponse = new xajaxResponse;
$dtd = array('292.0','292.2','292.4','292.6','292.8');
$dtd_kecuali = implode("','", $dtd);
$kon = new Konek;
$sql = "
SELECT
i.no_dtd as no_dtd,
i.kode_icd as kode_icd,
i.gol_sebab_sakit as gol_sebab_sakit,
p.tgl_lahir as tgl_lahir,
kk.tgl_keluar as tgl_keluar,
p.sex as sex,
k.keadaan_keluar as keadaan_keluar
FROM
kunjungan_kamar kk
JOIN kunjungan k ON (k.id = kk.kunjungan_id)
JOIN pasien p ON (p.id = k.pasien_id)
JOIN kamar kmr ON (kmr.id = kk.kamar_id)
JOIN pelayanan pel ON (pel.id = kmr.pelayanan_id)
JOIN icd i ON (i.id = kk.diagnosa_utama_id)
WHERE
kk.tgl_keluar IS NOT NULL
AND pel.jenis = 'RAWAT INAP'
AND kk.kelanjutan IN ('DIRUJUK', 'PULANG')
AND i.no_dtd NOT IN ('" . $dtd_kecuali . "')
AND EXTRACT(YEAR_MONTH FROM kk.tgl_keluar) = EXTRACT(YEAR_MONTH FROM '".$val[tahun]."-".$val[bulan]."-01')
ORDER BY i.no_dtd
";
//$objResponse->addAssign("debug", "innerHTML", $sql);
$kon->sql = $sql;
$kon->execute();
$data = $kon->getAll();
$baru = array();
$s = 0;
for($i=0;$i<sizeof($data);$i++) {
$umur = hitungUmur($data[$i][tgl_lahir], $data[$i][tgl_keluar]);
$umur_tahun = $umur[tahun];
$umur_hari = $umur[hari];
if($data[$i][no_dtd] == $data[$i-1][no_dtd]) {
//bikin anak
//nggabungin kode icd
if($baru[$s][kode_icd] != $data[$i][kode_icd]) $baru[$s][kode_icd] = $baru[$s][kode_icd] . ", " . $data[$i][kode_icd];
if($umur[tahun] > 64) {
$baru[$s]['nam_lima'] += 1;
$total['nam_lima'] += 1;
} elseif ($umur[tahun] > 44) {
$baru[$s]['pat_lima'] += 1;
$total['pat_lima'] += 1;
} elseif ($umur[tahun] > 24) {
$baru[$s]['dua_lima'] += 1;
$total['dua_lima'] += 1;
} elseif ($umur[tahun] > 14) {
$baru[$s]['lima_belas'] += 1;
$total['lima_belas'] += 1;
} elseif ($umur[tahun] > 4) {
$baru[$s]['lima'] += 1;
$total['lima'] += 1;
} elseif ($umur[tahun] >=1) {
$baru[$s]['satu'] += 1;
$total['satu'] += 1;
} elseif ($umur[hari] > 27) {
$baru[$s]['dua_lapan'] += 1;
$total['dua_lapan'] += 1;
} else {
$baru[$s]['nol'] += 1;
$total['nol'] += 1;
}
//sex
if($data[$i][sex] == "LAKI-LAKI") {
$baru[$s][sex_laki] += 1;
$total['sex_laki'] += 1;
$total['total'] += 1;
} else {
$baru[$s][sex_prp] += 1;
$total['sex_prp'] += 1;
$total['total'] += 1;
}
if($data[$i][keadaan_keluar] == "MATI < 48 JAM" || $data[$i][keadaan_keluar] == "MATI >= 48 JAM") {
$baru[$s][mati] += 1;
$total['mati'] += 1;
}
$baru[$s][total] = $baru[$s][sex_prp] + $baru[$s][sex_laki];
} else {
//bikin embok
if($i!=0) {
$s++;
}
$baru[$s][no_dtd] = $data[$i][no_dtd];
$baru[$s][kode_icd] = $data[$i][kode_icd];
$baru[$s][gol_sebab_sakit] = $data[$i][gol_sebab_sakit];
$baru[$s][tgl_lahir] = $data[$i][tgl_lahir];
$baru[$s][tgl_keluar] = $data[$i][tgl_keluar];
if($umur[tahun] > 64) {
$baru[$s]['nam_lima'] = 1;
$total['nam_lima'] += 1;
} elseif ($umur[tahun] > 44) {
$baru[$s]['pat_lima'] = 1;
$total['pat_lima'] += 1;
} elseif ($umur[tahun] > 24) {
$baru[$s]['dua_lima'] = 1;
$total['dua_lima'] += 1;
} elseif ($umur[tahun] > 14) {
$baru[$s]['lima_belas'] = 1;
$total['lima_belas'] += 1;
} elseif ($umur[tahun] > 4) {
$baru[$s]['lima'] = 1;
$total['lima'] += 1;
} elseif ($umur[tahun] >=1) {
$baru[$s]['satu'] = 1;
$total['satu'] += 1;
} elseif ($umur[hari] > 27) {
$baru[$s]['dua_lapan'] = 1;
$total['dua_lapan'] += 1;
} else {
$baru[$s]['nol'] = 1;
$total['nol'] += 1;
}
//sex
if($data[$i][sex] == "LAKI-LAKI") {
$baru[$s][sex_laki] = 1;
$total['sex_laki'] += 1;
$total['total'] += 1;
} else {
$baru[$s][sex_prp] = 1;
$total['sex_prp'] += 1;
$total['total'] += 1;
}
if($data[$i][keadaan_keluar] == "MATI < 48 JAM" || $data[$i][keadaan_keluar] == "MATI >= 48 JAM") {
$baru[$s][mati] = 1;
$total['mati'] += 1;
}
$baru[$s][total] = $baru[$s][sex_prp] + $baru[$s][sex_laki];
}
}
$tabel_all = new Table;
$tabel_all->scroll = false;
$tabel_all->extra_table = "style=\"width:27cm;margin:0\"";
$tabel_all->cellspacing="0";
$tabel_all->css_table="";
$tabel_all->anime_bg_color="";
$tabel_header = new Table;
$tabel_header->scroll = false;
$tabel_header->extra_tr_th = "";
$tabel_header->cellspacing="0";
$tabel_header->css_table="";
$tabel_header->anime_bg_color="";
$tabel_header->extra_table = "style=\"width:27cm;border:0;\"";
$tabel_header->addTh("","DATA KEADAAN MORBIDITAS RAWAT INAP SURVEILANS TERPADU RUMAH SAKIT<br />BULAN : ".bulanIndo($val[bulan], "F")."<br />TAHUN : ".$val[tahun]."");
//$tabel_header->addExtraTh("colspan=\"3\"");
$tabel_header->addRow("","","Formulir RL2a1");
//$tabel_header->addExtraTh();
$tabel_header->addRow($_SESSION[setting][rs_nama], "", "No. Kode RS : " . $_SESSION[setting][rs_kode]);
//$tabel_header->addExtraTh("colspan=\"3\"");
$tabel_isi = new Table;
$tabel_isi->scroll = false;
$tabel_isi->cellspacing="0";
$tabel_isi->extra_table = "style=\"width:27cm;font-size:7pt;\"";
$tabel_header->css_table="";
$tabel_isi->addTh(
"NO. URUT",
"NO. DTD",
"NO. DAFTAR<br />TERPERINCI",
"GOLONGAN SEBAB-SEBAB SAKIT",
"PASIEN KELUAR (HIDUP & MATI)<br />MENURUT GOLONGAN UMUR",
"PASIEN KELUAR<br />(HIDUP & MATI)<br />MENURUT SEX",
"JUMLAH<br />PASIEN<br />KELUAR<br />(13+14)",
"JUMLAH<br />PASIEN<br />KELUAR<br />MATI"
);
$tabel_isi->addExtraTh("rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"", "colspan=\"8\"", "colspan=\"2\"", "rowspan=\"2\"", "rowspan=\"2\"");
$tabel_isi->addTh("0-28 HR", "28 HR - <1 TH", "1-4 TH", "5-14 TH", "15-24 TH", "25-44 TH", "45-64 TH", "65+ TH", "LK", "PR");
$tabel_isi->addTh("1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", "14", "15", "16");
for($i=0;$i<sizeof($baru);$i++) {
$tabel_isi->addRow(
($i+1),
$baru[$i][no_dtd],
$baru[$i][kode_icd],
$baru[$i][gol_sebab_sakit],
$baru[$i][nol],
$baru[$i][dua_lapan],
$baru[$i][satu],
$baru[$i][lima],
$baru[$i][lima_belas],
$baru[$i][dua_lima],
$baru[$i][pat_lima],
$baru[$i][nam_lima],
$baru[$i][sex_laki],
$baru[$i][sex_prp],
$baru[$i][total],
$baru[$i][mati]
);
}
$tabel_isi->addRow(
"","","","Total",
$total[nol],
$total[dua_lapan],
$total[satu],
$total[lima],
$total[lima_belas],
$total[dua_lima],
$total[pat_lima],
$total[nam_lima],
$total[sex_laki],
$total[sex_prp],
$total[total],
$total[mati]
);
$ret_tabel_header = $tabel_header->build();
$ret_tabel_isi = $tabel_isi->build();
$tabel_all->addRow($ret_tabel_header);
$tabel_all->addRow($ret_tabel_isi);
$ret = $tabel_all->build();
unset($_SESSION[rekmed][lap_rl2a1]);
$cetak = new Cetak;
$tanda_tangan = $cetak->setTandaTangan();
$ret .= $tanda_tangan;
$_SESSION[rekmed][lap_rl2a1] = $ret;
$objResponse->addAssign("list_data", "innerHTML", $ret);
return $objResponse;
}
