Universitas Sumatera Utara

L A M P I R A N Universitas Sumatera Utara

LAMPIRAN A : TAMPILAN PROGRAM

Tampilan Halaman Utama (Home)

Tampilan Halaman Daftar Baru

Tampilan Halaman Perpanjangan

Universitas Sumatera Utara

Tampilan Halaman Lihat Permohonan Baru

Universitas Sumatera Utara

Tampilan Halaman Permohonan Perpanjangan

Tampilan Home Admin

Universitas Sumatera Utara

Tampilan Halaman Login Admin

Tampilan Halaman Formisinik

Universitas Sumatera Utara

Tampilan Halaman Lihat Permohonan Baru

Universitas Sumatera Utara

Tampilan Lihat Permohonan Perpanjangan

Tampilan Input Data Kecamatan

Universitas Sumatera Utara

Tampilan Halaman Searching

Tampilan Data Lokasi

Universitas Sumatera Utara

LAMPIRAN B : LISTING PROGRAM

Listing index.php
Universitas Sumatera Utara

/* http://www.appservnetwork.com */ /* */ /* This program is free software. You can redistribute it and/or modify */ /* it under the terms of the GNU General Public License as published by */ /* the Free Software Foundation; either version 2 of the License. */ /*************************************************************** *********/ include("appserv/main.php");

print " <meta http-equiv=\"Content-Type\" content=\"text/html; charset=\""._CHARSET."\"> <style> "; ?>

Listing konek_mysql.inc.php

Listing cek.php

Universitas Sumatera Utara



Listing cek_login.php <script language="JavaScript">alert('Anda berhasil login '); document.location='home_admin.html'

Listing coba_cek.php

Universitas Sumatera Utara

<meta http-equiv="Content-Type" content="text/html; charset=iso8859-1" /> <style type="text/css">

Maaf kode yang anda masukkan salah

Silahkan coba login kembali

 

<span class="style1">Username   <span class="style1">Password

Universitas Sumatera Utara

<marquee scrollamount="siLahKan Login teRLebih daHuLu" scrolldelay="6">

siLahKan Login teRLebih daHuLu

 

Listing Logout.php

---- MAIN PROGRAM START ----

Listing home.php

Universitas Sumatera Utara

<meta http-equiv="Content-Type" content="text/html; charset=iso8859-1">

PELAYANAN MASYARAKAT PADA KOTAMADYA MEDAN silahkan pilh jenis layanan

KTP [daftar baru] [perpanjangan]

Listing input_baru2.php <meta http-equiv="Content-Type" content="text/html; charset=iso8859-1">

Universitas Sumatera Utara

PELAYANAN KARTU TANDA PENDUDUK BARU KOTAMADYA MEDAN

