55-penyakit-maag),

DAFTAR PUSTAKA

Apotik

medicastore.com.

“Antispasmodik”

(online),

http://apotik.medicastore.com/artikel-obat/antispasmodik), diakses tanggal 28 Februari 2014. Apotik

medicastore.com.

“Enzyplex

Tablet”

(online),

(http://apotik.medicastore.com/obat/enzyplex-tablet.html), diakses tanggal 28 Februari 2014. Dennis, Alan, Barbara Haley Wixom and David Paul Tegarden. 2009. Systems Analysis and Design with UML Version 2.0: “An Object-Oriented Approach” 3rd ed. John Wiley & Sons, Inc: USA. Chndra Asep (ed). 2011. “Sakit Maag Incar Usia Produktif ” (online), (http://health.kompas.com/read/2011/06/16/16574899/Sakit.Maag.Incar.U sia.Produktif.), diakses tanggal 28 Februari 2014. Hediyani, Novie. 2012. “Penyakit Maag” (online), (http://www.dokterkuonline.com/index.php/article/55-penyakit-maag),

diakses

tanggal

28

Februari 2014. InformasiObatdotCom.

2012-2013.

“Antasida”

(online),

(http://www.informasiobat.com/antasida), diakses tanggal 28 Februari 2014. InformasiObatdotCom.

2012-2013.

“Lansoprazol”

(online),

(http://www.informasiobat.com/lansoprazol), diakses tanggal 28 Februari 2014. InformasiObatdotCom.

2012-2013.

“Omeprazol”

(online),

(http://www.informasiobat.com/omeprazol), diakses tanggal 28 Februari 2014. 217

218

InformasiObatdotCom.

2012-2013.

“Ranitidin”

(online),

(http://www.informasiobat.com/ranitidin), diakses tanggal 28 Februari 2014. InformasiObatdotCom.

2012-2013.

“Simetidin”

(online),

(http://www.informasiobat.com/simetidin), diakses tanggal 28 Februari 2014. InformasiObatdotCom.

2012-2013.

“Sukaralfat”

(online),

(http://www.informasiobat.com/sukralfat), diakses tanggal 28 Februari 2014. Kalbe.

“Pranza”

(online),

(http://id.kalbe.co.id/ProdukdanJasa/ObatResep/ProdukAZ/tabid/267/ID/1 131/PRANZA.aspx), diakses tanggal 28 Februari 2014. Kalbe

Farma.

2008.

“Hati-Hati

Terhadap

Penyakit

Maag”

(online),

(http://www.ahlinyalambung.com/?q=content/hati-hati-terhadap-penyakitmaag), diakses tanggal 28 Februari 2014. Kalbe Farma. 2008. “Jaga Lambung Anda dengan Pola Hidup Sehat” (online), (http://www.ahlinyalambung.com/?q=content/jaga-lambung-anda-denganpola-hidup-sehat), diakses tanggal 28 Februari 2014. Kalbe

Farma.

2008.

“Jantung

Koroner

atau

Maag”

(online),

(http://www.ahlinyalambung.com/?q=content/jantung-koroner-ataumaag), diakses tanggal 28 Februari 2014. Kalbe

Farma.

2008.

“Mengenal

Kafein”

(online),

(http://www.ahlinyalambung.com/?q=content/mengenal-kafein-0), diakses tanggal 28 Februari 2014. Kalbe

Farma.

2008.

“Merokok

Memperberat

Sakit

Maag”

(online),

(http://www.ahlinyalambung.com/?q=content/merokok-memperberatsakit-maag), diakses tanggal 28 Februari 2014.

219

Kalbe Farma. 2008. “Sakit Perut Maag atau Sakit Perut Tifus” (online), (http://www.ahlinyalambung.com/?q=content/sakit-perut-maag-atau-sakitperut-tifus), diakses tanggal 28 Februari 2014. Kadir, Abdul. 2008. Dasar Pemrograman Web Dinamis Menggunakan PHP. Yogyakarta: ANDI. Kusrini. 2009. Aplikasi Sistem Pakar: Menentukan Faktor Kepastian dengan Metode Kuantifikasi Pertanyaan. ANDI:Yogyakarta. MADCOMS. 2010. Kupas Tuntas Adobe Dreamweaver CS% dengan Pemograman PHP & MySQL. ANDI:Yogyakarta. Misnadiarly. 2009. Mengenal Penyakit Organ Cerna: Gastritis (Dyspepsia atau Maag), Infeksi Mycobacteria pada Ulcer Gastrointestinal. Pustaka Populer Obor: Jakarta. Mubarok, Cecep Husni. 2013. “Sistem Pakar Diagnosa Penyakit Anak yang Disebabkan Virus Berbasis Web”. Skripsi. Bandung:Universitas Komputer Indonesia. Pressman, R. S. 2012. Rekayasa Perangkat Lunak-Buku 1 Ed.7. Yogyakarta: ANDI. Pressman, R. S. 2012. Rekayasa Perangkat Lunak-Buku 2 Ed.7. Yogyakarta: ANDI. Puspitasari, Denok. 2010. “Sistem Pakar Diagnosa Diabetes Nefropathy dengan Metode

Certainty

Factor

Berbasis

Web

dan

Mobile”.

Skripsi.

Surabaya:Politeknik Elektronika Negeri Surabaya ITS. Puspitosari, Heni A. 2011. Pemrograman Web Database dengan PHP dan MySQL Tingkat Lanjut, Yogyakarta: Skripta Media Creative. Rizky, Soetam. 2011. Konsep Dasar Rekayasa Perangkat Lunak. Jakarta: PT Prestasi Pustakaraya.

220

Sasmito, Ginanjar Wiro. 2010. “Aplikasi Sistem Pakar untuk Simulasi Diagnosa Hama dan Penyakit Tanaman Bawang Merah dan Cabai Menggunakan Forward

Chaining

dan

Pendekatan

Berbasis

Aturan”.

Tesis.

Semarang:Universitas Diponegoro.

SitusObat.

2014.

“Famotidin

20

Mg

Tab

(Ogb)”

(online),

(http://www.situsobat.com/2013/04/famotidin-20-mg-tab-ogb.html), diakses tanggal 28 Februari 2014. Widjaja, Harjadi. 2009. Anatomi Abdomen. Penerbit Buku Kedokteran EGC:Jakarta.

Yuliarti, Nurheti. 2009. Maag: Kenali, Hindari dan Obati. ANDI:Yogyakarta.

LAMPIRAN

221

222

1. Daftar Riwayat Hidup Pakar

223

2. Hasil Wawancara

a. Apakah yang dimaksud dengan penyakit gastritis? Gastritis merupakan suatu penyakit dimana terjadi hipersekresi atau pengeluaran yang berlebihan terhadap asam lambung yang dapat disebabkan oleh beberapa hal. Gastritis umumnya sering disebut sebagai penyakit maag.

b. Lalu, hal-hal apa saja yang dapat memicu terjadinya gastritis? Penyakit gastritis bisa disebabkan oleh beberapa hal diantaranya: a. Mengkonsumsi beberapa jenis obat-obatan yang terlalu sering berupa: i. Antibiotik golongan macrolite. ii. Obat penghilang nyeri seperti aspirin, ibnuproven, asam mefenamat. iii. Obat pengencer darah. b. Karena infeksi bakteri atau virus c. Mengkonsumsi makanan yang berlemak tinggi, pedas, asam, kafein, alkohol dan makanan bergas. d. Stress e. Pola hidup yang tidak teratur, misalnya diet yang tidak sehat.

c. Apa saja gejala-gejala awal pada penderita gastritis? Gejala-gejala awal gastritis umumnya adalah: a. Rasa nyeri ulu hati (sebelah kiri rongga dada bawah). b. Mual. c. Muntah. d. Kembung akibatnya cepat merasa kenyang.

224

e. Dalam waktu tiga puluh menit hingga satu jam setelah makan, merasakan sesak napas. f. Sering buang gas. g. Sering bersendawa. h. Berak Darah/feses berwarna hitam. i. Demam. j. Diare < empat kali dalam 24 jam k. Tidak nafsu makan. l. Lemas.

d. Ada berapa jenis penyakit gastritis? Jika dilihat berdasarkan lamanya penderita mengalami penyakit gastritis, gastritis bisa dikategorikan kedalam dua jenis yaitu a. Gastritis akut b. Gastritis kronis

e. Apa yang membedakan jenis-jenis penyakit gastritis tersebut? Gastritis akut merupakan penyakit gastritis yang terjadi secara tiba-tiba. Jadi penyakit ini tiba-tiba datang menyerang penderita gastritis dan bisa hilang lalu tiba-tiba muncul lagi. Ini merupakan gastritis tahapan awal, bila terus berlanjut dan tidak ditangani dengan tepat gastritis akut bisa menjadi gastritis kronis. Gastritis kronis adalah penyakit gastritis yang terjadi terus-menerus dalam jangka waktu yang lama. Untuk memastikan apakah penderita mengalami gastritis akut atau gastritis kronis, dapat dipastikan dengan melakukan endoskopi. Endoskopi adalah alat

225

yang digunakan dokter berupa selang dan kamera kecil yang dapat dimasukkan dari mulut hingga ke lambung manusia. Didalam lambung manusia, kamera pada alat endoskopi tersebut dapat menampilkan keadaan lambung, selain itu dengan endoskopi dokter dapat mengambil sampel jaringan lambung untuk melakukan pemeriksaan lebih lanjut terkait keadaan lambung. Namun jika tidak dilakukan pemeriksaan laboratorium seperti endoskopi, Untuk memastikan apakah penderita mengalami gastritis akut atau gastritis kronis bisa dilihat dari gejala-gejalanya meskipun tidak seakurat melakukan endoskopi. Umumnya gastritis akut dan kronis memiliki gejala-gejala yang serupa namun biasanya penderita gastritis kronis mengalami frekuensi timbulnya gejala-gejala gastritis yang lebih parah dari gastritis akut. Pada penderita Gastritis kronis, umumnya disertai dengan gejala berak darah, muntah darah, diare kurang dari empat kali dalam waktu 24 jam dan demam. f. Bagaimana cara mengobati penyakit gastritis? Diperlukan beberapa langkah untuk mengobati penyakit gastritis yaitu dengan pemberian obat untuk: a. Melapisi lambung dengan mengkonsumsi sukralfat.. b. Menetralisir asam lambung dengan cara mengkonsumsi antasida. c. Menghilangkan Kembung dengan cara mengkonsumsi obat enzyplex. d. Menekan produksi asam lambung dengan cara mengkonsumsi: i.

Simetidin.

ii.

Ranitidine.

iii.

Famotidin.

iv.

Omeprazol.

v.

Lansoprazol.

vi.

Pantoprazol.

Pemberian obat tersebut diputuskan berdasarkan tingkat keparahan penderita gastritis jika gastritis yang diderita masih ringan, maka dapat diberikan obat simetidin, jika pemberian simetidin tidak memberikan

226

dampak kesembuhan maka biasanya dokter akan memberikan ranitidin. Begitu seterusnya hingga pemberian rameprazole dengan gastritis yang lebih berat. e. Mengatasi kejang pada saluran pencernaan dengan mengkonsumsi antispasmodik. Penjelasan yanhg lebih detail mengenai obat-obatan tersebut dapat dilihat pada buku-buku farmasi atau pada internet. Untuk mengkonsumsi obat diperlukan kehati-hatian dan rasa waspada yang tinggi karena obat-obatan yang diminum dengan tidak tepat dan tanpa konsultasi dokter berpotensi merugikan, seperti kerusakan terhadap organ ginjal dan hati. Oleh karena itu, jika ingin mengkonsumsi obat, sebaiknya dilakukan pemeriksaan medis dan konsultasi ke dokter terlebih dahulu dibandingkan dengan pembelian obat secara bebas. Selain dengan mengkonsumsi obat, penderita gastritis juga dianjurkan untuk tidak mengkonsumsi makanan-makanan yang menjadi pencetus gastritis. Mengkonsumsi makanan lunak dan menerapkan pola hidup yang sehat dan teratur perlu dilakukan juga supaya penyakit ini bisa sembuh.

g. Adakah penyakit-penyakit lain yang gejalanya meyerupai penyakit gastritis? Dan apa yang membedakannya dengan penyakit gastritis? Ada beberapa penyakit yang gejalanya mirip seperti gastritis diantaranya penyakit jantung. Pada penderita penyakit jantung, mereka merasakan nyeri didaerah ulu hati seperti penyakit gastritis, karena letak jantung dan daerah ulu hati itu berdekatan, jadi mereka bahkan dokter yang memeriksa sering mengira mereka terkena penyakit gastritis, padahal sebenarnya mereka mengidap penyakit jantung. Jika seseorang mengidap penyakit jantung, walaupun dia diberikan obat gastritis tetapi gejala sakit pada daerah ulu hati tidak berkurang sedikit pun, mereka tetap tidak mengalami kesembuhan walaupun telah diberikan obat gastritis. Tetapi ada beberapa hal yang dapat

227

membedakan penyakit jantung dengan gastritis, seseorang yang menderita penyakit jantung biasanya mengalami rasa nyeri yang menjalar selain pada derah ulu hati, rasa nyeri itu menjalar dari bagian punggung hingga bahu sebelah kiri. Sedangkan pengidap gastritis hanya merasakan nyeri dibagian ulu hati saja. Selain penyakit jantung, penyakit typhus juga mirip gejalanya dengan penyakit gastritis. Typhus merupakan penyakit yang menyerang usus halus, jadi pengidap thypus juga merasakan nyeri didaerah ulu hati yang sering disangka mengidap gastritis. Tetapi pengidap thypus itu pasti mengalami demam di sore hari atau di malam hari sementara pengidap gastritis hanya mengalami demam yang suhunya konstan. Penyakit thypus biasanya terjadi ketika seseorang sedang tidak dalam kondisi yang fit sehingga daya tahan tubuhnya menurun, dan mengkonsumsi makanan atau minuman yang kurang higienis. Untuk memastikan penyakit thypus secara akurat harus diperiksa di laboratorium. Lalu ada juga penyakit hepatitis, hepatitis biasanya disebut sakit kuning oleh masyarakat Indonesia. Penyakit hepatitis itu adalah penyakit yang menyerang organ hati dimana terjadi peradangan. Pada penderita hepatitis, mereka juga mengalami rasa nyeri tetapi bukan dibagian perut sebelah kiri seperti gastritis, melainkan di sebelah kanan. Selain itu, skleral atau bagian mata yang berwarna putih pada pengidap hepatitis akan berwarna kuning, warna air kencingnya juga akan seperti warna air teh. Bila bagian perut sebelah kanan diketuk-ketuk, maka terasa perut bagian kanan itu terisi penuh karena organ hati yang membengkak.

228

1. Gastritis Akut

CheckList

Bobot

NO

Nama Gejala ()

Ket (%)

1.



Rasa nyeri ulu hati (sebelah kiri rongga dada bawah).

16

2.



Mual.

16

3.



Pusing.

8

4.



Kembung.

16

5.



Dalam waktu tiga puluh menit hingga satu jam setelah 16 makan, merasakan sesak napas 6.



Sering buang gas

8

7.



Sering bersendawa

8

8.

Muntah

9.

Berak Darah/feses berwarna hitam

10.

Muntah Darah

11.

Demam dengan suhu konstan

12.

Diare kurang dari empat kali dalam 24 jam

13.

Tidak nafsu makan

14.

Lemas Rasa nyeri menyebar ke punggung hingga bagian

15. bahu kiri 16.

Penurunan tekanan darah (hipotensi)

17.

Gelisah

18.

Keringat Dingin Demam menyerupai alur pelana kuda, pada pagi hingga siang hari demam agak menurun sedangkan

19. menjelang sore hingga malam hari demam meninggi kembali. Terjadi pada dua hingga 7 hari

20.

Skleral atau bagian mata yang berwarna putih akan menjadi kekuning-kuningan

21.

Kulit berwarna kuning

22.

Warna air urin berwarna seperti teh

229

23.

Mengalami rasa nyeri pada perut bagian kanan Lidah bagian tengah akan berwarna putih dan pinggir-

24. pinggirnya berwarna merah serta tidak rata/berkerut. Total Bobot

88

2. Gastritis Kronis

CheckList

Bobot

NO

Nama Gejala ()

Ket (%)

1.




6

2.



Mual.

6

3.



Pusing.

2

4.



Kembung.

6

5.



Dalam waktu tiga puluh menit hingga satu jam setelah 6 makan, merasakan sesak napas 6.



Sering buang gas

6

7.



Sering bersendawa

6

8.



Muntah

6

9.




6

10.



Muntah Darah

6

11.




6

12.




6

13.



Tidak nafsu makan

6

14.



Lemas

6

Rasa nyeri menyebar ke punggung hingga bagian 15. bahu kiri 16.


17.

Gelisah

18.

Keringat Dingin Demam menyerupai alur pelana kuda, pada pagi

19. hingga siang hari demam agak menurun sedangkan

230

menjelang sore hingga malam hari demam meninggi kembali. Terjadi pada dua hingga 7 hari

20.


21.


22.


23.



80

3. Penyakit Jantung

CheckList

Bobot

NO

Nama Gejala ()

1.



Ket (%)


2.

Mual.

3.

Pusing.

4.

Kembung.

10

Dalam waktu tiga puluh menit hingga satu jam setelah 5. makan, merasakan sesak napas 6.

Sering buang gas

7.

Sering bersendawa

8.

Muntah

9.


10.

Muntah Darah

11.


12.


13.

Tidak nafsu makan

14.

Lemas Rasa nyeri menyebar ke punggung hingga bagian

15.



10 bahu kiri

231

16.




10

17.



Gelisah

10

18.



Keringat Dingin

10

Demam menyerupai alur pelana kuda, pada pagi hingga siang hari demam agak menurun sedangkan 19. menjelang sore hingga malam hari demam meninggi kembali. Terjadi pada dua hingga 7 hari

20.


21.


22.


23.



50

4. Penyakit Thypus CheckList

Bobot

NO

Nama Gejala ()

Ket (%)

1.




16

2.



Mual.

16

3. 4.

Pusing. 

Kembung. Dalam waktu tiga puluh menit hingga satu jam setelah

5. makan, merasakan sesak napas 6.

Sering buang gas

7.

Sering bersendawa

8.

Muntah

9.


10.

Muntah Darah

11.


5

232

12.


13.

Tidak nafsu makan

14.



Lemas

16



17.

Gelisah

18.


19.



16 menjelang sore hingga malam hari demam meninggi kembali. Terjadi pada dua hingga 7 hari

20.


21.


22.


23.


24.



16 pinggirnya berwarna merah serta tidak rata/berkerut. Total Bobot

85

233

5. Hepatitis

CheckList

Bobot

NO

Nama Gejala ()

1. 2.

Rasa nyeri ulu hati (sebelah kiri rongga dada bawah). 

3. 4.

Ket (%)

Mual.

12

Pusing. 

Kembung.

8

Dalam waktu tiga puluh menit hingga satu jam setelah 5. makan, merasakan sesak napas 6.

Sering buang gas

7.

Sering bersendawa

8.



Muntah

9.


10.

Muntah Darah

11.


12.


13.

Tidak nafsu makan

14.

Lemas

12



17.

Gelisah

18.


19. menjelang sore hingga malam hari demam meninggi kembali. Terjadi pada dua hingga 7 hari

20.



Skleral atau bagian mata yang berwarna putih akan

12

menjadi kekuning-kuningan 21.




12

234

22.




12

23.



Mengalami rasa nyeri pada perut bagian kanan

12

Lidah bagian tengah akan berwarna putih dan pinggir24. pinggirnya berwarna merah serta tidak rata/berkerut. Total Bobot

80

235

3. Source Code menuuserdiagnosis.php

>

<meta content="text/html; charset=utf-8" httpequiv="Content-Type" />

Sistem Pakar Gastritis <style type="text/css">

body{ background-color:#BAEEBA;

} .auto-style1 {

margin-left: 155px; }

<iframe

name="waktu"

height="50px;"

src="waktu.php"

<iframe

frameborder="0"

marginheight="0px"

scrolling="no" class="auto-style1" style="width: 1025px"

marginwidth="0px" > height="164 px" width="1350 px"
frameborder="0" <iframe scrolling="no" name="bodycontent" src="header.php" marginheight="0px"

223

marginwidth="0px"

max-width:970px;

height="1000px"

}

width="1025px"

#buttonadmin{

frameborder="0"

backgroundimage:url('images/buttonadmin.png');

scrolling="auto" background-repeat:no-repeat; src="contentuserdiagnosis.php" width:255px; style="width: 1025px"> height:995px;
margin-top:35px;
} <iframe marginheight="0px" marginwidth="0px"

height="110 px" width="1350 px" frameborder="0" scrolling="no"

session_start(); //kuncinya ada disini, tulis diawal script sebelum menulis yang lain

?>

/* session_is_registered() sebaiknya tidak digunakan (Deprecated Function)

if( !session_is_registered( 'ID' ) || !session_is_registered( 'PASS' ) )


*/

Untitled 1

if( !isset($_SESSION['IDUser']) || !isset($_SESSION['PASSUser']) ) {

<style type="text/css"> body{

die("<script type='text/javascript'>window.open('menuuserlog in.php','_top')");

background-image:url('images/body.png');

}

background-repeat:repeat-x,y;

?>

224

Untitled 1

<iframe

<style type="text/css">

marginheight="0px"

#buttonuser{

marginwidth="0px"

background-image:url('images/buttonuser.png');

frameborder="0"

background-repeat:no-repeat;

scrolling="no"

width:255px;

width="217px"

height:947px;

height="995px"

margin-top:100px;

style="display:inline;"

display:block;

src="tomboluser.php"

}

>

#linkadmin{

text-decoration:none;

<iframe

font-weight:bold;

name="admincontent"

}

marginheight="0px"

a:link {color:green;} /* unvisited link */

marginwidth="0px"

a:visited {color:green;} /* visited link */

frameborder="0"

a:hover {color:white;} /* mouse over link */

scrolling="no"

a:active {color:green;} /* selected link */

width="749px"

height="995px"

src="userdiagnosis.php"

style="display:inline;"

>

Profil

tomboluser.php

Ubah Password


225

height:900px; }

Diagnosis

.auto-style1 { margin-left: 203px;

margin-top: 70px;
}

.auto-style2 {

Riwayat

margin-left: 227px;

Logout


}

?> userdiagnosis.php




} ?>

Untitled 1
#body{ <span style="color:green; padding-left:20px;"> background-image:url('images/bgadmin.png'); background-repeat:no-repeat;

margin-top:100px;

226

include('connect.php'); $username=$_SESSION['IDUser'];

echo " <strong>" . $_SESSION['IDUser'] ."
";

?>


Untitled 1

<style type="text/css"> #body{

background-image:url('images/bgadmin.png'); background-repeat:no-repeat;

margin-top:100px;

Pilih Metode Diagnosis

height:900px;

Forward Chaining

Backward Chaining

}

session_start(); //kuncinya ada disini, tulis diawal script sebelum menulis yang lain ?>



}

?>

userprosesdiagnosis.php

227

<span style="color:green; padding-left:20px;">


Untitled 1


include('connect.php');

#body{

$username=$_SESSION['IDUser'];

background-image:url('images/bgadmin.png');

";

background-repeat:no-repeat; margin-top:100px;

?> height:900px; }

.auto-style1 {

margin-left: 195px;

}

$tes=$_POST['metode'];

if($tes=='backward chaining'){

echo "<script type='text/javascript'>window.open('userdiagnosi sbackwardchaining.php','_self')";

} else{

echo "<script type='text/javascript'>window.open('userdiagnosi sforwardchaining.php','_self')";

}


?> ?>



userdiagnosisbackwardchaining.php }

?>

228


include('connect.php'); $username=$_SESSION['IDUser']; backwardchaininggejala.php echo " <strong>" . $_SESSION['IDUser'] ."
"; ?>


Untitled 1

<style type="text/css"> #body{

pilih penyakit

background-image:url('images/bgadmin.png');

background-repeat:no-repeat;

<select name="penyakitlist" style="width: 182px" class="auto-style1">

margin-top:100px; height:900px;

$hasil1 = mysql_query($sql_limit); while ($rsbuku = mysql_fetch_array($hasil1)){ ?>

session_start(); //kuncinya ada disini, tulis diawal script sebelum menulis yang lain?>


229


$sqldelg="DELETE FROM tmpgejala WHERE email='$_SESSION[IDUser]'";

}

$hasildelg=mysql_query($sqldelg) or die(mysql_error());

?>

}

$sqlcekisi3="SELECT * FROM tmpanalisa WHERE email='$_SESSION[IDUser]'";


$hasilcekisi3=mysql_query($sqlcekisi3) or die(mysql_error()); $datacekisi3=mysql_fetch_array($hasilcekisi3); if(!empty($datacekisi3)){

$sqldela="DELETE FROM tmpanalisa WHERE email='$_SESSION[IDUser]'"; $hasildela=mysql_query($sqldela) or die(mysql_error());

";

}

?>

$kode=$_POST['penyakitlist'];

$metode="backward chaining";

//tambah data penyakit


$sql="INSERT INTO tmppenyakit (email,KodePenyakit) VALUES ('$_SESSION[IDUser]','$kode')";

//delete data tmp $sqlcekisi="SELECT * FROM tmppenyakit WHERE email='$_SESSION[IDUser]'";

$hasil=mysql_query($sql) or die (mysql_error()); //tambah data tmpanalisa

$hasilcekisi=mysql_query($sqlcekisi) or die(mysql_error());

?>

$datacekisi=mysql_fetch_array($hasilcekisi);

if(!empty($datacekisi)){

<iframe

$sqldelp="DELETE FROM tmppenyakit WHERE email='$_SESSION[IDUser]'";

name="gejalabackwardchaining"

$hasildelp=mysql_query($sqldelp) or die(mysql_error());

src="backwardchaininggejalasub.php?kode=&metode="

}

style="width: 653px; height: 670px"

$sqlcekisi2="SELECT * FROM tmpgejala WHERE email='$_SESSION[IDUser]'";

frameborder="0" target="_parent" >

$hasilcekisi2=mysql_query($sqlcekisi2) or die(mysql_error());

$datacekisi2=mysql_fetch_array($hasilcekisi2);

if(!empty($datacekisi2)){

230

}

?>

backwardchaininggejalasub.php


$hasilk = mysql_query($queryk);

$datak = mysql_fetch_array($hasilk);


$nim = $datak['idMaks'];

Untitled 1 <style type="text/css">

$queryk = "SELECT max(KodeDiagnosis) as idMaks FROM diagnosis";

//mengatur 1 karakter sebagai jumalh karakter yang tetap //mengatur 3 karakter untuk jumlah karakter yang berubah-ubah

body{ $noUrut = (int) substr($nim, 1, 3); background-color:#BAEEBA $noUrut++; } //menjadikan P sebagai 1 karakter yang tetap .auto-style1 { $char = "D"; margin-left: 468px; //%03s untuk mengatur 3 karakter di belakang P } $IDbaru = $char . sprintf("%03s", $noUrut); ?>

include('connect.php'); $kode=$_GET['kode']; $metode=$_GET['metode'];
$kodegejalatidak1="";

?>

if(!empty($_GET['kodegejalatidak'])){

$kodegejalatidak=$_GET['kodegejalatidak'];

$kodegejalatidak1="AND relasi.KodeGejala NOT IN ($kodegejalatidak)";


}


echo $kodegejalatidak1; ?>

231

$kodeb1=""; $kodeb="";

GEJALA YANG DIRASAKAN

$ab=count($columnb); //echo $ab;

for ($i=0;$i<$ab;$i++){ Apakah Anda Mengalami Gejala:

//echo $columnValues[$i] ;

if($ab==0){

//mencari banyak data yang ada dalam tabel

$kodeb="";

$sqlCount = "SELECT count(KodeGejala) FROM relasi where relasi.KodePenyakit='$kode' $kodegejalatidak1";

$kodeb1="";

$rsCount = mysql_fetch_array(mysql_query($sqlCount));

else if ($ab==1){

}

$kodeb.="'".$columnb[$i]."'"; $banyakData = $rsCount[0]; } $page = isset($_GET['page']) ? $_GET['page'] : 1;

else{

$limit = 1;

if($i==0){

$mulai_dari = $limit * ($page - 1);

$kodeb.="'".$columnb[$i]."',";

$sql_cek = "SELECT * FROM relasi,penyakit,gejala where relasi.KodePenyakit='$kode' AND relasi.KodePenyakit=penyakit.KodePenyakit AND relasi.KodeGejala=gejala.KodeGejala $kodegejalatidak1 ORDER BY relasi.KodeGejala ASC limit $mulai_dari, $limit";

} else if ($i>0 && $i!=$ab-1) { $kodeb.="'".$columnb[$i]."',"; }

$hasil3 = mysql_query($sql_cek) or die (mysql_error());

else if($i==$ab-1){

$datapil1=mysql_num_rows($hasil3);

$kodeb.="'".$columnb[$i]."'";

if($datapil1==0){

}

$sql2="SELECT DISTINCT * FROM tmpgejala where email='$_SESSION[IDUser]' and Status='1'";

}

$hasil2=mysql_query($sql2) or die(mysql_error());

if($ab==0){

$columnb = Array(); while ( $rowb = mysql_fetch_assoc($hasil2) ) { $columnb[] = $rowb['KodeGejala']; } //echo $columna[0] ;

}

$kodeb1=""; } else{ $kodeb1="AND KodeGejala IN($kodeb)"; }

232

$sqlcekrelasi="SELECT SUM(Bobot) FROM relasi WHERE KodePenyakit='$kode' AND KodeGejala IN ($kodeb)";

$hasilcekrelasi=mysql_query($sqlcekrelasi) or die(mysql_error());

//membuat pagination

$b=$datacekrelasi['SUM(Bobot)'];

$banyakHalaman = ceil($banyakData / $limit);

$total=$b;

if($page!=$banyakHalaman){

date_default_timezone_set('Asia/Jakarta');

$hlm=$page+1;

$nowFormat = date('Y-m-d H:i:s');

echo'

';

$sqlsimpan="INSERT INTO diagnosis(TanggalDiagnosis,email,KodeDiagnosi s,KodePenyakit,persentase,metode)VALUES('$n owFormat','$_SESSION[IDUser]','$IDbaru','$kod e','$total','$metode')"; $hasilsimpan=mysql_query($sqlsimpan) or die (mysql_error()); echo "<meta http-equiv=\"refresh\" content=\"0; url=hasildiagnosissub.php?metode=$metode&tan ggal=$nowFormat&kodediagnosis=$IDbaru&ko depenyakit=$kode&persentase=$total\">"; //echo $total;

echo"<script type='text/javascript'>document.write(cek); "; } else if($page == $banyakHalaman){ //echo "aaa"; echo'

';

} } else{ //penutup while while($datapil = mysql_fetch_array($hasil3)){ } ?> } ?> if(isset($_POST['btnnext'])){


$sql2="SELECT * FROM relasi,penyakit,jenispenyakit,gejala WHERE relasi.KodePenyakit=penyakit.KodePenyakit AND relasi.KodeGejala=gejala.KodeGejala AND jenispenyakit.KodeJenisPenyakit=penyakit.Kode JenisPenyakit AND relasi.KodePenyakit='$kodepenyakit'";

$hasil2=mysql_query($sql2) or die (mysql_error);

while($datagejala=mysql_fetch_array($hasil2)){

pdfhasildiagnosis.php

require('fpdf17/fpdf.php'); // file fpdf.php harus diincludekan

class PDF extends FPDF { // membuat header

function Header()

{

// setting properti font

$this->SetFont('Arial','B',15); // menulis header

$this>Image('images/headerpdfnew.png',0,0,210,40);

if($_POST['btnnext']){ " checked="checked"/> Ya

if(isset($_POST['status'])){ $a=$_POST['status'];

" /> Tidak

$status=substr($a,-1);

233

$kodegejala=substr($a,0,4);

//$sqlubahpenyakit="UPDATE tmppenyakit SET KodePenyakit=''";

//echo $status; //echo $kodegejala;

$sqllain="SELECT * FROM tmppenyakit WHERE email='$_SESSION[IDUser]'";

$sqlsimpantmpgejala="INSERT INTO tmpgejala(email,KodeGejala,Status) VALUES('$_SESSION[IDUser]','$kodegejala','$ status')";

$hasillain=mysql_query($sqllain) or die(mysql_error());

$hasilsqlsimpangejala=mysql_query($sqlsimpant mpgejala) or die(mysql_error());

while ( $row = mysql_fetch_assoc($hasillain) ) {

$columnValues = Array();

$columnValues[] = $row['KodePenyakit']; $sqlsimpantmpanalisis="INSERT INTO tmpanalisa(email,KodeGejala,KodePenyakit) VALUES('$_SESSION[IDUser]','$kodegejala','$ kode')"; $hasilsqlsimpananalisis=mysql_query($sqlsimpa ntmpanalisis);

} //echo $columnValues[1] ; $kodearray=""; $a=count($columnValues);

echo "<meta http-equiv=\"refresh\" content=\"0; url=backwardchaininggejalasub.php?page=$hlm &kode=$kode&metode=$metode&kodegejalatid ak=$kodegejalatidak\">";

//echo $a; for ($i=0;$i<$a;$i++){

}


}

if ($a==1)

}

$kodearray.="'".$columnValues[$i]."'";

if(isset($_POST['btnproses'])){

else{

if($_POST['btnproses']){

if($i==0)

if(isset($_POST['status'])){

$kodearray.="'".$columnValues[$i]."',";

$a=$_POST['status'];

else if ($i>0 && $i!=$a-1)


$kodearray.="'".$columnValues[$i]."',";


else if($i==$a-1)


$kodearray.="'".$columnValues[$i]."'"; } }

$hasilsqlsimpangejala=mysql_query($sqlsimpant mpgejala) or die(mysql_error()); $sqlsimpantmpanalisis="INSERT INTO tmpanalisa(email,KodeGejala,KodePenyakit) VALUES('$_SESSION[IDUser]','$kodegejala','$ kode')"; $hasilsqlsimpananalisis=mysql_query($sqlsimpa ntmpanalisis) or die(mysql_error()); $total=0; //EDIT

//echo $kodearray."
"; $sql1="SELECT DISTINCT * FROM tmpgejala where email='$_SESSION[IDUser]' and Status='0'"; $hasil1=mysql_query($sql1) or die(mysql_error()); $columna = Array(); while ( $rowa = mysql_fetch_assoc($hasil1) ) { $columna[] = $rowa['KodeGejala'];

234

}


//echo $columna[0] ;

if($ab==0){

$kodea="";

$kodeb="";

$aa=count($columna);

$kodeb1="";

//echo $a;

}

for ($i=0;$i<$aa;$i++){

else if ($ab==1){



if ($aa==1)

}

$kodea.="'".$columna[$i]."'";

else{

else{

if($i==0){

if($i==0)


$kodea.="'".$columna[$i]."',";

}

else if ($i>0 && $i!=$aa-1)

else if ($i>0 && $i!=$ab-1)

$kodea.="'".$columna[$i]."',";

{

else if($i==$aa-1)


$kodea.="'".$columna[$i]."'";

}

}

else if($i==$ab-1){

}


//echo $kodea;

}


}


if($ab==0){

}

$kodeb1=""; $columnb = Array(); while ( $rowb = mysql_fetch_assoc($hasil2) ) { $columnb[] = $rowb['KodeGejala']; }

$sql3="SELECT DISTINCT KodePenyakit FROM relasi WHERE KodePenyakit NOT IN ($kodearray) AND KodeGejala NOT IN($kodea)"; $hasil3=mysql_query($sql3) or die (mysql_error());

//echo $columna[0] ; $columnc = Array(); $kodeb1=""; while ( $rowc = mysql_fetch_assoc($hasil3) ) { $kodeb=""; $columnc[] = $rowc['KodePenyakit']; $ab=count($columnb); } //echo $ab; $ac=count($columnc); for ($i=0;$i<$ab;$i++){ if($ac==0){

235

echo"<script type='text/javascript'> alert('Sistem Menemukan Bahwa Anda Tidak menderita Penyakit apapun Yg ada pada basis Data'); ";

} } else{

echo "<script type='text/javascript'>window.open('userdiagnosi sbackwardchaining.php','_parent');"; } else{ $sql5="SELECT * FROM penyakit WHERE KodePenyakit='$kode'";

$kodeb1="AND KodeGejala IN($kodeb)"; $sqlcekrelasi="SELECT SUM(Bobot) FROM relasi WHERE KodePenyakit='$kode' $kodeb1"; $hasilcekrelasi=mysql_query($sqlcekrelasi) or die(mysql_error()); $datacekrelasi=mysql_fetch_array($hasilcekrelas i);

$hasil5=mysql_query($sql5) or die (mysql_error());

$b=$datacekrelasi['SUM(Bobot)'];

$datapnyakit5=mysql_fetch_array($hasil5);

$total=$b;

$namalama=$datapnyakit5['NamaPenyakit'];




$datapnyakit=mysql_fetch_array($hasil3); $kodepnyakit=$datapnyakit['KodePenyakit'];

$sqlsimpan="INSERT INTO diagnosis(TanggalDiagnosis,email,KodeDiagnosi s,KodePenyakit,persentase,metode)VALUES('$n owFormat','$_SESSION[IDUser]','$IDbaru','$kod e','$total','$metode')";

//echo $kodepnyakit; $sql4="SELECT * FROM penyakit WHERE KodePenyakit='$kodepnyakit'"; $hasil4=mysql_query($sql4) or die (mysql_error());

$hasilsimpan=mysql_query($sqlsimpan) or die (mysql_error()); echo "<meta http-equiv=\"refresh\" content=\"0; url=hasildiagnosissub.php?metode=$metode&tan ggal=$nowFormat&kodediagnosis=$IDbaru&ko depenyakit=$kode&persentase=$total\">";

$datapnyakit4=mysql_fetch_array($hasil4); } $namapnyakit=$datapnyakit4['NamaPenyakit']; } //echo $namapnyakit; } $kode=$kodepnyakit; } //tambah data penyakit ?> $sql="INSERT INTO tmppenyakit (email,KodePenyakit) VALUES ('$_SESSION[IDUser]','$kode')";

$hasil=mysql_query($sql) or die (mysql_error()); hasildiagnosissub.php echo"<script type='text/javascript'> alert('Sistem Menemukan Bahwa Anda Tidak menderita $namalama,Sistem Akan mengalihkan ke diagnosis penyakit lain yang memungkinkan yaitu: $namapnyakit'); "; echo "<meta http-equiv=\"refresh\" content=\"0; url=backwardchaininggejalasub.php?kode=$kode &metode=$metode&kodegejalatidak=$kodea\">" ;

236


fieldset name="diagnosis" style="width: 573px; border-color:green">

Untitled 1

DIAGNOSIS


body{

$metode=$_GET['metode'];

background-color:#BAEEBA

$tanggal=$_GET['tanggal'];

}

$kodediagnosis=$_GET['kodediagnosis'];

.auto-style2 {

$kodepenyakit=$_GET['kodepenyakit'];

margin-left: 0px;}

$persentase=$_GET['persentase'];

?>

$BulanIndo = array("Januari", "Februari", "Maret", "April", "Mei", "Juni","Juli", "Agustus", "September", "Oktober", "November", "Desember");

<script type="text/javascript"> $tahun = substr($date, 0, 4); function kembali(){ $bulan = substr($date, 5, 2); window.open('menuuserdiagnosis.php','_top') $tgl = substr($date, 8, 2); } $jam

=substr($date, 11, 2);

$menit=substr($date, 14, 2); $detik=substr($date, 17, 2);
$result = $tgl . " " . $BulanIndo[(int)$bulan-1] . " ". $tahun." ". $jam.":".$menit.":".$detik;


return($result);

?>

}

?>



die("<script type='text/javascript'>window.open('menuuserlog in.php','_top')");}?>

$sql="SELECT * FROM user WHERE email='$_SESSION[IDUser]'"; $hasil=mysql_query($sql) or die (mysql_error); $data=mysql_fetch_array($hasil); ?>

237

biodata diri

Hasil Diagnosis

Nama:

Nama Penyakit:
Usia:

Jenis Kelamin: Metode Diagnosis:

Persentase: Alamat: %

Definisi Penyakit:

Gejala Penyakit:
?> $data2=mysql_fetch_array($hasil2);
?>

238

&kodepenyakit=&kodediagnosis=" target="_blank"> Simpan Sebagai PDF

Penyebab Penyakit:

Solusi Penyakit:
Jenis Penyakit:

Waktu Diagnosis:

// membuat garis dari koordinat (11 mm, 18 mm) sampai koordinat (198

// mm,18 mm)

$this->SetDrawColor(0,128,0);

$this->Line(0,40,210,40);

$this->Line(0,41,210,41);

// membuat space kosong antara header dengan teks konten

$email=$_SESSION['IDUser']; $this->Ln(60); ?> }

239

// membuat footer

//query

function Footer()

$email=$_GET['email'];

{

$sql="SELECT * FROM user WHERE email='$email'"; //Position at 1.5 cm from bottom $hasil=mysql_query($sql) or die (mysql_error); $this->SetY(-15); $data=mysql_fetch_array($hasil); //Arial italic 8 $pdf->SetFont('Times','B',12); $this->SetFont('Arial','I',8); $pdf->SetTextColor(0,0,0); //Page number $pdf->SetFillColor(75,168,75);

$this->Cell(0,10,'Halaman ke- '.$this>PageNo().' dari

$pdf->Cell(190,10,'BIODATA','0','1','C','1');

{nb}',0,0,'R');

$pdf->SetFont('Times','',12);

}

$pdf->SetTextColor(0,0,0);

}

$pdf->SetFillColor(186,238,186);

$pdf=new PDF('P','mm','A4');

//Cell(w,h,text,border,ln/posisitextberikutnya,alig n,fill,link)

$pdf->AliasNbPages(); $pdf->Cell(80,10,'Username:','0','0','L','1'); $pdf->AddPage(); $pdf->Cell(110,10,$email,'0','1','L','1'); // import file koneksi $pdf->Cell(80,10,'Nama:','0','0','L','0'); // Connect to the database $pdf->Cell(110,10,$data['nama'],'0','1','L','0'); $con = mysql_connect("localhost","root",""); $pdf->Cell(80,10,'Usia:','0','0','L','1'); // Make sure we connected succesfully if(! $con)

$pdf>Cell(110,10,$data['usia'].'Tahun','0','1','L','1');

{

$pdf->Cell(80,10,'Alamat:','0','0','L','0'); die('Connection Failed'.mysql_error());

$pdf->Cell(110,10,$data['alamat'],'0','1','L','0');

}

$pdf->Ln(20);

else

//query

{

$kodepenyakit=$_GET['kodepenyakit'];

// Select the database to use


mysql_select_db("gastritis",$con);

$sql2="SELECT * FROM relasi,penyakit,jenispenyakit,gejala WHERE relasi.KodePenyakit=penyakit.KodePenyakit AND relasi.KodeGejala=gejala.KodeGejala AND jenispenyakit.KodeJenisPenyakit=penyakit.Kode JenisPenyakit AND relasi.KodePenyakit='$kodepenyakit'";

if(!mysql_select_db("gastritis",$con)) { die('Connection to databse Failed'.mysql_error()); }


}

$data2=mysql_fetch_array($hasil2);

240

$pdf->SetFont('Times','B',12);

}


$pdf->Ln(1);



$pdf->Cell(190,10,'HASIL DIAGNOSIS','0','1','C','1');

$pdf->Cell(80,'10','Penyebab Penyakit:','0','0','L','1');

$pdf->SetFont('Times','',12); $pdf->SetTextColor(0,0,0);

$pdf>MultiCell(110,5,$data2['PenyebabPenyakit'],'0',' 1','L','0');




$pdf->Cell(80,'10','Solusi Penyakit:','0','0','L','1');

$pdf->Cell(80,10,'Nama Penyakit:','0','0','L','1');

$pdf>MultiCell(110,10,$data2['SolusiPenyakit'],'0','1', 'L','0');

$pdf>Cell(110,10,$data2['NamaPenyakit'],'0','1','L','1') ;

$pdf->SetFillColor(255,255,255); $pdf->Cell(80,'10','Jenis Penyakit:','0','0','L','1');

$sql3="SELECT * FROM diagnosis WHERE KodeDiagnosis='$kodediagnosis' "; $hasil3=mysql_query($sql3) or die (mysql_error);

$pdf>Cell(110,10,$data2['NamaJenisPenyakit'],'0','1',' L','0'); function DateToIndo($date){

$data3=mysql_fetch_array($hasil3); $pdf->Cell(80,10,'Metode Diagnosis:','0','0','L','0');

$BulanIndo = array("Januari", "Februari", "Maret", "April", "Mei", "Juni", "Juli", "Agustus", "September",

$pdf->Cell(110,10,$data3['metode'],'0','1','L','0');

"Oktober", "November", "Desember");

$pdf->Cell(80,10,'Persentase:','0','0','L','1');

$tahun = substr($date, 0, 4);

$pdf->Cell(110,10,$data3['persentase'].' %','0','1','L','1');

$bulan = substr($date, 5, 2); $tgl = substr($date, 8, 2);

$pdf->Cell(80,'10','Definisi Penyakit:','0','0','L','0');

$jam


$menit=substr($date, 14, 2);

$pdf>MultiCell(110,5,$data2['DefinisiPenyakit'],'0','1' ,'L','0');

$detik=substr($date, 17, 2);



$pdf->SetFillColor(186,238,186); $pdf->Cell(80,'10','Gejala Penyakit:','0','0','L','1');

return($result);

$total=0;

}

while($datagejala=mysql_fetch_array($hasil2)){

$tanggal=$data3['TanggalDiagnosis'];

$total=$total+1;


$pdf->MultiCell(110,10,$total.'. '.$datagejala['NamaGejala'],'0','1','L','1');

$pdf->Cell(80,'10','Waktu Diagnosis:','0','0','L','1');

$pdf->Cell(80,'','','0','0','L','1');

241

$pdf>Cell(110,10,DateToIndo($tanggal),'0','1','L','1'); $pdf->Ln(10); $pdf->SetFillColor(255,255,255); $pdf->Cell(190,'10','-----TERIMAKASIH----','0','1','C','1');

window.open('menuuserlog in.php','_top')"); }

$pdf->Output('HasilDiagnosis.pdf', 'I'); ?> ?>
userdiagnosisforwardchaining.php


include('connect.php'); <meta content="text/html; charset=utf-8" httpequiv="Content-Type" /> Untitled 1

$username=$_SESSION['IDUser']; echo " <strong>" . $_SESSION['IDUser'] ."
";

<style type="text/css"> ?> #body{ background-image:url('images/bgadmin.png');

$sqlcekisi="SELECT * FROM tmppenyakit WHERE email='$_SESSION[IDUser]'"; $hasilcekisi=mysql_query($sqlcekisi) or die(mysql_error()); $datacekisi=mysql_fetch_array($hasilcekisi); if(!empty($datacekisi)){ $sqldelp="DELETE FROM tmppenyakit WHERE email='$_SESSION[IDUser]'"; $hasildelp=mysql_query($sqldelp) or die(mysql_error());

$sqlcekisi2="SELECT * FROM tmpgejala WHERE email='$_SESSION[IDUser]'";

?>


242


"http://www.w3.org/TR/xhtml1/DTD/xhtml1transitional.dtd">

if(!empty($datacekisi2)){ $sqldelg="DELETE FROM tmpgejala WHERE email='$_SESSION[IDUser]'";

$hasildelg=mysql_query($sqldelg) or die(mysql_error());


}

Untitled 1

$sqlcekisi3="SELECT * FROM tmpanalisa WHERE email='$_SESSION[IDUser]'";

<style type="text/css"> body{




}

if(!empty($datacekisi3)){

.auto-style1 {

$sqldela="DELETE FROM tmpanalisa WHERE email='$_SESSION[IDUser]'";

margin-left: 468px; }

$hasildela=mysql_query($sqldela) or die(mysql_error());

}

?>

<iframe name="gejalaforwardchaining" src="forwardchaininggejalasub.php"

>

?>



} ?> forwardchaininggejalasub.php

243


" checked="checked"/> Ya

$metode="forward chaining"; ?>

" /> Tidak

GEJALA YANG DIRASAKAN

//membuat pagination

$banyakHalaman = ceil($banyakData / $limit);

//mencari banyak data yang ada dalam tabel

if($page!=$banyakHalaman){

$sqlCount = "SELECT count(KodeGejala) FROM gejala ";

$hlm=$page+1;

$rsCount = mysql_fetch_array(mysql_query($sqlCount));

echo'

';

$banyakData = $rsCount[0]; $page = isset($_GET['page']) ? $_GET['page'] : 1;

//echo"<script type='text/javascript'>document.write(cek); ";

$limit = 1;

}

$mulai_dari = $limit * ($page - 1);

else if($page == $banyakHalaman){

$sql_cek = "SELECT * FROM gejala ORDER BY KodeGejala ASC limit $mulai_dari, $limit";

echo'

';

$hasil3 = mysql_query($sql_cek) or die (mysql_error());

}

$datapil1=mysql_num_rows($hasil3);

//penutup while

while($datapil = mysql_fetch_array($hasil3)){

}

?>

?>

if(isset($_POST['btnnext'])){

if($_POST['btnnext']){

244


$hasilsqlsimpangejala=mysql_query($sqlsimpant mpgejala) or die(mysql_error());

$a=$_POST['status']; $status=substr($a,-1); $kodegejala=substr($a,0,4); //echo $status;

//$sqlsimpantmpanalisis="INSERT INTO tmpanalisa(email,KodeGejala,KodePenyakit) VALUES('$_SESSION[IDUser]','$kodegejala','$ kode')"; //$hasilsqlsimpananalisis=mysql_query($sqlsimp antmpanalisis) or die(mysql_error());

//echo $kodegejala; $sqlsimpantmpgejala="INSERT INTO tmpgejala(email,KodeGejala,Status) VALUES('$_SESSION[IDUser]','$kodegejala','$ status')"; $hasilsqlsimpangejala=mysql_query($sqlsimpant mpgejala) or die(mysql_error()); //$sqlsimpantmpanalisis="INSERT INTO tmpanalisa(email,KodeGejala,KodePenyakit) VALUES('$_SESSION[IDUser]','$kodegejala','$ kode')";

$total=0; //EDIT $sql2="SELECT DISTINCT * FROM tmpgejala where email='$_SESSION[IDUser]' and Status='1'"; $hasil2=mysql_query($sql2) or die(mysql_error()); $columnb = Array();

//$hasilsqlsimpananalisis=mysql_query($sqlsimp antmpanalisis);

while ( $rowb = mysql_fetch_assoc($hasil2) ) { $columnb[] = $rowb['KodeGejala'];

echo "<meta http-equiv=\"refresh\" content=\"0; url=forwardchaininggejalasub.php?page=$hlm& metode=$metode\">";

}

}

$kodeb="";

}

$ab=count($columnb);

}

for ($i=0;$i<$ab;$i++){

$kodeb1="";

if(isset($_POST['btnproses'])){ if($_POST['btnproses']){

if($ab==0){


$kodeb="";

$a=$_POST['status'];

$kodeb1="";


}


else if ($ab==1){ $kodeb.="'".$columnb[$i]."'";


}


else{ if($i==0){


$kodeb.="'".$columnb[$i]."',"; } else if ($i>0 && $i!=$ab-1){

245

$kodeb.="'".$columnb[$i]."',"; }

$sql4="SELECT KodePenyakit,Count(KodeGejala) FROM relasi $kodeb1 AND KodePenyakit='$columnc[$i]' GROUP BY KodePenyakit";

else if($i==$ab-1){ $kodeb.="'".$columnb[$i]."'";


}

$data4=mysql_fetch_array($hasil4);

}

$jumlah=$data4['Count(KodeGejala)'];

}

$kodep=$data4['KodePenyakit'];

if($ab==0){

echo $jumlah;


echo $kodep; $a; if($jumlah==$ab)

echo "<script type='text/javascript'>window.open('userdiagnosi s.php','_parent');";

{ $a=$a+1;

} for ($z=0;$z<$a;$z++){ else{ $kodeb1="WHERE KodeGejala IN($kodeb)"; $sql3="SELECT DISTINCT KodePenyakit FROM relasi $kodeb1";

$sqlsimpantmppenyakit="INSERT INTO tmppenyakit(email,KodePenyakit) VALUES('$_SESSION[IDUser]','$kodep')"; $hasilsqlsimpanpenyakit=mysql_query($sqlsimp antmppenyakit) or die(mysql_error());


}

$columnc = Array();

}

while ( $rowc = mysql_fetch_assoc($hasil3) ) {

else{

$columnc[] = $rowc['KodePenyakit'];

$a=$a;

}

}

$ac=count($columnc);

}

if($ac==0){

echo $a;


if($a==0){



}


else{

}

for ($i=0;$i<$ac;$i++){

else{

246

$sql5="SELECT DISTINCT KodePenyakit FROM tmppenyakit WHERE email='$_SESSION[IDUser]'"; $hasil5=mysql_query($sql5) or die (mysql_error());

relasi,tmpanalisa WHERE relasi.KodePenyakit=tmpanalisa.KodePenyakit AND relasi.KodeGejala=tmpanalisa.KodeGejala AND email='$_SESSION[IDUser]' GROUP BY relasi.KodePenyakit";

while($data5=mysql_fetch_array($hasil5)){


$kodep5=$data5['KodePenyakit'];

while($rowe1 = mysql_fetch_array($hasil51)){


$kodee=$rowe1['KodePenyakit'];


$sqlsimpan="INSERT INTO diagnosis(TanggalDiagnosis,email,KodeDiagnosi s,KodePenyakit,persentase,metode)VALUES('$n owFormat','$_SESSION[IDUser]','$IDbaru','$kod ee','$jumlahee','$metode')";

while ( $datab = mysql_fetch_array($hasil2) ) {

$jumlahee=$rowe1['SUM(Bobot)'];

$kodeg5 = $datab['KodeGejala']; $sqlsimpantmpanalisis="INSERT INTO tmpanalisa(email,KodeGejala,KodePenyakit) VALUES('$_SESSION[IDUser]','$kodeg5','$kod ep5')"; $hasilsqlsimpananalisis=mysql_query($sqlsimpa ntmpanalisis) or die(mysql_error());

$hasilsimpan=mysql_query($sqlsimpan) or die (mysql_error()); } echo "<meta http-equiv=\"refresh\" content=\"0; url=hasildiagnosissubforward.php?metode=$met ode&tanggal=$nowFormat&kodediagnosis=$IDb aru\">";

} }

}


}

$queryk = "SELECT max(KodeDiagnosis) as idMaks FROM diagnosis";

} }

$hasilk = mysql_query($queryk); } $datak = mysql_fetch_array($hasilk); } $nim = $datak['idMaks']; ?> //mengatur 1 karakter sebagai jumalh karakter yang tetap //mengatur 3 karakter untuk jumlah karakter yang berubah-ubah

hasildiagnosissubforward.php

$noUrut = (int) substr($nim, 1, 3);

//menjadikan P sebagai 1 karakter yang tetap

$char = "D";

//%03s untuk mengatur 3 karakter di belakang P

$IDbaru = $char . sprintf("%03s", $noUrut);


$noUrut++;

$sql51="SELECT relasi.KodePenyakit,SUM(Bobot) FROM

Untitled 1

247


body{ DIAGNOSIS

function DateToIndo($date){

$BulanIndo = array("Januari", "Februari", "Maret", "April", "Mei", "Juni","Juli", "Agustus", "September", "Oktober", "November", "Desember");

<script type="text/javascript">


function kembali(){

$bulan = substr($date, 5, 2);

window.open('menuuserdiagnosis.php','_top')

$tgl = substr($date, 8, 2);

}

$jam


$detik=substr($date, 17, 2);



return($result); }

?> ?>
window.open('menuuserlog in.php','_top')");

$sql="SELECT * FROM user WHERE email='$_SESSION[IDUser]'"; $hasil=mysql_query($sql) or die (mysql_error); $data=mysql_fetch_array($hasil);

} ?> ?>

biodata diri

248


$sql2="SELECT * FROM diagnosis WHERE KodeDiagnosis='$kodediagnosis'"; $hasil2=mysql_query($sql2) or die (mysql_error);


?>

Waktu Diagnosis: Nama:

Usia: Nama Penyakit

Persentase(%)

Jenis Kelamin:

Alamat:

$sql3="SELECT * FROM penyakit WHERE KodePenyakit='$data2[3]'";



Hasil Diagnosis

?>

}

}

