SURAT KETERANGAN. Hasil Uji Program Tugas Akhir

lxviii

SURAT KETERANGAN

Hasil Uji Program Tugas Akhir Yang bertanda tangan dibawah ini, menerangkan bahwa Mahasiswa Tugas Akhir Program Diploma 3 Teknik Informatika:

Nama

: LAMHOT ARAPENTA GINTING

NIM

: 132406042

Prog. Studi

: D3 Teknik Informatika

Judul TA

:

Sistem perancangan dan pendataan pasien pasien di rumah sakit

ameta sejahtera bebrbasis website. Telah melaksanakan test program Tugas Akhir Mahasiswa tersebut di atas pada tanggal………………………. Dengan Hasil :

Sukses / Gagal

Demikian diterangkan untuk digunakan melengkapi syarat pendaftaran Ujian Meja Hijau Tugas Akhir Mahasiswa bersangkutan di Departemen Matematika FMIPA USU Medan.

Medan,

Juni 2016

Dosen Pembimbing

Drs.Henry Rani Sitepu,M,Si. NIP. 195303031983031002

Universitas Sumatera Utara

lxix

KARTU BIMBINGAN TUGAS AKHIR MAHASISWA Nama Mahasiswa

: Lamhot Arapenta Ginting

Nomor Stambuk

: 132406042

Judul Tugas Akhir

: Sistem perancangan dan pendataan pasien di rumah sakit ameta sejahtera berbasis website

Dosen Pembimbing

: Drs.Henry Rani Sitepu,M,Si.

Tanggal Mulai Bimbingan

:

Tanggal Selesai Bimbingan

:

No.

Tanggal Asisten Bimbingan

Pembahasan pada Asistensi Mengenai, pada Bab :

1.

Pengajuan Judul

2.

ACC Judul Tugas Akhir

3.

Pengajuan Bab 1 – 5

4.

ACC Bab 1 – 5

5.

ACC Tugas Akhir

6.

Uji Program ∗

Paraf Dosen Pembimbing

Keterangan

Kartu ini harap dikembalikan ke Departemen Matematika bila bimbingan telah selesai.

Diketahui,

Disetujui,

Ketua Program Studi D3 Teknik Informatika,

Pembimbing,

Dr. Elly Rosmaini, M.Si

Drs.Henry Rani Sitepu,M,Si.

NIP. 196005201985032002

NIP. 195303031983031002


lxx

LAMPIRAN LISTING

LAMPIRAN LISTING PROGRAM WEBSITE

1. index.php

RS AMETA SEJAHTERA

RS AMETA SEJAHTERA

Jalan Bahagia No 89 Medan, Sumatera Utara, Indonesia


lxxi

Admin

Input Data Pasein

Data Pasien

Input Data Dokter

Tampil Data Dokter

Keluar


lxxii

RS AMETA SEJAHTERA Medan copyright © 2015 by: Lamhot Ginting 132406042

2. koneksi.php

= "localhost";

$username = "root"; $password = ""; $database = "lamhot";

$koneksi = mysql_connect($server,$username,$password) or die ('Koneksi gagal');

if($koneksi){ mysql_select_db($database) or die ('Database belum dibuat'); }


lxxiii

?>

3. proses_dokter.php

$tanggal $nama

= date('d M Y H:i'); = $_POST['nama'];

$nid

= $_POST['nid'];

$alamat

= $_POST['alamat'];

$jenis_kelamin

= $_POST['jenis_kelamin'];

$telepon

= $_POST['telepon'];

$spesialis

= $_POST['spesialis'];

$query_insert = "INSERT INTO tbl_dokter ( tanggal, nama, nid, alamat, jenis_kelamin, telepon, spesialis) VALUES( '$tanggal', '$nama', '$nid',


lxxiv

'$alamat', '$jenis_kelamin', '$telepon', '$spesialis')";

$insert = mysql_query($query_insert);

if($insert) { ?><script>alert('Data Dokter Tersimpan');<script>document.location.href='index.php'; <script>alert('Data Dokter Gagal Tersimpan');<script>document.location.href='index.php';

4. proses_pasien.php


lxxv

$tanggal

= date('d M Y H:i');

$nama

= $_POST['nama'];

$umur

= $_POST['umur'];

$alamat

= $_POST['alamat'];

$jenis_kelamin


$telepon


$penyakit

= $_POST['penyakit'];

$ruangan

= $_POST['ruangan'];

$kelas $dokter

= $_POST['kelas']; = $_POST['dokter'];

$query_insert = "INSERT INTO tbl_pasien ( tanggal, nama, umur, alamat, jenis_kelamin, telepon, penyakit, ruangan, kelas, dokter) VALUES( '$tanggal', '$nama', '$umur', '$alamat', '$jenis_kelamin',


lxxvi

'$telepon', '$penyakit', '$ruangan', '$kelas', '$dokter')";

