903 lines
84 KiB
PHP
903 lines
84 KiB
PHP
<?php
|
|
include( 'core/main.php' );
|
|
|
|
if ($_POST) {
|
|
$tgl = date( 'Y-m-d' );
|
|
extract( $_POST );
|
|
|
|
if ($reqdata == 'masuk') {
|
|
echo 'OK';
|
|
}
|
|
|
|
if (( $reqdata == 'propinsi' && !empty( $nama ) )) {
|
|
$s ='SELECT idprovinsi from m_propinsi where namaprovinsi=\'' . $nama . '\'';
|
|
$h = $db->query( $s );
|
|
$r = $h->fetchAll()[0];
|
|
$sql ='SELECT nama_kota as kabupaten from m_kota where idprovinsi=\'' . $r['idprovinsi'] . '\' order by nama_kota';
|
|
$hasil = $db->query( $sql );
|
|
|
|
foreach($hasil->fetchAll() as $row) {
|
|
extract( $row );
|
|
echo'<option>' . $kabupaten . '</option> ';
|
|
}
|
|
}
|
|
|
|
///////////////// AWAL RL2 ////////////////////
|
|
if ($reqdata == 'save_rl2') {
|
|
$sql3 = $db->query('SELECT code_list as kode from m_rl2 where description=\'' . $tenaga . '\'' );
|
|
$r3 = $sql3->fetchAll()[0];
|
|
extract( $r3 );
|
|
$sql = $db->query('SELECT code_list from rl2 where kode_rs=\'' . $koders . '\' and code_list=\'' . $kode . '\' and smt=\'' . $smt . '\' and tahun=\'' . $tahun . '\'' );
|
|
$r = $sql->numRows();
|
|
|
|
if (1 <= $r) {
|
|
if (!empty( $kode )) {
|
|
$sql = $db->query('update RL2 set tetap=\'' . $tetap . '\',tidak_tetap=\'' . $t_tetap . '\',tahun=\'' . $tahun . '\' where code_list=\'' . $kode . '\' and tahun=\'' . $tahun1 . '\' and smt=\'' . $smt1 . '\'' );
|
|
} else {
|
|
echo 'Data Tenaga ' . $tenaga . ' Sudah ada, silahkan klik icon update pada tabel untuk Update Data';
|
|
}
|
|
} else {
|
|
$sql = $db->query('INSERT INTO rl2 (code_list,tetap,tidak_tetap,kode_rs,smt,tahun) values(\'' . $kode . '\',\'' . $tetap . '\',\'' . $t_tetap . '\',\'' . $koders . '\',\'' . $smt . '\',\'' . $tahun . '\')' );
|
|
echo 'Data Tenaga ' . $tenaga . ' Sudah Tersimpan';
|
|
}
|
|
|
|
$sql2 = $db->query('SELECT a.code_list,a.tetap,a.tidak_tetap,a.kode_rs,a.smt,a.tahun,b.description from rl2 a left join m_rl2 b on b.code_list=a.code_list where kode_rs=\'' . $koders . '\'' );
|
|
echo '<table id=\'tbl_reg\'><tr id=\'tr_d\' style=\'border-bottom:1px solid grey;\'>
|
|
<th>Kode</th><th>Tenaga</th><th>Jumlah Tenaga</th><th>Tetap</th><th>Tidak Tetap</th><th>Semester</th><th>Tahun</th><th>-</th>
|
|
</tr>';
|
|
|
|
foreach ($sql2->fetchAll() as $row) {
|
|
extract( $row );
|
|
$total = $tetap + $tidak_tetap;
|
|
|
|
if ($smt == 1) {
|
|
$semt = 'I';
|
|
} else {
|
|
$semt = 'II';
|
|
}
|
|
|
|
echo '
|
|
<tr class=\'tr_s\'><td>' . $code_list . '</td><td>' . $description . '</td><td align=\'right\'>' . $total . '</td><td align=\'right\'>' . $tetap . '</td><td align=\'right\'>' . $tidak_tetap . '</td><td align=\'center\'>' . $semt . '</td><td align=\'center\'>' . $tahun . '</td><td align=\'center\'><a href=\'index.php?link=rl2&id=' . $code_list . '&smt=' . $smt . '&koders=' . $kode_rs . '&tahun=' . $tahun . '\'><img src=\'img/icon_edit_new.gif\' border=0></a> <a href=\'rm/hapus_rl2.php?id=' . $code_list . '&smt=' . $smt . '&koders=' . $kode_rs . '&tahun=' . $tahun . '\'><img src=\'img/icon_delete.gif\' border=0></a></td>
|
|
</tr>';
|
|
}
|
|
|
|
$sql_s = $db->query('SELECT SUM(tetap) as tetap1, SUM(tidak_tetap) as t_tetap1 from rl2 where kode_rs=\'' . $koders . '\' and smt=\'1\'' );
|
|
$r_s = $sql_s->fetchAll()[0];
|
|
extract( $r_s );
|
|
$total_1 = $tetap1 + $t_tetap1;
|
|
$sql_s2 = $db->query('SELECT SUM(tetap) as tetap2, SUM(tidak_tetap) as t_tetap2 from rl2 where kode_rs=\'' . $koders . '\' and smt=\'2\'' );
|
|
$r_s2 = $sql_s2->fetchAll()[0];
|
|
extract( $r_s2 );
|
|
$total_2 = $tetap2 + $t_tetap2;
|
|
echo'<tr id=\'tr_d\'>
|
|
<td colspan=2>Jumlah Tenaga Semester I : </td><td class=\'td_t\' align=\'right\'>' . $total_1 . '</td><td class=\'td_t\' align=\'right\'>' . $tetap1 . '</td><td class=\'td_t\' align=\'right\'>' . $t_tetap1 . '</td><td colspan=3> </td>
|
|
</tr>
|
|
<tr id=\'tr_d\'>
|
|
<td colspan=2>Jumlah Tenaga Semester II : </td><td class=\'td_t\' align=\'right\'>' . $total_2 . '</td><td class=\'td_t\' align=\'right\'>' . $tetap2 . '</td><td class=\'td_t\' align=\'right\'>' . $t_tetap2 . '</td><td colspan=3> </td>
|
|
</tr>
|
|
';
|
|
echo '</table>';
|
|
}
|
|
|
|
|
|
if ($reqdata == 'pencarian_rl2') {
|
|
if (empty( $nama )) {
|
|
$sql = $db->query('SELECT a.code_list,a.tetap,a.tidak_tetap,a.kode_rs,a.smt,a.tahun,b.description from rl2 a left join m_rl2 b on b.code_list=a.code_list where a.kode_rs=\'' . $koders . '\'' );;
|
|
} else {
|
|
if (!empty( $nama )) {
|
|
$sql3 = $db->query('SELECT code_list as kode from m_rl2 where description=\'' . $nama . '\'' );;
|
|
$r3 = $sql3->fetchAll()[0];
|
|
extract( $r3 );
|
|
$sql = $db->query('SELECT a.code_list,a.tetap,a.tidak_tetap,a.kode_rs,a.smt,a.tahun,b.description from rl2 a left join m_rl2 b on b.code_list=a.code_list where a.code_list=\'' . $kode . '\' and a.kode_rs=\'' . $koders . '\'' );
|
|
}
|
|
}
|
|
|
|
echo '
|
|
<table id=\'tbl_reg\'><tr id=\'tr_s\' style=\'border-bottom:1px solid grey;\'>
|
|
<th>Kode</th><th>Tenaga</th><th>Jumlah Tenaga</th><th>Tetap</th><th>Tidak Tetap</th><th>Semester</th><th>Tahun</th><th>-</th>
|
|
</tr>';
|
|
|
|
foreach ($sql->fetchAll() as $row) {
|
|
extract( $row );
|
|
$total = $tetap + $tidak_tetap;
|
|
|
|
if ($smt == 1) {
|
|
$semt = 'I';
|
|
} else {
|
|
$semt = 'II';
|
|
}
|
|
|
|
echo'
|
|
<tr class=\'tr_s\' style=\'border-bottom:1px solid grey;\'><td style=\'border-left:1px solid grey;\'>' . $code_list . '</td><td style=\'border-left:1px solid grey;\'>' . $description . '</td><td align=\'right\' style=\'border-left:1px solid grey;\'>' . $total . '</td><td align=\'right\' style=\'border-left:1px solid grey;\'>' . $tetap . '</td><td align=\'right\' style=\'border-left:1px solid grey;\'>' . $tidak_tetap . '</td><td align=\'center\' style=\'border-left:1px solid grey;\'>' . $semt . '</td><td align=\'center\' style=\'border-left:1px solid grey;\'>' . $tahun . '</td><td align=\'center\' style=\'border-left:1px solid grey;\'><a href=\'index.php?link=rl2&id=' . $code_list . '&smt=' . $smt . '&koders=' . $kode_rs . '&tahun=' . $tahun . '\'><img src=\'img/icon_edit_new.gif\' border=0></a> <a href=\'rm/hapus_rl2.php?id=' . $code_list . '&smt=' . $smt . '&koders=' . $kode_rs . '&tahun=' . $tahun . '\'><img src=\'img/icon_delete.gif\' border=0></a></td>
|
|
</tr>';
|
|
}
|
|
|
|
$sql_s = $db->query('SELECT SUM(tetap) as tetap1, SUM(tidak_tetap) as t_tetap1 from rl2 where kode_rs=\'' . $koders . '\' and smt=\'1\'' );
|
|
$r_s = $sql_s->fetchAll()[0];
|
|
extract( $r_s );
|
|
$total_1 = $tetap1 + $t_tetap1;
|
|
$sql_s2 = $db->query('SELECT SUM(tetap) as tetap2, SUM(tidak_tetap) as t_tetap2 from rl2 where kode_rs=\'' . $koders . '\' and smt=\'2\'' );
|
|
$r_s2 = $sql_s2->fetchAll()[0];
|
|
extract( $r_s2 );
|
|
$total_2 = $tetap2 + $t_tetap2;
|
|
echo'<tr id=\'tr_d\'>
|
|
<td colspan=2>Jumlah Tenaga Semester I : </td><td class=\'td_t\' align=\'right\'>' . $total_1 . '</td><td class=\'td_t\' align=\'right\'>' . $tetap1 . '</td><td class=\'td_t\' align=\'right\'>' . $t_tetap1 . '</td><td colspan=3> </td>
|
|
</tr>
|
|
<tr id=\'tr_d\'>
|
|
<td colspan=2>Jumlah Tenaga Semester II : </td><td class=\'td_t\' align=\'right\'>' . $total_2 . '</td><td class=\'td_t\' align=\'right\'>' . $tetap2 . '</td><td class=\'td_t\' align=\'right\'>' . $t_tetap2 . '</td><td colspan=3> </td>
|
|
</tr>
|
|
';
|
|
echo '</table>';
|
|
}
|
|
|
|
|
|
if ($reqdata == 'xml_rl2') {
|
|
if (( empty( $bln ) && empty( $tahun ) )) {
|
|
$sql2 = $db->query('SELECT a.kode_rs,a.code_list,a.tetap,a.tidak_tetap,a.smt,a.tahun from rl2 a left join m_rl2 b on b.code_list=a.code_list where kode_rs=\'' . $koders . '\' order by a.code_list Asc' );
|
|
} else {
|
|
if (( empty( $bln ) && !empty( $tahun ) )) {
|
|
$sql2 = $db->query('SELECT a.kode_rs,a.code_list,a.tetap,a.tidak_tetap,a.smt,a.tahun from rl2 a left join m_rl2 b on b.code_list=a.code_list where kode_rs=\'' . $koders . '\' and tahun=\'' . $tahun . '\' order by a.code_list Asc' );
|
|
} else {
|
|
if (( !empty( $bln ) && empty( $tahun ) )) {
|
|
$sql2 = $db->query('SELECT a.kode_rs,a.code_list,a.tetap,a.tidak_tetap,a.smt,a.tahun from rl2 a left join m_rl2 b on b.code_list=a.code_list where kode_rs=\'' . $koders . '\' and smt=\'' . $bln . '\' order by a.code_list Asc' );
|
|
} else {
|
|
if (( !empty( $bln ) && !empty( $tahun ) )) {
|
|
$sql2 = $db->query('SELECT a.kode_rs,a.code_list,a.tetap,a.tidak_tetap,a.smt,a.tahun from rl2 a left join m_rl2 b on b.code_list=a.code_list where kode_rs=\'' . $koders . '\' and tahun=\'' . $tahun . '\' and smt=\'' . $bln . '\' order by a.code_list Asc' );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
$xml = new SimpleXMLElement( '<xml/>' );
|
|
|
|
foreach ($sql2->fetchAll() as $r) {
|
|
extract( $r );
|
|
$data = $xml->addChild( 'data' );
|
|
$data->addChild( 'code', $code_list );
|
|
$data->addChild( 'tetap', $tetap );
|
|
$data->addChild( 'tidak_tetap', $tidak_tetap );
|
|
$data->addChild( 'smt', $smt );
|
|
$data->addChild( 'tahun', $tahun );
|
|
}
|
|
|
|
$fp = fopen( 'xml/rl2_' . $bln . '_' . $tahun . '.xml', 'wb' );
|
|
fwrite( $fp, $xml->asXML( ) );
|
|
fclose( $fp );
|
|
$file = 'rl2_' . $bln . '_' . $tahun . '.xml';
|
|
echo'<a href=\'download.php?xml=' . $file . '\'>' . $file . '</a>';
|
|
}
|
|
//////////////////////////AKHIR RL2/////////////
|
|
|
|
//////////////AWAL BATAS RL41////////////////
|
|
if ($reqdata == 'cari_rl41') {
|
|
echo '
|
|
<table id=\'tbl_reg\'><tr id=\'tr_d\' style=\'border-bottom:1px solid grey;\'>
|
|
<th rowspan=\'3\' style=\'border:1px solid grey;\'>No. DTD</th>
|
|
<th rowspan=\'3\' style=\'border:1px solid grey;\'>No. Daftar Terperinci</th>
|
|
<th rowspan=\'3\' style=\'border:1px solid grey;\'>Golongan Sebab Penyakit</th>
|
|
<th colspan=\'18\' style=\'border:1px solid grey;\'>Jumlah Pasien Hidup/Mati Menurut Umur dan Jenis Kelamin</th>
|
|
<th colspan=\'2\' rowspan=\'2\' style=\'border:1px solid grey;\'>Jumlah Pasien Keluar (Hidup & Mati) Menurut Jenis Kelamin</th>
|
|
<th rowspan=\'3\' style=\'border:1px solid grey;\'>Jumlah Pasien Keluar (Hidup & Mati)</th>
|
|
<th rowspan=\'3\' style=\'border:1px solid grey;\'>Jumlah Pasien Keluar Mati</th>
|
|
<th rowspan=\'3\' style=\'border:1px solid grey;\'>Bulan</th><th rowspan=\'3\' style=\'border:1px solid grey;\'>Tahun</th>
|
|
|
|
</tr>
|
|
<tr id=\'tr_d\' style=\'border-bottom:1px solid grey;\'>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'> 0-6hr </th><th style=\'border:1px solid grey;\' colspan=\'2\'> 7-28hr </th><th style=\'border:1px solid grey;\' colspan=\'2\'>29hr-<1th</th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'> 1-4th </th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'> 5-14th </th><th style=\'border:1px solid grey;\' colspan=\'2\'> 15-24th </th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'> 25-44th </th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'> 45-64th</th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'> >65th</th>
|
|
</tr>
|
|
<tr id=\'tr_d\' style=\'border-bottom:1px solid grey;\'>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
</tr>';
|
|
|
|
if (( empty( $bln ) && empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TGLMASUK::varchar(10) LIKE '".date('Y')."-%' ";
|
|
$tanggal2 = " AND a.TGLMASUK::varchar(10) LIKE '%-".date('m')."-%' ";
|
|
} else {
|
|
if (( empty( $bln ) && !empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TGLMASUK::varchar(10) LIKE '".$tahun."-%' ";
|
|
$tanggal2 = "";
|
|
}else {
|
|
if (( !empty( $bln ) && empty( $tahun ) )) {
|
|
$tanggal1 = "";
|
|
$tanggal2 = " AND a.TGLMASUK::varchar(10) LIKE '%-".$bln."-%' ";
|
|
}else {
|
|
if (( !empty( $bln ) && !empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TGLMASUK::varchar(10) LIKE '".$tahun."-%' ";
|
|
$tanggal2 = " AND a.TGLMASUK::varchar(10) LIKE '%-".$bln."-%' ";
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
$sql2 = $db->query("SELECT DISTINCT b2.icd_code
|
|
FROM t_resumepulang a
|
|
LEFT JOIN t_icd b ON a.idadmission=b.idxdaftar
|
|
join icd b2 on b.icd = b2.icd_code
|
|
JOIN t_admission c ON a.idadmission=c.id_admission
|
|
JOIN m_pasien d ON d.NOMR=a.NOMR
|
|
WHERE b.status_rajal = 0 and $tanggal1 $tanggal2 ");
|
|
|
|
//SELECT ? FROM ?
|
|
$kondisi_SELECT = " a.ICDKELUAR FROM t_resumepulang a
|
|
LEFT JOIN icd b ON a.ICDKELUAR=b.icd_code
|
|
INNER JOIN t_admission c ON a.IDADMISSION=c.id_admission
|
|
INNER JOIN m_pasien d ON d.NOMR=a.NOMR ";
|
|
//WHERE NIP STATUS JENIS KELAMIN L
|
|
$nip_status_jkL = "AND a.NIP='rekammedik' AND a.JENISKELAMIN='L' ";
|
|
//WHERE NIP STATUS JENIS KELAMIN P
|
|
$nip_status_jkP = "AND a.NIP='rekammedik' AND a.JENISKELAMIN='P' ";
|
|
|
|
foreach ($sql2->fetchAll() as $r) {
|
|
extract( $r );
|
|
$bln = m_to_id($bln);
|
|
|
|
echo'<tr class=\'tr_s\'>
|
|
<td style=\'border:1px solid grey;\'>'; $sqldtd = $db->query("SELECT dtd FROM icd WHERE icd_code ='$icd_code' ")->fetchAll()[0];extract( $sqldtd );echo $dtd; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>' . $icd_code . '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $sqlsebabpenyakit = $db->query("SELECT sebabpenyakit FROM icd WHERE icd_code ='$icd_code' ")->fetchAll()[0];extract( $sqlsebabpenyakit );echo $sebabpenyakit; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml6L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('d.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('d.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml6L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml6P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('d.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('d.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml6P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml28L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('d.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('d.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml28L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml28P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('d.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('d.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml28P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml1L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('d.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<'1' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml1L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml1P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('d.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<'1' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml1P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml4L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='4' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml4L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml4P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='4' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml4P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml14L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='14' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml14L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml14P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='14' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml14P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml24L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='24' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml24L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml24P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='24' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml24P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml44L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<'44' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml44L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml44P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<'44' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml44P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='64' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml64L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='64' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml64P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml65_L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">'65' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml64_L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml65_P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">'65' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml64_P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlTL = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jmlTL; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlTP = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jmlTP; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlT = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND a.NIP='rekammedik' $tanggal1 $tanggal2 ")->numRows(); echo $jmlT; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlTM = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND a.NIP='rekammedik' AND a.STATUSPULANG ='7' $tanggal1 $tanggal2 ")->numRows(); echo $jmlTM; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>' . $bln . '</td>
|
|
<td style=\'border:1px solid grey;\'>' . $tahun . '</td>';
|
|
|
|
echo '</tr>';
|
|
}
|
|
|
|
echo'<tr class=\'tr_s\'>
|
|
<td style=\'border:1px solid grey;\' colspan=3>Total Bulan ' . $bln . ' Tahun ' . $tahun . '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml6L = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('d.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('d.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml6L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml6P = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('d.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('d.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml6P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml28L = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('d.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('d.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml28L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml28p = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('d.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('d.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml28P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml1L = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('d.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<'1' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml1L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml1P = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('d.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<'1' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml1P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml4L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('d.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='4' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml4L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml4P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('d.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='4' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml4P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml14L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('d.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='14' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml14L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml14P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('d.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='14' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml14P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml24L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('d.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='24' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml24L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml24P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('d.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='24' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml24P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml44L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('d.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<'44' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml44L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml44P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('d.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<'44' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml44P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('d.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='64' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml64L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('d.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='64' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml64P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64_L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('d.tgllahir','year').">'65' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml64_L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64_P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('d.tgllahir','year').">'65' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml64_P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlSTL = $db->query("SELECT $kondisi_SELECT WHERE a.NIP='rekammedik' AND a.JENISKELAMIN='L' $tanggal1 $tanggal2 ")->numRows(); echo $jmlSTL; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlSTP = $db->query("SELECT $kondisi_SELECT WHERE a.NIP='rekammedik' AND a.JENISKELAMIN='P' $tanggal1 $tanggal2 ")->numRows(); echo $jmlSTP; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlST = $db->query("SELECT $kondisi_SELECT WHERE a.NIP='rekammedik' $tanggal1 $tanggal2 ")->numRows(); echo $jmlST; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlST = $db->query("SELECT $kondisi_SELECT WHERE a.NIP='rekammedik' AND a.STATUSPULANG ='7' $tanggal1 $tanggal2 ")->numRows(); echo $jmlST; echo '</td>
|
|
<td style=\'border:1px solid grey;\' colspan=3 align=\'center\'>-</td>
|
|
';
|
|
echo '</tr>';
|
|
echo '</table>';
|
|
}
|
|
|
|
|
|
|
|
if ($reqdata == 'xml_rl41') {
|
|
if (( empty( $bln ) && empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TGLMASUK::varchar(10) LIKE '".date('Y')."-%' ";
|
|
$tanggal2 = " AND a.TGLMASUK::varchar(10) LIKE '%-".date('m')."-%' ";
|
|
} else {
|
|
if (( empty( $bln ) && !empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TGLMASUK::varchar(10) LIKE '".$tahun."-%' ";
|
|
$tanggal2 = "";
|
|
}else {
|
|
if (( !empty( $bln ) && empty( $tahun ) )) {
|
|
$tanggal1 = "";
|
|
$tanggal2 = " AND a.TGLMASUK::varchar(10) LIKE '%-".$bln."-%' ";
|
|
}else {
|
|
if (( !empty( $bln ) && !empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TGLMASUK::varchar(10) LIKE '".$tahun."-%' ";
|
|
$tanggal2 = " AND a.TGLMASUK::varchar(10) LIKE '%-".$bln."-%' ";
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
$sql2 = $db->query("SELECT DISTINCT b.icd_code
|
|
FROM t_resumepulang a
|
|
LEFT JOIN icd b ON a.ICDKELUAR=b.icd_code
|
|
INNER JOIN t_admission c ON a.IDADMISSION=c.id_admission
|
|
INNER JOIN m_pasien d ON d.NOMR=a.NOMR
|
|
WHERE
|
|
a.NIP='rekammedik' $tanggal1 $tanggal2 ");
|
|
|
|
//SELECT ? FROM ?
|
|
$kondisi_SELECT = " a.ICDKELUAR FROM t_resumepulang a
|
|
LEFT JOIN icd b ON a.ICDKELUAR=b.icd_code
|
|
INNER JOIN t_admission c ON a.IDADMISSION=c.id_admission
|
|
INNER JOIN m_pasien d ON d.NOMR=a.NOMR ";
|
|
//WHERE NIP STATUS JENIS KELAMIN L
|
|
$nip_status_jkL = "AND a.NIP='rekammedik' AND a.JENISKELAMIN='L' ";
|
|
//WHERE NIP STATUS JENIS KELAMIN P
|
|
$nip_status_jkP = "AND a.NIP='rekammedik' AND a.JENISKELAMIN='P' ";
|
|
|
|
$xml = new SimpleXMLElement( '<xml/>' );
|
|
|
|
|
|
foreach ($sql2->fetchAll() as $r) {
|
|
extract( $r );
|
|
|
|
$jml6L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('d.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('d.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml6P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('d.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('d.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml28L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('d.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('d.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml28P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('d.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('d.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml1L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('d.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<'1' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml1P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('d.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<'1' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml4L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='4' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml4P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='4' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml14L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='14' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml14P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='14' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml24L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='24' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml24P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='24' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml44L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<'44' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml44P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<'44' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml64L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='64' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml64P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('d.tgllahir','year')."<='64' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml64_L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">'65' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml64_P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('d.tgllahir','year').">'65' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
|
|
$data = $xml->addChild( 'data' );
|
|
$data->addChild( 'code', $icd_code );
|
|
$data->addChild( 'j_1_6hr_L', $jml6L );
|
|
$data->addChild( 'j_1_6hr_P', $jml6P );
|
|
$data->addChild( 'j_7_28hr_L', $jml28L );
|
|
$data->addChild( 'j_7_28hr_P', $jml28P );
|
|
$data->addChild( 'j_28hr_1th_L', $jml1L );
|
|
$data->addChild( 'j_28hr_1th_P', $jml1P );
|
|
$data->addChild( 'j_1_4th_L', $jml4L );
|
|
$data->addChild( 'j_1_4th_P', $jml4P );
|
|
$data->addChild( 'j_5_14th_L', $jml14L );
|
|
$data->addChild( 'j_5_14th_P', $jml14P );
|
|
$data->addChild( 'j_15_24th_L', $jml24L );
|
|
$data->addChild( 'j_15_24th_P', $jml24P );
|
|
$data->addChild( 'j_25_44th_L', $jml44L );
|
|
$data->addChild( 'j_25_44th_P', $jml44P );
|
|
$data->addChild( 'j_45_64th_L', $jml64L );
|
|
$data->addChild( 'j_45_64th_P', $jml64P );
|
|
$data->addChild( 'j_65th_L', $jml64_L );
|
|
$data->addChild( 'j_65th_P', $jml64_P );
|
|
$data->addChild( 'bulan', $bln );
|
|
$data->addChild( 'tahun', $tahun );
|
|
}
|
|
|
|
|
|
$fp = fopen( 'xml/rl41_' . $bln . '_' . $tahun . '.xml', 'wb' );
|
|
fwrite( $fp, $xml->asXML( ) );
|
|
fclose( $fp );
|
|
$file = 'rl41_' . $bln . '_' . $tahun . '.xml';
|
|
echo "<div id='file_xml'>";
|
|
echo'<a href=\'download.php?xml=' . $file . '\'>' . $file . '</a>';
|
|
echo ' | <input type=\'button\' id=\'batal\' value=\'Batal\' onClick=\'cancel()\'>';
|
|
echo "</div>";
|
|
}
|
|
|
|
/////////////AKHIR BATAS RL41///////////
|
|
|
|
|
|
///////////////////////AWAL BATAS RL42////////////////////
|
|
|
|
if ($reqdata == 'cari_rl42') {
|
|
echo '
|
|
<table id=\'tbl_reg\'><tr id=\'tr_d\' style=\'border-bottom:1px solid grey;\'>
|
|
<th rowspan=\'3\' style=\'border:1px solid grey;\'>No. DTD</th><th rowspan=\'3\' style=\'border:1px solid grey;\'>No. Daftar Terperinci</th><th rowspan=\'3\' style=\'border:1px solid grey;\'>Golongan Sebab Penyakit</th>
|
|
<th colspan=\'18\' style=\'border:1px solid grey;\'>Jumlah Pasien Hidup/Mati Menurut Umur dan Jenis Kelamin</th>
|
|
<th colspan=\'2\' rowspan=\'2\' style=\'border:1px solid grey;\'>Jumlah Pasien Keluar (Hidup & Mati) Menurut Jenis Kelamin</th>
|
|
<th rowspan=\'3\' style=\'border:1px solid grey;\'>Jumlah Pasien Keluar (Hidup & Mati)</th>
|
|
<th rowspan=\'3\' style=\'border:1px solid grey;\'>Jumlah Pasien Keluar Mati</th>
|
|
<th rowspan=\'3\' style=\'border:1px solid grey;\'>Bulan</th><th rowspan=\'3\' style=\'border:1px solid grey;\'>Tahun</th>
|
|
|
|
</tr>
|
|
<tr id=\'tr_d\' style=\'border-bottom:1px solid grey;\'>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'> 0-6hr </th><th style=\'border:1px solid grey;\' colspan=\'2\'> 7-28hr </th><th style=\'border:1px solid grey;\' colspan=\'2\'>29hr-<1th</th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'> 1-4th </th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'> 5-14th </th><th style=\'border:1px solid grey;\' colspan=\'2\'> 15-24th </th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'> 25-44th </th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'>45-64th</th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'>>65th</th>
|
|
</tr>
|
|
<tr id=\'tr_d\' style=\'border-bottom:1px solid grey;\'>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
</tr>';
|
|
|
|
if (( empty( $bln ) && empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TANGGAL::varchar(10) LIKE '".date('Y')."-%' ";
|
|
$tanggal2 = " AND a.TANGGAL::varchar(10) LIKE '%-".date('m')."-%' ";
|
|
} else {
|
|
if (( empty( $bln ) && !empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TANGGAL::varchar(10) LIKE '".$tahun."-%' ";
|
|
$tanggal2 = "";
|
|
}else {
|
|
if (( !empty( $bln ) && empty( $tahun ) )) {
|
|
$tanggal1 = "";
|
|
$tanggal2 = " AND a.TANGGAL::varchar(10) LIKE '%-".$bln."-%' ";
|
|
}else {
|
|
if (( !empty( $bln ) && !empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TANGGAL::varchar(10) LIKE '".$tahun."-%' ";
|
|
$tanggal2 = " AND a.TANGGAL::varchar(10) LIKE '%-".$bln."-%' ";
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
echo $nip_jk_status;
|
|
$sql2 = $db->query("SELECT DISTINCT b2.icd_code
|
|
FROM t_diagnosadanterapi a
|
|
LEFT JOIN t_icd b ON a.idxdaftar=b.idxdaftar
|
|
JOIN icd b2 on b.icd = b2.icd_code
|
|
JOIN m_pasien c ON a.NOMR=c.NOMR
|
|
JOIN t_pendaftaran d ON a.NOMR=d.NOMR
|
|
WHERE b.status_rajal = 1 and d.STATUS !='0' $tanggal1 $tanggal2 ");
|
|
|
|
//SELECT ? FROM ?
|
|
$kondisi_SELECT = "b2.icd_code FROM t_diagnosadanterapi a
|
|
LEFT JOIN t_icd b ON a.idxdaftar=b.idxdaftar
|
|
JOIN icd b2 ON b.icd=b2.icd_code
|
|
JOIN m_pasien c ON a.NOMR=c.NOMR
|
|
JOIN t_pendaftaran d ON a.NOMR=d.NOMR";
|
|
//WHERE NIP STATUS JENIS KELAMIN L
|
|
$nip_status_jkL = "AND b.status_rajal = 1 and c.JENISKELAMIN='L' AND d.STATUS!='0'";
|
|
//WHERE NIP STATUS JENIS KELAMIN P
|
|
$nip_status_jkP = "AND b.status_rajal = 1 and c.JENISKELAMIN='P' AND d.STATUS!='0'";
|
|
|
|
foreach ($sql2->fetchAll() as $r) {
|
|
extract( $r );
|
|
|
|
$bln = m_to_id($bln);
|
|
|
|
echo'<tr class=\'tr_s\'>
|
|
<td style=\'border:1px solid grey;\'>'; $sqldtd = $db->query("SELECT dtd FROM icd WHERE icd_code ='$icd_code' ")->fetchAll()[0];extract( $sqldtd );echo $dtd; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>' . $icd_code . '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $sqlsebabpenyakit = $db->query("SELECT sebabpenyakit FROM icd WHERE icd_code ='$icd_code' ")->fetchAll()[0];extract( $sqlsebabpenyakit );echo $sebabpenyakit; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml6L = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml6L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml6P = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml6P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml28L = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml28L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml28P = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml28P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml1L = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'1' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml1L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml1P = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'1' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml1P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml4L = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='4' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml4L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml4P = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='4' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml4P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml14L = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='14' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml14L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml14P = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='14' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml14P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml24L = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='24' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml24L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml24P = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='24' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml24P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml44L = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'44' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml44L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml44P = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'44' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml44P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64L = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='64' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml64L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64P = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='64' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml64P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64_L = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'65' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml64_L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64_P = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'65' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml64_P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlTL = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jmlTL; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlTP = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jmlTP; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlT = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND a.NIP='rekammedik' AND d.STATUS!='0' $tanggal1 $tanggal2 ")->numRows(); echo $jmlT; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlTM = $db->query("SELECT $kondisi_SELECT WHERE b2.icd_code='$icd_code' AND a.NIP='rekammedik' AND d.STATUS='8' $tanggal1 $tanggal2 ")->numRows(); echo $jmlTM; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>' . $bln . '</td>
|
|
<td style=\'border:1px solid grey;\'>' . $tahun . '</td>';
|
|
|
|
echo '</tr>';
|
|
}
|
|
|
|
echo'<tr class=\'tr_s\'>
|
|
<td style=\'border:1px solid grey;\' colspan=3>Total Bulan ' . $bln . ' Tahun ' . $tahun . '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml6L = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('c.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml6L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml6P = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('c.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml6P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml28L = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('c.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml28L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml28p = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('c.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml28P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml1L = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('c.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'1' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml1L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml1P = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('c.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'1' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml1P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml4L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='4' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml4L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml4P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='4' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml4P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml14L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='14' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml14L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml14P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='14' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml14P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml24L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='24' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml24L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml24P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='24' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml24P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml44L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'44' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml44L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml44P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'44' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml44P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='64' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml64L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='64' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml64P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64_L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">'65' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml64_L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64_P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">'65' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml64_P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlSTL = $db->query("SELECT $kondisi_SELECT WHERE a.NIP='rekammedik' AND d.STATUS!='0' AND c.JENISKELAMIN='L' $tanggal1 $tanggal2 ")->numRows(); echo $jmlSTL; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlSTP = $db->query("SELECT $kondisi_SELECT WHERE a.NIP='rekammedik' AND d.STATUS!='0' AND c.JENISKELAMIN='P' $tanggal1 $tanggal2 ")->numRows(); echo $jmlSTP; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlST = $db->query("SELECT $kondisi_SELECT WHERE a.NIP='rekammedik' AND d.STATUS!='0' $tanggal1 $tanggal2 ")->numRows(); echo $jmlST; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlSTM = $db->query("SELECT $kondisi_SELECT WHERE a.NIP='rekammedik' AND d.STATUS='8' $tanggal1 $tanggal2 ")->numRows(); echo $jmlSTM; echo '</td>
|
|
<td style=\'border:1px solid grey;\' colspan=3 align=\'center\'>-</td>
|
|
';
|
|
echo '</tr>';
|
|
echo '</table>';
|
|
}
|
|
|
|
|
|
if ($reqdata == 'xml_rl42') {
|
|
if (( empty( $bln ) && empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TANGGAL::varchar(10) LIKE '".date('Y')."-%' ";
|
|
$tanggal2 = " AND a.TANGGAL::varchar(10) LIKE '%-".date('m')."-%' ";
|
|
$bln = date('m');
|
|
$tahun = date('Y');
|
|
} else {
|
|
if (( empty( $bln ) && !empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TANGGAL::varchar(10) LIKE '".$tahun."-%' ";
|
|
$tanggal2 = "";
|
|
//$bln = date('m');
|
|
}else {
|
|
if (( !empty( $bln ) && empty( $tahun ) )) {
|
|
$tanggal1 = "";
|
|
$tanggal2 = " AND a.TANGGAL::varchar(10) LIKE '%-".$bln."-%' ";
|
|
$tahun = date('Y');
|
|
}else {
|
|
if (( !empty( $bln ) && !empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TANGGAL::varchar(10) LIKE '".$tahun."-%' ";
|
|
$tanggal2 = " AND a.TANGGAL::varchar(10) LIKE '%-".$bln."-%' ";
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
$sql2 = $db->query("SELECT DISTINCT b.icd_code
|
|
FROM t_diagnosadanterapi a
|
|
LEFT JOIN icd b ON a.ICD_CODE=b.icd_code
|
|
INNER JOIN m_pasien c ON a.NOMR=c.NOMR
|
|
INNER JOIN t_pendaftaran d ON a.NOMR=d.NOMR
|
|
WHERE
|
|
a.NIP='rekammedik' AND
|
|
d.STATUS!='0' $tanggal1 $tanggal2 ");
|
|
|
|
|
|
//SELECT ? FROM ?
|
|
$kondisi_SELECT = "a.ICD_CODE FROM t_diagnosadanterapi a LEFT JOIN icd b ON a.ICD_CODE=b.icd_code INNER JOIN m_pasien c ON a.NOMR=c.NOMR INNER JOIN t_pendaftaran d ON a.NOMR=d.NOMR";
|
|
//WHERE NIP STATUS JENIS KELAMIN L
|
|
$nip_status_jkL = "AND a.NIP='rekammedik' AND c.JENISKELAMIN='L' AND d.STATUS!='0'";
|
|
//WHERE NIP STATUS JENIS KELAMIN P
|
|
$nip_status_jkP = "AND a.NIP='rekammedik' AND c.JENISKELAMIN='P' AND d.STATUS!='0'";
|
|
|
|
$xml = new SimpleXMLElement ( '<xml/>' );
|
|
|
|
|
|
foreach ($sql2->fetchAll() as $r) {
|
|
extract( $r );
|
|
$date1 = new DateTime(date('Y-m-d', strtotime($TGLLAHIR)));
|
|
$date2 = new DateTime(date('Y-m-d'));
|
|
$interval = $date1->diff($date2);
|
|
|
|
$jml6L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml6P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml28L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml28P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml1L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'1' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml1P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'1' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml4L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='4' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml4P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='4' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml14L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='14' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml14P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='14' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml24L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='24' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml24P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='24' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml44L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'44' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml44P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'44' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml64L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='64' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml64P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='64' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml64_L = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'65' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml64_P = $db->query("SELECT $kondisi_SELECT WHERE a.ICDKELUAR='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'65' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
|
|
$data = $xml->addChild( 'data' );
|
|
$data->addChild( 'code', $icd_code );
|
|
$data->addChild( 'j_1_6hr_L', $jml6L );
|
|
$data->addChild( 'j_1_6hr_P', $jml6P );
|
|
$data->addChild( 'j_7_28hr_L', $jml28L );
|
|
$data->addChild( 'j_7_28hr_P', $jml28P );
|
|
$data->addChild( 'j_28hr_1th_L', $jml1L );
|
|
$data->addChild( 'j_28hr_1th_P', $jml1P );
|
|
$data->addChild( 'j_1_4th_L', $jml4L );
|
|
$data->addChild( 'j_1_4th_P', $jml4P );
|
|
$data->addChild( 'j_5_14th_L', $jml14L );
|
|
$data->addChild( 'j_5_14th_P', $jml14P );
|
|
$data->addChild( 'j_15_24th_L', $jml24L );
|
|
$data->addChild( 'j_15_24th_P', $jml24P );
|
|
$data->addChild( 'j_25_44th_L', $jml44L );
|
|
$data->addChild( 'j_25_44th_P', $jml44P );
|
|
$data->addChild( 'j_45_64th_L', $jml64L );
|
|
$data->addChild( 'j_45_64th_P', $jml64P );
|
|
$data->addChild( 'j_65th_L', $jml64_L );
|
|
$data->addChild( 'j_65th_P', $jml64_P );
|
|
$data->addChild( 'bulan', $bln );
|
|
$data->addChild( 'tahun', $tahun );
|
|
}
|
|
|
|
|
|
$fp = fopen( 'xml/rl42_' . $bln . '_' . $tahun . '.xml', 'wb' );
|
|
fwrite( $fp, $xml->asXML( ) );
|
|
fclose( $fp );
|
|
$file = 'rl42_' . $bln . '_' . $tahun . '.xml';
|
|
echo "<div id='file_xml'>";
|
|
echo'<a href=\'download.php?xml=' . $file . '\'>' . $file . '</a>';
|
|
echo ' | <input type=\'button\' id=\'batal\' value=\'Batal\' onClick=\'cancel()\'>';
|
|
echo "</div>";
|
|
}
|
|
/////////////////BATAS AKHIR RL42////////////////////
|
|
|
|
////////////////BATAS AWAL RL43////////
|
|
|
|
|
|
if ($reqdata == 'cari_rl43') {
|
|
echo '
|
|
<table id=\'tbl_reg\'><tr id=\'tr_d\' style=\'border-bottom:1px solid grey;\'>
|
|
<th rowspan=\'3\' style=\'border:1px solid grey;\'>No. DTD</th><th rowspan=\'3\' style=\'border:1px solid grey;\'>No. Daftar Terperinci</th><th rowspan=\'3\' style=\'border:1px solid grey;\'>Golongan Sebab Penyakit</th><th colspan=\'18\' style=\'border:1px solid grey;\'>Jumlah Pasien Keluar Mati Menurut Umur dan Jenis Kelamin</th><th colspan=\'2\' rowspan=\'2\' style=\'border:1px solid grey;\'>Jumlah Pasien Keluar Mati Menurut Jenis Kelamin</th><th rowspan=\'3\' style=\'border:1px solid grey;\'>Jumlah Pasien Keluar Mati</th><th rowspan=\'3\' style=\'border:1px solid grey;\'>Bulan</th><th rowspan=\'3\' style=\'border:1px solid grey;\'>Tahun</th>
|
|
</tr>
|
|
<tr id=\'tr_d\' style=\'border-bottom:1px solid grey;\'>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'> 0-6hr </th><th style=\'border:1px solid grey;\' colspan=\'2\'> 7-28hr </th><th style=\'border:1px solid grey;\' colspan=\'2\'>29hr-<1th</th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'> 1-4th </th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'> 5-14th </th><th style=\'border:1px solid grey;\' colspan=\'2\'> 15-24th </th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'> 25-44th </th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'>45-64th</th>
|
|
<th style=\'border:1px solid grey;\' colspan=\'2\'>>65th</th>
|
|
</tr>
|
|
<tr id=\'tr_d\' style=\'border-bottom:1px solid grey;\'>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
<th style=\'border:1px solid grey;\'> L </th><th style=\'border:1px solid grey;\'>P</th>
|
|
</tr>';
|
|
|
|
if (( empty( $bln ) && empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TANGGAL::varchar(10) LIKE '".date('Y')."-%' ";
|
|
$tanggal2 = " AND a.TANGGAL::varchar(10) LIKE '%-".date('m')."-%' ";
|
|
} else {
|
|
if (( empty( $bln ) && !empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TANGGAL::varchar(10) LIKE '".$tahun."-%' ";
|
|
$tanggal2 = "";
|
|
}else {
|
|
if (( !empty( $bln ) && empty( $tahun ) )) {
|
|
$tanggal1 = "";
|
|
$tanggal2 = " AND a.TANGGAL::varchar(10) LIKE '%-".$bln."-%' ";
|
|
}else {
|
|
if (( !empty( $bln ) && !empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TANGGAL::varchar(10) LIKE '".$tahun."-%' ";
|
|
$tanggal2 = " AND a.TANGGAL::varchar(10) LIKE '%-".$bln."-%' ";
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
$sql2 = $db->query("SELECT DISTINCT b.icd_code
|
|
FROM t_diagnosadanterapi a
|
|
LEFT JOIN icd b ON a.ICD_CODE=b.icd_code
|
|
INNER JOIN m_pasien c ON a.NOMR=c.NOMR
|
|
INNER JOIN t_pendaftaran d ON a.NOMR=d.NOMR
|
|
WHERE
|
|
a.NIP='rekammedik' AND
|
|
d.STATUS='8' $tanggal1 $tanggal2 ");
|
|
|
|
//SELECT ? FROM ?
|
|
$kondisi_SELECT = "a.ICD_CODE FROM t_diagnosadanterapi a LEFT JOIN icd b ON a.ICD_CODE=b.icd_code INNER JOIN m_pasien c ON a.NOMR=c.NOMR INNER JOIN t_pendaftaran d ON a.NOMR=d.NOMR";
|
|
//WHERE NIP STATUS JENIS KELAMIN L
|
|
$nip_status_jkL = "AND a.NIP='rekammedik' AND c.JENISKELAMIN='L' AND d.STATUS='8'";
|
|
//WHERE NIP STATUS JENIS KELAMIN P
|
|
$nip_status_jkP = "AND a.NIP='rekammedik' AND c.JENISKELAMIN='P' AND d.STATUS='8'";
|
|
|
|
foreach ($sql2->fetchAll() as $r) {
|
|
extract( $r );
|
|
|
|
$bln = m_to_id($bln);
|
|
|
|
echo'<tr class=\'tr_s\'>
|
|
|
|
<td style=\'border:1px solid grey;\'>'; $sqldtd = $db->query("SELECT dtd FROM icd WHERE icd_code ='$icd_code' ")->fetchAll()[0];extract( $sqldtd );echo $dtd; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>' . $icd_code . '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $sqlsebabpenyakit = $db->query("SELECT sebabpenyakit FROM icd WHERE icd_code ='$icd_code' ")->fetchAll()[0];extract( $sqlsebabpenyakit );echo $sebabpenyakit; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml6L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml6L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml6P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml6P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml28L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml28L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml28P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml28P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml1L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'1' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml1L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml1P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'1' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml1P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml4L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='4' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml4L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml4P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='4' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml4P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml14L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='14' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml14L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml14P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='14' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml14P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml24L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='24' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml24L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml24P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='24' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml24P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml44L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'44' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml44L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml44P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'44' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml44P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='64' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml64L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='64' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml64P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64_L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'65' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml64_L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64_P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'65' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml64_P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlTL = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jmlTL; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlTP = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jmlTP; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlT = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND a.NIP='rekammedik' AND d.STATUS='8' $tanggal1 $tanggal2 ")->numRows(); echo $jmlT; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>' . $bln . '</td>
|
|
<td style=\'border:1px solid grey;\'>' . $tahun . '</td>';
|
|
|
|
echo '</tr>';
|
|
}
|
|
|
|
echo'<tr class=\'tr_s\'>
|
|
<td style=\'border:1px solid grey;\' colspan=3>Total Bulan ' . $bln . ' Tahun ' . $tahun . '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml6L = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('c.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml6L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml6P = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('c.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml6P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml28L = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('c.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml28L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml28p = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('c.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml28P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml1L = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('c.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'1' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml1L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml1P = $db->query("SELECT $kondisi_SELECT WHERE ".date('d')." - ".extract_sql('c.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'1' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml1P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml4L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='4' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml4L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml4P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='4' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml4P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml14L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='14' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml14L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml14P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='14' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml14P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml24L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='24' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml24L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml24P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='24' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml24P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml44L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'44' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml44L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml44P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'44' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml44P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='64' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml64L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='64' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml64P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64_L = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">'65' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows(); echo $jml64_L; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jml64_P = $db->query("SELECT $kondisi_SELECT WHERE ".date('Y')." - ".extract_sql('c.tgllahir','year').">'65' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows(); echo $jml64_P; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlSTL = $db->query("SELECT $kondisi_SELECT WHERE a.NIP='rekammedik' AND d.STATUS='8' AND c.JENISKELAMIN='L' $tanggal1 $tanggal2 ")->numRows(); echo $jmlSTL; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlSTP = $db->query("SELECT $kondisi_SELECT WHERE a.NIP='rekammedik' AND d.STATUS='8' AND c.JENISKELAMIN='P' $tanggal1 $tanggal2 ")->numRows(); echo $jmlSTP; echo '</td>
|
|
<td style=\'border:1px solid grey;\'>'; $jmlST = $db->query("SELECT $kondisi_SELECT WHERE a.NIP='rekammedik' AND d.STATUS='8' $tanggal1 $tanggal2 ")->numRows(); echo $jmlST; echo '</td>
|
|
<td style=\'border:1px solid grey;\' colspan=3 align=\'center\'>-</td>
|
|
';
|
|
echo '</tr>';
|
|
echo '</table>';
|
|
}
|
|
|
|
|
|
if ($reqdata == 'xml_rl43') {
|
|
if (( empty( $bln ) && empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TANGGAL::varchar(10) LIKE '".date('Y')."-%' ";
|
|
$tanggal2 = " AND a.TANGGAL::varchar(10) LIKE '%-".date('m')."-%' ";
|
|
$bln = date('m');
|
|
$tahun = date('Y');
|
|
} else {
|
|
if (( empty( $bln ) && !empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TANGGAL::varchar(10) LIKE '".$tahun."-%' ";
|
|
$tanggal2 = "";
|
|
//$bln = date('m');
|
|
}else {
|
|
if (( !empty( $bln ) && empty( $tahun ) )) {
|
|
$tanggal1 = "";
|
|
$tanggal2 = " AND a.TANGGAL::varchar(10) LIKE '%-".$bln."-%' ";
|
|
$tahun = date('Y');
|
|
}else {
|
|
if (( !empty( $bln ) && !empty( $tahun ) )) {
|
|
$tanggal1 = " AND a.TANGGAL::varchar(10) LIKE '".$tahun."-%' ";
|
|
$tanggal2 = " AND a.TANGGAL::varchar(10) LIKE '%-".$bln."-%' ";
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
$sql2 = $db->query("SELECT DISTINCT b.icd_code
|
|
FROM t_diagnosadanterapi a
|
|
LEFT JOIN icd b ON a.ICD_CODE=b.icd_code
|
|
INNER JOIN m_pasien c ON a.NOMR=c.NOMR
|
|
INNER JOIN t_pendaftaran d ON a.NOMR=d.NOMR
|
|
WHERE
|
|
a.NIP='rekammedik' AND
|
|
d.STATUS='8' $tanggal1 $tanggal2 ");
|
|
|
|
|
|
//SELECT ? FROM ?
|
|
$kondisi_SELECT = "a.ICD_CODE FROM t_diagnosadanterapi a LEFT JOIN icd b ON a.ICD_CODE=b.icd_code INNER JOIN m_pasien c ON a.NOMR=c.NOMR INNER JOIN t_pendaftaran d ON a.NOMR=d.NOMR";
|
|
//WHERE NIP STATUS JENIS KELAMIN L
|
|
$nip_status_jkL = "AND a.NIP='rekammedik' AND c.JENISKELAMIN='L' AND d.STATUS='8'";
|
|
//WHERE NIP STATUS JENIS KELAMIN P
|
|
$nip_status_jkP = "AND a.NIP='rekammedik' AND c.JENISKELAMIN='P' AND d.STATUS='8'";
|
|
|
|
$xml = new SimpleXMLElement ( '<xml/>' );
|
|
|
|
|
|
foreach ($sql2->fetchAll() as $r) {
|
|
extract( $r );
|
|
|
|
$jml6L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml6P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='0' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='6' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml28L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml28P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='7' AND ".date('d')." - ".extract_sql('c.tgllahir','day')."<='28' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."='0' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml1L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'1' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml1P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('d')." - ".extract_sql('c.tgllahir','day').">='29' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'1' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml4L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='4' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml4P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='1' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='4' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml14L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='14' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml14P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='5' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='14' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml24L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='24' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml24P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='15' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='24' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml44L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'44' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml44P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'25' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<'44' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml64L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='64' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml64P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">='45' AND ".date('Y')." - ".extract_sql('c.tgllahir','year')."<='64' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
$jml64_L = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'65' $nip_status_jkL $tanggal1 $tanggal2 ")->numRows();
|
|
$jml64_P = $db->query("SELECT $kondisi_SELECT WHERE a.ICD_CODE='$icd_code' AND ".date('Y')." - ".extract_sql('c.tgllahir','year').">'65' $nip_status_jkP $tanggal1 $tanggal2 ")->numRows();
|
|
|
|
$data = $xml->addChild( 'data' );
|
|
$data->addChild( 'code', $icd_code );
|
|
$data->addChild( 'j_1_6hr_L', $jml6L );
|
|
$data->addChild( 'j_1_6hr_P', $jml6P );
|
|
$data->addChild( 'j_7_28hr_L', $jml28L );
|
|
$data->addChild( 'j_7_28hr_P', $jml28P );
|
|
$data->addChild( 'j_28hr_1th_L', $jml1L );
|
|
$data->addChild( 'j_28hr_1th_P', $jml1P );
|
|
$data->addChild( 'j_1_4th_L', $jml4L );
|
|
$data->addChild( 'j_1_4th_P', $jml4P );
|
|
$data->addChild( 'j_5_14th_L', $jml14L );
|
|
$data->addChild( 'j_5_14th_P', $jml14P );
|
|
$data->addChild( 'j_15_24th_L', $jml24L );
|
|
$data->addChild( 'j_15_24th_P', $jml24P );
|
|
$data->addChild( 'j_25_44th_L', $jml44L );
|
|
$data->addChild( 'j_25_44th_P', $jml44P );
|
|
$data->addChild( 'j_45_64th_L', $jml64L );
|
|
$data->addChild( 'j_45_64th_P', $jml64P );
|
|
$data->addChild( 'j_65th_L', $jml64_L );
|
|
$data->addChild( 'j_65th_P', $jml64_P );
|
|
$data->addChild( 'bulan', $bln );
|
|
$data->addChild( 'tahun', $tahun );
|
|
}
|
|
|
|
|
|
$fp = fopen( 'xml/rl43_' . $bln . '_' . $tahun . '.xml', 'wb' );
|
|
fwrite( $fp, $xml->asXML( ) );
|
|
fclose( $fp );
|
|
$file = 'rl43_' . $bln . '_' . $tahun . '.xml';
|
|
echo "<div id='file_xml'>";
|
|
echo'<a href=\'download.php?xml=' . $file . '\'>' . $file . '</a>';
|
|
echo ' | <input type=\'button\' id=\'batal\' value=\'Batal\' onClick=\'cancel()\'>';
|
|
echo "</div>";
|
|
}
|
|
|
|
/////////////BATAS AKHIR RL43////////////
|
|
}
|
|
?>
|