?>

249

Metode Diagnosis:

// membuat garis dari koordinat (11 mm, 18 mm) sampai koordinat (198

// mm,18 mm)
$this->SetDrawColor(0,128,0); $this->Line(0,40,210,40); $this->Line(0,41,210,41);

// membuat space kosong antara header dengan teks konten

$email=$_SESSION['IDUser']; $this->Ln(60); ?> } &kodediagnosis=&metode=&tanggal=" target="_blank"> Simpan Sebagai PDF

// membuat footer function Footer() {

//Position at 1.5 cm from bottom

$this->SetY(-15);

//Arial italic 8 $this->SetFont('Arial','I',8);

//Page number

$this->Cell(0,10,'Halaman ke- '.$this>PageNo().' dari {nb}',0,0,'R');}

}

pdfhasildiagnosisforward.php

$pdf=new PDF('P','mm','A4');

$pdf->AliasNbPages();

require('fpdf17/fpdf.php'); // file fpdf.php harus diincludekan

$pdf->AddPage(); // import file koneksi

class PDF extends FPDF // Connect to the database { $con = mysql_connect("localhost","root",""); // membuat header // Make sure we connected succesfully function Header() if(! $con) { { // setting properti font die('Connection Failed'.mysql_error()); $this->SetFont('Arial','B',15); } // menulis header else $this>Image('images/headerpdfnew.png',0,0,210,40);