Universitas Sumatera Utara Universitas Sumatera Utara No.KK Nama Jenis Kelamin laki-laki perempuan Tgl Lahir Tanggal <select name="tgl" size="1"> 01 02 03 04 05 06 07 08 09 "> Bulan <select name="bln" size="1"> 01 02 03 04 05 06 07 08 09 "> Tahun <select name="th" size="1"> Universitas Sumatera Utara "> Tempat Lahir Hubungan Keluarga <select name="hub_keluarga"> Kepala Keluarga Suami Istri Anak Kandung Anak Tiri Anak Angkat Orang Tua Mertua Menantu Cucu Famili Saudara Kandung Pembantu Lain-Lain No.Akte Kelahiran Status Perkawinan <select name="status_perkawinan"> Universitas Sumatera Utara value="Belum Kawin">Belum Kawin value="Kawin">Kawin value="Duda">Duda value="Janda">Janda No.Akte Perkawinan Agama <select name="agama"> Islam Kristen Katholik Hindu Budha Golongan Darah <select name="gol_darah"> A B O AB - Kewarganegaraan Universitas Sumatera Utara <select name="kewarganegaraan"> WNI WNA WNI keturunan Pendidikan <select name="pendidikan"> Tidak Sekolah SD/sederajat SLTP/sederajat SLTA/sederajat AKADEMI UNIVERSITAS PASCA SARJANA Status Pendidikan <select name="status_pend"> Tamat Belum Tamat Tidak Tamat Pekerjaan <select name="pekerjaan"> Belum Bekerja Petani Nelayan Pedagang PNS Anggota TNI-AD Anggota TNI-AL Anggota TNI-AU Universitas Sumatera Utara Kepolisian Purnawirawan Pensiunan Peg.swasta Wiraswasta Buruh Pembantu Pelajar Mahasiswa Ibu Rumah Tangga Dokter Dosen Lainnya Tempat Tinggal Kecamatan <select name="kecamatan"> $row[1]"; } ?> Alamat Email No.Telpon Nama Ibu NIK Ibu Nama Ayah NIK Ayah   Universitas Sumatera Utara Listing input_baru1.php $date=date(s); Universitas Sumatera Utara $tanggal=date("d-m-Y"); $masa1=date("d"); $masa2=date("m"); $masa3=date("Y"); $masa4=$masa3+5; $koneksi=mysql_connect("localhost","root","123"); mysql_select_db("kependudukan"); $sql1=mysql_query("INSERT INTO biodata_penduduk VALUES('','BD/HH-1/$date','$nik','$no_kk','$nama','$jkel','$tgl$bln$th','$tmp_lahir','$hub_keluarga','$no_akte_lahir','$status_kawi n','$no_akte_kawin','$agama','$gol_darah','$kewarganegaraan','$p endidikan','$status_pend','$pekerjaan','$tmp_tinggal','$kecamata n','$email','$no_telpon','$nama_ibu','$nik_ibu','$nama_ayah','$n ik_ayah')"); $sql=mysql_query("INSERT INTO permohonan_ktp VALUES('','BD/HH1/$date','$tanggal','baru')"); $sql3=mysql_query("INSERT INTO kartu_ktp VALUES('BD/HH1/$date','$masa1-$masa2-$masa4')"); echo echo echo echo echo echo echo echo echo echo echo echo " Data telah tersimpan "; "Nama : $nama "; "No KK : $no_kk "; "NIK : $nik "; "Jenis Kelamin : $jkel "; "Tempat Tgl lahir : $tgl-$bln-$th "; "Hub Keluarga : $hub_keluarga "; "Nama Ibu : $nama_ibu "; "Nama Ayah : $nama_ayah "; "NIK Ibu : $nik_ibu "; "NIK Ayah : $nik_ayah "; "Email : $email "; ?> Universitas Sumatera Utara jika akan mengedit data, tekan tombol [HOME] Listing input_perpanjangan2.php <meta http-equiv="Content-Type" content="text/html; charset=iso8859-1"> "; Universitas Sumatera Utara } else if(trim($no_kk)=="") { echo ""; } else if(trim($nama)=="") { echo ""; } else { if(!(include "koneksi.php")) { echo ""; exit(); } include "koneksi.php"; $sql="SELECT * FROM biodata_penduduk WHERE nik=\"$nik\""; $sql2="SELECT * FROM biodata_penduduk WHERE no_kk=\"$no_kk\""; $result=mysql_query($sql); $row=mysql_fetch_array($result); $ketemu=mysql_num_rows($result); $result2=mysql_query($sql2); $row2=mysql_fetch_array($result2); $ketemu2=mysql_num_rows($result2); if($ketemu < 1) { echo "mohon maaf nik anda salah "; } else if ( $ketemu2 < 1 ) { echo "mohon maaf No KK anda salah "; } else { include "koneksi.php"; $queryper="SELECT no_permohonan FROM biodata_penduduk WHERE nik='$nik'"; $resultper=mysql_query($queryper); while($rowper=mysql_fetch_array($resultper)) { $no_permohonan1=$rowper["no_permohonan"]; $masa_berlaku=date('Y:H i s'); $masa_berlaku_perpanjangan="$tglbln-$masa_berlaku"; $tgl_masuk_data=date("d-m-Y,H:i:s"); $sql5=mysql_query("UPDATE permohonan_ktp SET jenis_permohonan='perpanjangan', Universitas Sumatera Utara tgl_masuk_data='$tgl_masuk_data' WHERE no_permohonan='$no_permohonan1'"); $sql6=mysql_query("UPDATE kartu_ktp SET masa_berlaku='$masa1$masa2-$masa4' WHERE no_permohonan='$no_permohonan1'"); } if(!($sql6)) { echo ""; }else { echo " ::sukses:: data anda sudah masuk pada database kami "; echo "$tgl_masuk_data"; echo ""; } } } ?> jika akan mengedit data, tekan tombol [HOME] Listing home_admin.html <meta http-equiv="Content-Type" content="text/html; charset=iso8859-1"> Universitas Sumatera Utara PELAYANAN KARTU TANDA PENDUDUK PERPANJANGAN KOTAMADYA MEDAN NIK Universitas Sumatera Utara No.Kartu Keluarga Nama Lengkap   Listing Input_perpanjangan.php NIK :masih kosong No.KK :masih kosong Nama Lengkap :masih kosong mohon maaf mysql tidak bisa konek mohon maafdata tidak bisa masuk ke database kartu ktp mohon untuk menunggu pencetakan "; echo "konfirmasi lebih lanjut lewat e-mail "; echo "paling lambat 1 hari dari anda mengirim data ini sudah jadi :: PELAYANAN MASYARAKAT PADA KOTAMDYA MEDAN KTP [lihat pemohon baru]   [lihat_pemohon_perpanja ngan]   [lihat nik kosong]   [lihat semua data] [lihat data kecamatan]  [input kecamatan]  [formisinik]  [searching] [logout] Listing lihat_permohonan_baru.php Universitas Sumatera Utara DAFTAR PEMOHON KTP BARU mohon maaftidak bisa konek ke database "; } $sql="SELECT * from biodata_penduduk,permohonan_ktp,kartu_ktp where biodata_penduduk.no_permohonan=permohonan_ktp.no_permohonan&&per mohonan_ktp.no_permohonan=kartu_ktp.no_permohonan&&permohonan_kt p.jenis_permohonan='baru'&&biodata_penduduk.nik is not null "; if(!($tampil=mysql_db_query($db,$sql))) { echo " mohon maaf data tidak bisa di tampilkan "; } else { echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; while($row=mysql_fetch_array($tampil)) { echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; } } ?> No NIK nama tanggal lahir Kecamatan e-mail no.telpon masa berlaku tgl masuk data $row[no_permohonan] $row[nik] $row[nama] $row[tgl_lahir] $row[kecamatan] $row[email] $row[no_telpon] $row[masa_berlaku] $row[tgl_masuk_data] Universitas Sumatera Utara [home] [lihat semua data] [lihat pemohon perpanjangan] [lihat nik kosong] Listing Lihat_permohonan_perpanjangan.php DAFTAR PEMOHON KTP PERPANJANGAN mohon maaftidak bisa konek ke database "; } $sql="SELECT * from biodata_penduduk,permohonan_ktp,kartu_ktp where biodata_penduduk.no_permohonan=permohonan_ktp.no_permohonan&&per mohonan_ktp.no_permohonan=kartu_ktp.no_permohonan&&permohonan_kt p.jenis_permohonan='perpanjangan'"; if(!($tampil=mysql_db_query($db,$sql))) { echo " mohon maaf data tidak bisa di tampilkan "; } else { echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; Universitas Sumatera Utara echo ""; echo ""; while($row=mysql_fetch_array($tampil)) { echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; } } ?> No NIK nama tanggal lahir Kecamatan e-mail no.telpon masa berlaku tgl masuk data $row[no_permohonan] $row[nik] $row[nama] $row[tgl_lahir] $row[kecamatan] $row[email] $row[no_telpon] $row[masa_berlaku] $row[tgl_masuk_data] [home] [lihat semua data] [lihat pemohon baru] [lihat nik kosong] Listing lihat_nik_kosong.php LIHAT NIK KOSOSNG mohon maaftidak bisa konek ke database "; } Universitas Sumatera Utara $sql="SELECT * from biodata_penduduk where biodata_penduduk.nik=''"; if(!($tampil=mysql_db_query($db,$sql))) { echo " mohon maaf data tidak bisa di tampilkan "; } else { echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; while($row=mysql_fetch_array($tampil)) { echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; } } ?> No NIK nama tanggal lahir Kecamatan e-mail no.telpon $row[no_permohonan] $row[nik] $row[nama] $row[tgl_lahir] $row[kecamatan] $row[email] $row[no_telpon] $row[masa_berlaku] [home] [lihat semua data] [lihat pemohon perpanjangan] [lihat nik kosong] [formisinik] Listing lihat_semua_data.php Universitas Sumatera Utara include "./cek.php"; ?> DAFTAR PEMOHON KTP mohon maaftidak bisa konek ke database "; } $sql="SELECT * from biodata_penduduk,permohonan_ktp,kartu_ktp where biodata_penduduk.no_permohonan=permohonan_ktp.no_permohonan&&per mohonan_ktp.no_permohonan=kartu_ktp.no_permohonan"; if(!($tampil=mysql_db_query($db,$sql))) { echo " mohon maaf data tidak bisa di tampilkan "; } else { echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; while($row=mysql_fetch_array($tampil)) { echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; } } Universitas Sumatera Utara ?> No NIK nama tanggal lahir Kecamatan e-mail no.telpon masa berlaku tgl masuk data $row[no_permohonan] $row[nik] $row[nama] $row[tgl_lahir] $row[kecamatan] $row[email] $row[no_telpon] $row[masa_berlaku] $row[tgl_masuk_data] [home] [lihat pemohon baru] [lihat pemohon perpanjangan] [lihat nik kosong] Listing lihat_kec.php "; while($row=mysql_fetch_array($tampil)) { echo ""; } ?> kode kecamatan nama kecamatan ibu kota $row[kode_kec] $row[nama_kec] $ row[ibu_kota] jika akan mengedit data, tekan tombol Universitas Sumatera Utara [home] [input data kecamatan] Listing input_kec.html <meta http-equiv="Content-Type" content="text/html; charset=iso8859-1"> Universitas Sumatera Utara INPUT DATA KECAMATAN KODE KECAMATAN NAMA KECAMATAN IBU KOTA