$insert = mysql_query($query_insert);

if($insert) { ?><script>alert('Data Pasien Tersimpan');<script>document.location.href='index.php'; <script>alert('Data Pasien Gagal Tersimpan');<script>document.location.href='index.php';

5. tampilan_datadokter.php


lxxvii

RS AMETA SEJAHTERA

<meta charset='UTF-8'>

Responsive Table

<meta name="viewport" content="width=device-width, initial-scale=1.0">

<style>

/* Max width before this PARTICULAR table gets nasty This query will take effect for any screen smaller than 760px and also iPads specifically. */ @media only screen and (max-width: 760px),


lxxviii

(min-device-width: 768px) and (max-device-width: 1024px) {

/* Force table to not be like tables anymore */ table, thead, tbody, th, td, tr { display: block; }

/* Hide table headers (but not display: none;, for accessibility) */ thead tr { position: absolute; top: -9999px; left: -9999px; }

tr { border: 1px solid #ccc; }

td { /* Behave

like a "row" */

border: none; border-bottom: 1px solid #eee; position: relative; padding-left: 50%; }

td:before { /* Now like a table header */


lxxix

position: absolute; /* Top/left values mimic padding */ top: 6px; left: 6px; width: 45%; padding-right: 10px; white-space: nowrap; }

/* Label the data */ td:nth-of-type(1):before { content: "First Name"; } td:nth-of-type(2):before { content: "Last Name"; } td:nth-of-type(3):before { content: "Job Title"; } td:nth-of-type(4):before { content: "Favorite Color"; } td:nth-of-type(5):before { content: "Wars of Trek?"; } td:nth-of-type(6):before { content: "Porn Name"; } td:nth-of-type(7):before { content: "Date of Birth"; } td:nth-of-type(8):before { content: "Dream Vacation City"; } td:nth-of-type(9):before { content: "GPA"; } td:nth-of-type(10):before { content: "Arbitrary Data"; } }

/* Smartphones (portrait and landscape) ----------- */ @media only screen and (min-device-width : 320px)


lxxx

and (max-device-width : 480px) { body { padding: 0; margin: 0; width: 320px; } }

/* iPads (portrait and landscape) ----------- */ @media only screen and (min-device-width: 768px) and (maxdevice-width: 1024px) { body { width: 495px; } }

RS AMETA SEJAHTERA


lxxxi

Jalan Bahagia No 89 Medan, Sumatera Utara, Indonesia

Nomor Telepon : (0634) 21709, E-mail : [email protected], website :www.bri.co.id

Admin

Input Data Pasein

Data Pasien

Input Data Dokter

Tampil Data Dokter

Keluar

Data Nama Dokter Di RUMAH SAKIT AMETA SEJAHTERA MEDAN


lxxxii

This is the exact same table, only has @media queries applied to is so that when the screen is too narrow, it reformats (via only CSS) to make each row a bit like it's own table. This makes for much more repetition and vertical space needed, but it fits within the horizontal space, so only natural vertical scrolling is needed to explore the data.


lxxxiii

echo ""; ?>

No Kode Nama Dokter Identitas Dokter Alamat Dokter Jenis Kelamin Telepon Spesialis Hapus Ubah

".$no." ".$data['id']." ".$data['nama']." ".$data['nid']." ".$data['alamat']." ".$data['jenis_kelamin']." ".$data['telepon']." ".$data['spesialis']." ">Hapus ">Edit

"; $no++; } ?>



lxxxiv

6. tampilan_datapasien.php

RS AMETA SEJAHTERA

type="text/css"

<meta charset='UTF-8'>

Responsive Table


lxxxv

<meta name="viewport" initial-scale=1.0">

content="width=device-width,

<style>

/* Max width before this PARTICULAR table gets nasty This query will take effect for any screen smaller than 760px and also iPads specifically. */ @media only screen and (max-width: 760px), (min-device-width: 768px) and (max-device-width: 1024px) {

/* Force table to not be like tables anymore */ table, thead, tbody, th, td, tr { display: block; }

/* Hide table accessibility) */

headers

(but

not

display:

none;,

for

thead tr { position: absolute; top: -9999px;


lxxxvi

left: -9999px; }

tr { border: 1px solid #ccc; }

td { /* Behave

like a "row" */

border: none; border-bottom: 1px solid #eee; position: relative; padding-left: 50%; }

td:before { /* Now like a table header */ position: absolute; /* Top/left values mimic padding */ top: 6px; left: 6px; width: 45%; padding-right: 10px; white-space: nowrap; }

/* Label the data */ td:nth-of-type(1):before { content: "First Name"; }


lxxxvii

td:nth-of-type(2):before { content: "Last Name"; } td:nth-of-type(3):before { content: "Job Title"; } td:nth-of-type(4):before { content: "Favorite Color"; } td:nth-of-type(5):before { content: "Wars of Trek?"; } td:nth-of-type(6):before { content: "Porn Name"; } td:nth-of-type(7):before { content: "Date of Birth"; } td:nth-of-type(8):before City"; }

{

content:

"Dream

Vacation

td:nth-of-type(9):before { content: "GPA"; } td:nth-of-type(10):before { content: "Arbitrary Data"; } }

/* Smartphones (portrait and landscape) ----------- */ @media only screen and (min-device-width : 320px) and (max-device-width : 480px) { body { padding: 0; margin: 0; width: 320px; } }

/* iPads (portrait and landscape) ----------- */ @media only screen and (min-device-width: 768px) and (maxdevice-width: 1024px) { body { width: 495px; }


lxxxviii

}

RS AMETA SEJAHTERA

Jalan Indonesia

Bahagia

No

89

Medan,

Sumatera

Utara,

Nomor Telepon : (0634) 21709, [email protected], website :www.bri.co.id

E-mail

:

Admin


lxxxix

href="input_datapasien.php">Input

Data

href="tampil_datapasien.php">Data

href="input_datadokter.php">Input

Data

href="tampil_datadokter.php">Tampil

Data

Keluar

Data MEDAN

Nama

Pasien

Di

RUMAH

SAKIT

AMETA

SEJAHTERA

This is the exact same table, only has @media queries applied to is so that when the screen is too narrow, it reformats (via only CSS) to make each row a bit like it's own table. This makes for much more repetition and vertical space needed, but it fits within the horizontal space, so only natural vertical scrolling is needed to explore the data.


xc


xci

"; ?>

echo

No Kode Nama Pasien Umur Pasien Alamat Pasien Jenis Kelamin Telepon Penyakit Ruangan Kelas Dokter Hapus Ubah

".$no." ".$data['id']." ".$data['nama']." ".$data['umur']." ".$data['alamat']." ".$data['jenis_kelamin']." ".$data['telepon']." ".$data['penyakit']." ".$data['ruangan']." ".$data['kelas']." ".$data['dokter']." ">Hapus ">Edit

echo

"; $no++; } ?>



xcii

} else header("location: admin/login.php"); ?>

7. input_datadokter.php

RS AMETA SEJAHTERA

type="text/css"

RS AMETA SEJAHTERA


xciii

Jalan Sumatera Utara, Indonesia

Bahagia

No

89

Medan,

Admin

Input Data Pasein

Data Pasien

Input Data Dokter

Tampil Data Dokter

Keluar

action="proses_dokter.php"

method="POST">

Dokter

cellpadding='2'

RSU

AMETA


xciv


xcv

type="submit"

Input SEJAHTERA

Nama Dokter
type="text"

name="nama"

required>

No Induk Dokter
type="number"

name="nid"

required>

Alamat Dokter
type="text"

name="alamat"

required>

Jenis Kelamin <select name="jenis_kelamin">
value="Laki-

Lai">Laki-

Laki

Telepon Dokter
type="number"

name="telepon"

required>

Spesialis Dokter <select name="spesialis">

RS AMETA SEJAHTERA copyright © 2015 by: Lamhot Ginting 132406042

Medan


xcvi

8. input_datapasien.php

RS AMETA SEJAHTERA

type="text/css"


xcvii

RS AMETA SEJAHTERA


Bahagia

No

89

Medan,

Admin

Input Data Pasein

Data Pasien

Input Data Dokter

Tampil Data Dokter

Keluar


xcviii

action="proses_pasien.php"

method="POST">

Pasien

cellpadding='2'

RSU

AMETA


c


ci

type="submit"

Input SEJAHTERA

Nama Pasien
type="text"

name="nama"

required>

Umur Pasien
type="number"

name="umur"

required>

Alamat Pasien
type="text"

name="alamat"

required>

Jenis Kelamin


xcix

<select name="jenis_kelamin">
value="Laki-

Lai">Laki-

Laki

Telepon Pasien
type="number"

name="telepon"

required>

Penyakit Pasien <select name="penyakit">

Ruangan Pasien <select name="ruangan">
value="Lantai

1">Lantai

value="Lantai

2">Lantai

value="Lantai

3">Lantai

value="Lantai

4">Lantai

1

2

3

4

Kelas Pasien <select name="kelas">

Dokter Jaga <select name="dokter">
while

($dokter

=

echo ""; }?>


Medan


cii

9. edit_dokter.php

RS AMETA SEJAHTERA

type="text/css"

RS AMETA SEJAHTERA


Bahagia

No

89

Medan,



ciii

Admin

Input Data Pasein

Data Pasien

Input Data Dokter

Tampil Data Dokter

Keluar

";

method='post'

$query="SELECT * FROM `tbl_dokter` WHERE id='$id'"; $eksekusi=mysql_query($query); $data=mysql_fetch_array($eksekusi); ?>


civ

cellpadding='2'

echo

value="
echo

$data['id'];


cv


cvi

type="reset"

TAMPIL

type="submit"

Edit Data Dokter RSU AMETA SEJAHTERA Atas Nama
Tanggal Masuk

Kode Dokter " required>

Nama Dokter

Identitas Dokter

Alamat

value="Laki-

echo echo

Laki">Laki-

Laki

No Telepon

Spesialis <select name="spesialis">
value="
value="Laki-

Laki">Laki-

Laki

KEMBALI KE PASIEN


Medan

10. edit_pasien.php


cvii

RS AMETA SEJAHTERA

type="text/css"

RS AMETA SEJAHTERA


cviii


Bahagia

No

89

Medan,


Admin

Input Data Pasein

Data Pasien

Input Data Dokter

Tampil Data Dokter

Keluar

";

method='post'


cix

$query="SELECT * FROM `tbl_pasien` WHERE id='$id'"; $eksekusi=mysql_query($query); $data=mysql_fetch_array($eksekusi); ?>

cellpadding='2'

echo

value="
echo

$data['id'];


cx

type="reset"

TAMPIL


cxiii

type="submit"

Edit Data Pasien RSU AMETA SEJAHTERA Atas Nama

Tanggal Masuk

Kode Pasien " required>

Nama Pasien

Umur Pasien

Alamat

value="Laki-

echo echo

Laki">Laki-

Laki

No Telepon

Penyakit Pasien <select name="penyakit">


cxi

value="

Ruangan Pasien <select name="ruangan">

Kelas Pasien <select name="kelas">

$data['kelas'];


cxii

Dokter Jaga <select name="dokter">

while

($dokter

=

echo ""; }?>

KEMBALI KE PASIEN


Medan

11. update_dokter.php

=$_GET['id'];

$nama

= $_POST['nama'];

$nid

= $_POST['nid'];

$alamat

= $_POST['alamat'];

$jenis_kelamin


$telepon



cxiv

$q="UPDATE `tbl_dokter` SET id='$id', nama='$nama', nid='$nid',

alamat='$alamat',

jenis_kelamin='$jenis_kelamin',

telepon='$telepon' WHERE

id='$id'";

if (mysql_query($q)) { ?><script>alert('SUDAH DIPERBARUI');
?><script>document.location.href='tampil_datadokter.ph p';

12. update_pasien.php

=$_GET['id'];

$nama

= $_POST['nama'];

$umur

= $_POST['umur'];

$alamat

= $_POST['alamat'];


cxv

$jenis_kelamin


$telepon


$penyakit

= $_POST['penyakit'];

$ruangan

= $_POST['ruangan'];

$kelas $dokter

= $_POST['kelas']; = $_POST['dokter'];

$q="UPDATE `tbl_pasien` SET id='$id', nama='$nama', umur='$umur',

alamat='$alamat',

jenis_kelamin='$jenis_kelamin',

telepon='$telepon',

penyakit='$penyakit',

ruangan='$ruangan', kelas='$kelas', dokter='$dokter' WHERE

id='$id'";

if (mysql_query($q)) { ?><script>alert('SUDAH DIPERBARUI');
?><script>document.location.href='tampil_datapasien.ph p';

cxvi

} else{ echo"data gagal diinput: ".mysql_error(); } ?> 13. hapus_dokter.php

$id=$_GET['id'];

$q="DELETE FROM `tbl_dokter` WHERE id='$id'"; if(mysql_query($q)){

?><script>alert('Data dihapus');
berhasil

?><script>document.location.href='tampil_datadokter.ph p';
?>


cxvii

14.hapus_pasien.php

$id=$_GET['id'];

$q="DELETE FROM `tbl_pasien` WHERE id='$id'"; if(mysql_query($q)){

?><script>alert('Data dihapus');
berhasil

?><script>document.location.href='tampil_datapasien.ph p';
?>


Nama Dokter	type="text" name="nama" required>
No Induk Dokter	type="number" name="nid" required>
Alamat Dokter	type="text" name="alamat" required>
Jenis Kelamin	<select name="jenis_kelamin"> value="Laki- Lai">Laki- Laki
Telepon Dokter	type="number" name="telepon" required>
Spesialis Dokter	<select name="spesialis">

Nama Pasien	type="text" name="nama" required>
Umur Pasien	type="number" name="umur" required>
Alamat Pasien	type="text" name="alamat" required>
Jenis Kelamin	Universitas Sumatera Utara xcix <select name="jenis_kelamin"> value="Laki- Lai">Laki- Laki
Telepon Pasien	type="number" name="telepon" required>
Penyakit Pasien	<select name="penyakit">
Ruangan Pasien	<select name="ruangan"> value="Lantai 1">Lantai value="Lantai 2">Lantai value="Lantai 3">Lantai value="Lantai 4">Lantai 1 2 3 4
Kelas Pasien	<select name="kelas">
Dokter Jaga	<select name="dokter"> while ($dokter = echo ""; }?>

Tanggal Masuk
Kode Dokter	" required>
Nama Dokter
Identitas Dokter
Alamat
Jenis Kelamin	<select name="jenis_kelamin"> value="Laki- echo echo Laki">Laki- Laki
No Telepon
Spesialis	<select name="spesialis"> value=" value="Laki- Laki">Laki- Laki

	KEMBALI KE PASIEN

Tanggal Masuk
Kode Pasien	" required>
Nama Pasien
Umur Pasien
Alamat
Jenis Kelamin	<select name="jenis_kelamin"> value="Laki- echo echo Laki">Laki- Laki
No Telepon
Penyakit Pasien	<select name="penyakit"> Universitas Sumatera Utara cxi value="
Ruangan Pasien	<select name="ruangan">
Kelas Pasien	<select name="kelas"> $data['kelas']; Universitas Sumatera Utara cxii
Dokter Jaga	<select name="dokter"> while ($dokter = echo ""; }?>

	KEMBALI KE PASIEN

SURAT KETERANGAN. Hasil Uji Program Tugas Akhir

Recommend Documents

RS AMETA SEJAHTERA

Jalan Bahagia No 89 Medan, Sumatera Utara, Indonesia

RS AMETA SEJAHTERA

Jalan Bahagia No 89 Medan, Sumatera Utara, Indonesia

Nomor Telepon : (0634) 21709, E-mail : [email protected], website :www.bri.co.id

Data Nama Dokter Di RUMAH SAKIT AMETA SEJAHTERA MEDAN

RS AMETA SEJAHTERA

Jalan Indonesia

Nomor Telepon : (0634) 21709, [email protected], website :www.bri.co.id

Data MEDAN

RS AMETA SEJAHTERA

Jalan Sumatera Utara, Indonesia

Input SEJAHTERA

RS AMETA SEJAHTERA

Jalan Sumatera Utara, Indonesia

Input SEJAHTERA

RS AMETA SEJAHTERA

Jalan Sumatera Utara, Indonesia

Nomor Telepon : (0634) 21709, E-mail : [email protected], website :www.bri.co.id

Edit Data Dokter RSU AMETA SEJAHTERA Atas Nama

KEMBALI KE PASIEN

RS AMETA SEJAHTERA

Jalan Sumatera Utara, Indonesia

Nomor Telepon : (0634) 21709, E-mail : [email protected], website :www.bri.co.id

Edit Data Pasien RSU AMETA SEJAHTERA Atas Nama

KEMBALI KE PASIEN