{

250

// Select the database to use

$metode=$_GET['metode'];

mysql_select_db("gastritis",$con);

$pdf->SetFont('Times','B',12);

if(!mysql_select_db("gastritis",$con))


{


die('Connection to databse Failed'.mysql_error());

$pdf->Cell(190,10,'HASIL DIAGNOSIS','0','1','C','1');

}


}


//query


$email=$_GET['email'];


$sql="SELECT * FROM user WHERE email='$email'";

$pdf->Cell(80,10,'Metode Diagnosis:','0','0','L','0');

$hasil=mysql_query($sql) or die (mysql_error); $pdf->Cell(110,10,$metode,'0','1','L','0'); $data=mysql_fetch_array($hasil); function DateToIndo($date){ $pdf->SetFont('Times','B',12);


$BulanIndo = array("Januari", "Februari", "Maret", "April", "Mei", "Juni", "Juli", "Agustus", "September", "Oktober", "November", "Desember");

$pdf->Cell(190,10,'BIODATA','0','1','C','1');



$bulan = substr($date, 5, 2);


$tgl = substr($date, 8, 2);


$jam





$detik=substr($date, 17, 2); $pdf->Cell(80,10,'Username:','0','0','L','1'); $pdf->Cell(110,10,$email,'0','1','L','1');


$pdf->Cell(80,10,'Nama:','0','0','L','0'); return($result); $pdf->Cell(110,10,$data['nama'],'0','1','L','0'); } $pdf->Cell(80,10,'Usia:','0','0','L','1'); $tanggal=$_GET['tanggal']; $pdf>Cell(110,10,$data['usia'].'Tahun','0','1','L','1'); $pdf->Cell(80,10,'Alamat:','0','0','L','0');