Listing input_kec.php "; }

Universitas Sumatera Utara

else if(trim($nama_kec)=="") { echo ""; } else if(trim($ibu_kota)=="") { echo ""; } else { if(!(include "../../konek_mysql.inc.php")) { echo""; exit(); } $sql="INSERT INTO kecamatan(kode_kec,nama_kec,ibu_kota) VALUES('$kode_kec','$nama_kec','$ibu_kota')"; if(!($input=mysql_db_query($db,$sql))) { echo "td>mohon maafdata tidak bisa masuk ke database kami"; }else{ echo "

::sukses::

data anda sudah masuk ke database
"; } } ?>

kode kecamatan	:masih kosong
nama kecamatan	:masih kosong
ibu kota	:masih kosong
mohon maaf mysql tidak bisa konek

Listing formisinik.php <meta http-equiv="Content-Type" content="text/html; charset=iso8859-1"> Universitas Sumatera Utara INPUT NIK BARU Universitas Sumatera Utara Universitas Sumatera Utara No.Permohonan " size="8"> Nama Lengkap "> No.Kartu Keluarga "> Tgl Lahir "> Kecamatan " size="8" /> NIK " maxlength="19">   jika akan mengedit data, tekan tombol [input data kecamatan]

Listing Searching.html <meta http-equiv="Content-Type" content="text/html; charset=iso8859-1">

SEARCHING

Universitas Sumatera Utara Searching: Pada <select name="searchpada"> No.Induk Kependudukan Nama Kecamatan No. Kartu Keluarga No.akte kelahiran No. akte perkawinan Nama ibu Nama ayah semua tempat

Listing Searching.php

Universitas Sumatera Utara

"; exit(); } $cari1=""; $cari2=""; if($searchpada=="nik") { $cari1="SELECT * FROM biodata_penduduk where nik LIKE '%$textsearch%'"; } else if($searchpada=="nama") { $cari1="SELECT * FROM biodata_penduduk where nama LIKE '%$textsearch'"; } else if($searchpada=="kecamatan") { $cari1="SELECT * FROM biodata_penduduk where kecamatan LIKE '%$textsearch'"; } else if($searchpada=="no.kk") { $cari1="SELECT * FROM biodata_penduduk where no_kk LIKE '%$textsearch'"; } else if($searchpada=="no.akte kelahiran") { $cari1="SELECT * FROM biodata_penduduk where no_akte_kelahiran LIKE '%$textsearch'"; } else if($searchpada=="no.akte perkawinan") { $cari1="SELECT * FROM biodata_penduduk where no_akte_kelahiran LIKE '%$textsearch'"; } else if($searchpada=="nama ibu") { $cari1="SELECT * FROM biodata_penduduk where nama_ibu LIKE '%$textsearch'"; } else if($searchpada=="nama ayah") { $cari1="SELECT * FROM biodata_penduduk where nama_ayah LIKE '%$textsearch'"; } else if($searchpada=="semua tempat") { $cari2="SELECT * FROM biodata_penduduk where nik LIKE '%$textsearch%' OR nama LIKE '%$textsearch%' OR kecamatan LIKE '%$textsearch%' OR no_kk LIKE '%$textsearch%' OR no_akte_kelahiran LIKE '%$textsearch%' OR no_akte_perkawinan

Universitas Sumatera Utara

LIKE '%$textsearch%' OR nama_ibu LIKE '%$textsearch%' OR nama_ayah LIKE '%$textsearch%'"; $cari3="SELECT * FROM biodata_penduduk a,permohonan_ktp b,kartu_ktp c, WHERE(a.no_permohonan=b.no_permohonan)&&(b.no_permohonan=c.no_pe rmohonan)&&((b.jenis_permohonan LIKE '%$textsearch%') OR(b.tgl_masuk_data LIKE '%$textsearch%') OR(c.masa_berlaku LIKE '%$textsearch%'))"; } $searchberhasil="NO"; for ($i=1; $i<=3; $i++) { $cari="cari"."$i"; if($$cari=="") { continue; } if(!($result=mysql_db_query($db,$$cari))) { echo "mysql_error()l"; exit(); } if(($jmlbaris=mysql_num_rows($result))!=0) { $searchberhasil="YES"; echo ""; echo ""; while($row=mysql_fetch_array($result)) { echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; echo ""; } } } if($searchberhasil=="NO") {

Universitas Sumatera Utara

echo "Tidak menemukan kata  $textsearch pada kanal ini
"; } ?>

mohon maaf mysql tidak bisa konek
Hasil Pencarian Pada Kanal ini ada$jmlbarisbuah
Nama	:$row[nama]
NIK	:$row[nik]
No.KK	:$row[no_kk]
No. Akte Kelahiran	:$row[no_akte_lahir]
No. Akte Perkawinan	:$row[no_akte_kawin]
Nama Kecamatan	:$row[kecamatan]
Nama Ibu	:$row[nama_ibu]
Nama Ayah	:$row[nama_ayah]

jika akan mengedit data, tekan tombol [home] [lihat semua data] [lihat pemohon baru] [lihat pemohon perpanjangan] [lihat nik kosong]

Universitas Sumatera Utara