$pdf->SetFillColor(186,238,186); $pdf->Cell(80,'10','Waktu Diagnosis:','0','0','L','1');

$pdf->Cell(110,10,$data['alamat'],'0','1','L','0'); $pdf->Ln(20);

$pdf>Cell(110,10,DateToIndo($tanggal),'0','1','L','1');

//query

$pdf->Ln(20);


$pdf->Cell(150,'10','Nama Penyakit','1','0','C','1');

251

$pdf->Cell(40,10,'Persentase (%)','1','1','C','1'); $sql2="SELECT * FROM diagnosis,penyakit WHERE diagnosis.KodePenyakit=penyakit.KodePenyakit AND KodeDiagnosis='$kodediagnosis'"; $hasil2=mysql_query($sql2) or die (mysql_error); while($data2=mysql_fetch_array($hasil2)){ $pdf->SetFillColor(255,255,255); $pdf>Cell(150,'10',$data2['NamaPenyakit'],'1','0','C','1 '); $pdf>Cell(40,'10',$data2['persentase'],'1','1','C','1'); } $pdf->Ln(10); $pdf->Cell(190,'10','-----TERIMAKASIH----','0','1','C','1'); $pdf->Output('HasilDiagnosis.pdf', 'I'); ?>

Persentase(%)
Waktu Diagnosis:	Nama:
Usia:		Nama Penyakit
Jenis Kelamin:
Alamat:

55-penyakit-maag),

Recommend Documents