ABSTRAK Sistem informasi kepegawaian ini adalah untuk dapat menghasilkan suatu sumber informasi yang akurat, tepat guna, efektif dan efisien sesuai dengan perkembangan teknologi informasi saat ini. Metode yang penulis gunakan dalam karya tulis ilmiah ini adalah terdiri dari perancangan database, data flow diagram, , perancangan input dan output. Diagram konteks dan flowchart digunakan untuk perancangan database. Hasil penelitian yang dilakukan pada Badan Pemberdayaan Masyarakat (BPM) Aceh, dimana dalam hal ini sistem informasi kepegawaian yang sangat mudah digunakan oleh pegawai pemerintah. Kata Kunci: Sistem, Sistem Informasi, Kepegawaian.
ABSTRACT This information system of employees data as purpose to produce an accurate source of information, appropriate, effectively and efficiently in accordance with the development of information technology to this moment. The method of writer in this thesis is consist of database design, data flow diagram design, normalization, input and output design. The diagram context and flowcart used to database design. The results of research conduct at the office of Badan Pemberdayaan Masyarakat (BPM) Aceh, and in this case the information system of employees data are certainly easy used by government employees. Keywords: system, information system, employees.
vii
1
BAB I PENDAHULUAN
1.1
Latar Belakang Masalah Sistem informasi merupakan suatu hal yang dibutuhkan dan bermanfaat
bagi lembaga dan organisasi. Dengan adanya sistem informasi maka pengolahan data atau transakasi harian di suatu organisasi dapat dilakukan dengan cepat dan akurat. Sistem informasi sangat dibutuhkan dihampir setiap bidang dalam suatu organisasi tak terkecuali bidang kepegawaian. Dalam bidang kepegawaian, sistem informasi digunakan untuk mengolah data dan informasi tentang kepegawaian, termasuk meng-up date data jumlah pegawai, data kenaikan pangkat pegawai, data pensiun, data perpindahan pegawai dan lain-lain. Dengan adanya sistem informasi di bidang kepegawaian diharapkan dapat memperlancar pengaksesan data dan informasi. Penyediaan data dan informasi yang tepat, cepat dan akurat membantu organisasi untuk mendukung pengambilan keputusan pihak manajemen khususnya dalam mengatur dan menata penempatan para pegawai sesuai dengan kapasitasnya. Perkembangan ilmu pengetahuan dan teknologi pada saat sekarang ini mempunyai peranan yang sangat penting, salah satunya di bidang komputer. Terbukti
dengan
banyaknya
instansi
pemerintah
ataupun
swasta
yang
menggunakan sistem komputerisasi sebagai alat bantu untuk meningkatkan kreatifitas para pegawai sehigga memiliki skill yang bagus dan menjadikan instansi tersebut memiliki kompetensi yang tinggi.
2
Hal ini mendorong banyak organisasi atau instansi untuk memanfaatkan perkembangan teknologi informasi secara maksimal untuk mendapatkan informasi yang tepat. Namun demikian masih ada organisasi atau instansi yang belum sepenuhnya memanfaatkan perkembangan teknologi informasi, salah satunya adalah Badan Pemberdayaan Masyarakat (BPM) Aceh. Penulis melihat di dalam pengolahan data pegawai masih bersifat manual walaupun sudah menggunakan seperangkat komputer, yaitu proses pengolahan data tersebut menggunakan sebuah aplikasi yang sudah umum digunakan yaitu Microsoft Word dan Microsoft Excel. Salah satu perangkat lunak pengembangan aplikasi yang populer adalah Microsoft Visual Basic .Net. Menangani pengolahan data pegawai sangatlah efektif bila dibandingkan dengan sistem pemrosesan manual, karena Microsoft Visual Basic .Net merupakan software yang bisa digunakan untuk membuat program yang sangat sederhana tapi banyak cakupan yang dapat dikerjakan. Perkembangan teknologi database tidak lepas dari perkembangan perangkat keras dan perangkat lunak. Dengan menggunakan aplikasi ini, maka pihak kepegawaian lebih mudah dalam mengolah data kepegawaian. Berdasarkan uraian di atas, maka penulis tertarik untuk membahas sebuah Karya Tulis Ilmiah (KTI) dengan judul dengan
menggunakan
Microsoft
“Sistem informasi Kepegawaian
Visual
Pemberdayaan masyarakat (BPM) Aceh”.
Basic
.Net
pada
Badan
3
1.2
Perumusan Masalah Masalah yang akan diselesaikan dalam karya Tulis Ilmiah (KTI) ini adalah
bagaimana penerapan sistem informasi kepegawaian dengan menggunakan Microsoft Visual Basic .Net pada Badan Pemberdayaan Masyarakat (BPM) Aceh. 1.3
Batasan Masalah Batasan masalah pada Karya Tulis Ilmiah (KTI) ini hanya mencakup data
kepegawaian berupa data pegawai, data jabatan, data pelatihan dan data pensiun pada kantor Badan Pemberdayaan Masyarakat (BPM) Provinsi Aceh dengan menggunakan bahasa pemograman Visual Basic .Net dan aplikasi Microsoft Acces 2007. Penelitian ini tidak meliputi kantor Badan Pemberdayaan Masyarakat (BPM) di lokasi lain. 1.4 Manfaat dan Tujuan Penelitian Manfaat penulisan Karya Tulis Ilmiah (KTI) ini adalah penulis dapat mengetahui bagaimana cara penerapan sistem informasi kepegawaian yang berjalan dengan menggunakan Microsoft Visual Basic .Net pada Badan Pemberdayaan Masyarakat (BPM) Aceh, dan dapat memberi saran dan masukan yang bermanfaat bagi Badan Pemberdayaan Masyarakat (BPM) Aceh. Tujuan penulisan tugas akhir ini adalah : 1. Untuk
mengetahui
penerapan
sistem
informasi
kepegawaian
dengan
menggunakan Microsoft Visual Basic .Net pada Badan Pemberdayaan Masyarakat (BPM) Aceh.
4
2. Untuk melengkapi salah satu syarat Karya Tulis Ilmiah (KTI) dalam menyelesaikan program studi Diploma III Manajemen Informatika STMIK U’ Budiyah Indonesia. 1.5
Sistematika Penulisan Sistematika penulisan Karya Tulis Ilmiah (KTI) ini merupakan garis
besar penyusunan tugas akhir. Adapun sistematika dalam penyusunan Karya Tulis Ilmiah (KTI) meliputi : BAB I
Pendahuluan terdiri dari Latar Belakang
Masalah, Perumusan
Masalah, Batasan Masalah, Manfaat dan Tujuan Penelitian. BAB II
Tinjauan Kepustakaan pada bab ini membahas mengenai Gambaran Umum Instansi, Sejarah Singkat, Tugas dan Fungsi, Visi dan Misi, Stuktur Organisasi, Bahasa Pemrograman, Microsoft Visual Basic .Net, Crystal Report, Microsoft Acces 2007, Flowchart, Landasan Teori yang didalamnya membahas pengertian sistem, informasi, pengertian sistem informasi dan manfatnya pada bidang kepegawaian, definisi data, DFD dan ERD.
BAB III
Metodelogi Penelitian meliputi Lokasi Penelitian, Waktu Penelitian, Metodologi Pengumpulan Data, Alat-alat yang dipakai, Metode Analisa Data, Analisa Sistem dan Perancangan Sistem.
BAB IV
Hasil dan Pembahasan meliputi Diagram Konteks, Flowchart Sistem yang diusulkan, Struktur Program, Rancangan File Database, Sistem informasi kepegawaian pada Badan Pemberdayaan Masyarakat (BPM) Aceh, Desain DFD (Data Flow Diagram), Desain ERD (Entity Relationship Diagram). Perancangan program yang dirancang,
5
Perancangan form login, data pegawai, data jabatan, data pelatihan, data pensiun, Form data laporan pegawai, data jabatan, data pelatihan, dan data pensiun. BAB V
Penutup terdiri dari Kesimpulan dan Saran
6
BAB II TINJAUAN KEPUSTAKAAN 2.1
Gambaran Umum Instansi Badan Pemberdayaan Masyarakat Aceh (BPM) adalah Instansi pemerintah
yang bergerak dalam bidang ekonomi, sosial budaya, politik dan lingkungan hidup. Dalam menyelenggarakan tugas dibidang pemberdayaan masyarakat, (BPM) Aceh mempunyai fungsi dalam urusan ketatausahaan badan, program kerja tahunan, pelayanan umum lintas Kabupaten/Kota dan pembinaan unit pelaksanaan teknis Badan. Selain itu, BPM Aceh mempunyai kewenangan dalam melaksanakan fungsinya,
yakni;
merumuskan
dan
menyiapkan
kebijakan
pelaksanan
kelembagaan mukim dan gampong, dibidang ketahanan masyarakat, program Bantuan Keuangan Peumakmu Gampong (BKPG), tata usaha, kepegawaian dan keuangan. BPM Aceh berkedudukan di bawah dan bertanggung jawab kepada Gubernur Aceh melalui sekretaris daerah. 2.2
Sejarah Singkat Badan Pemberdayaan Masyarakat (BPM) Provinsi Aceh BPM Aceh adalah perangkat daerah sebagai unsur penunjang pemerintah
daerah provinsi di bidang Pemberdayaan Masyarakat yang berada di bawah Gubernur Aceh. BPM Aceh dibentuk berdasarkan Qanun Aceh Nomor 5 Tahun 2007 tentang susunan organisasi dan tata kerja dinas, lembaga teknis daerah dan lembaga daerah provinsi Nanggroe Aceh Darussalam. Pemberdayaan
masyarakat
merupakan
salah
satu
upaya
untuk
mewujudkan kemampuan dan kemandirian masyarakat gampong yang meliputi
7
aspek ekonomi, sosial budaya, dan lingkungan hidup melalui penguatan pemerintahan gampong, lembaga kemasyarakatan dan upaya penguatan kapasitas masyarakat. 2.2.1
Tugas dan Fungsi BPM Aceh mempunyai tugas pokok dalam melaksanakan tugas umum
pemerintahan dan pembangunan dibidang Pemberdayaan Masyarakat. Untuk melaksanakan tugas tersebut diatas sesuai Qanun No 5 Tahun 2007, BPM Aceh mempunyai fungsi : 1. Pelaksanaan urusan ketatausahaan badan 2. Penyusunan progarm kerja tahunan, jangka menengah dan jangka panjang 3. Penyelenggaraan tugas di Bidang Pemberdayaan Masyarakat, termasuk pelayanan umum lintas Kabupaten/Kota 4. Pelaksanaan,
Pembinaan,
Pengawasan
dan
Pengendalian
terhadap
penyelenggaraan dibidang pemberdayaan masyarakat 5. Perumusan kebijakan teknis dalam lingkup pemberdayaan masyarakat 6. Pembinaan unit pelaksanaan teknis Badan 2.2.2
Visi dan Misi Penyusunan visi dan misi pada suatu organisasi, mempunyai peranan yang
sangat penting. Visi maupun misi merupakan cerminan daripada arah dan tujuan suatu organisasi untuk mencapai sasaran. BPM Aceh memiliki visi dan misi sebagai berikut :
8
1. Visi “Terwujudnya kemandirian masyarakat Nanggroe Aceh Darussalam” 2. Misi a. Pemantapan
penyelenggaraan
Pemerintah
Mukim,
Gampong
dan
Kelurahan b. Peningkatan keswadayaan masyarakat c. Pemantapan nilai-nilai sosial budaya masyarakat dan pemberdayaan keluarga d. Pengembangan usaha ekonomi masyarakat e. Pemanfaatan sumber daya alam yang berwawasan lingkungan f. Pendayagunaan teknologi tepat guna sesuai kebutuhan 2.3
Struktur Organisasi Badan Pemberdayaan Masyarakat Aceh Dalam suatu Instansi, baik pemerintah maupun swasta struktur organisasi
sangat diperlukan untuk memperjelas ruang lingkup tugas yang dibebankan kepada seorang pegawai/karyawan. Untuk mencapai tujuan yang diinginkan maka setiap bagian tugas pokok masing-masing yang harus dikerjakan. Struktur organisasi pada Badan Pemberdayaan Masyarakat Aceh pada tahun 2012 (terlampir pada halaman 51). Secara umum struktur organisasi tersebut dapat dijelaskan sebagai berikut : 1. Kepala Badan Pemberdayaan Masyarakat Aceh 2. Sekretaris a. Sub Bagian Umum b. Sub Bagian Kepegawaian dan Tata Laksana
9
c. Sub Bagian Keuangan 3. Kepala Bidang Kelembagaan, Sarana dan Prasarana Pedesaan a. Sub Bidang Pengembangan Sarana dan Prasarana Pedesaan b. Sub Bidang Penguatan Kelembagaan Masyarakat Mukim dan Gampong 4. Kepala Bidang Ketahanan Masyarakat Mukim dan Gampong a. Sub Bidang Motivasi dan Swadaya b. Sub Bidang Pengembangan Sumber Daya, Tradisi dan Masyarakat 5. Kepala Bidang Pemberdayaan Ekonomi Masyarakat a. Sub Bidang Penanggulangan kemiskinan b. Sub Bidang Pengembangan Usaha Ekonomi 6. Kepala Bidang Pengembangan Teknologi Pedesaan a. Sub Bidang teknologi Tepat Guna b. Sub Bidang Pengembangan dan Penyuluhan 2.4
Bahasa Pemrograman Bahasa pemrograman adalah bahasa yang digunakan dengan cara
merancang atau membuat program sesuai dengan struktur dan metode yang dimiliki oleh bahasa program itu sendiri. Komputer mengerjakan transformasi data berdasarkan kumpulan perintah program yang telah dibuat programmer. Kumpulan perintah harus dimengerti oleh komputer, berstruktur tertentu dan bermakna.
10
Menurut tingkatan bahasa pemrograman dibagi atas dua tingkat yaitu : 1.
Bahasa pemrograman tingkat rendah, merupakan bahasa pemograman generasi pertama, bahasa pemrograman jenis ini sangat sulit dimengerti karena instruksinya menggunakan bahasa mesin.
2.
Bahasa pemograman tingkat tinggi, merupakan bahasa yang mempunyai ciri-ciri lebih terstruktur, mudah dimengerti karena menggunakan bahasa yang mudah dipahami, seperti bahasa pemrograman pascal, C++, java, visual basic. (www.ilmushare.com, 13 juli 2012)
2.4.1
Microsoft Visual . Net Visual studio. NET adalah salah satu bentuk integrated development
environment (IDE) terbaru dan tercanggih yang dimiliki oleh Microsoft untuk saat serta bahasa . IDE tersebut mampu mendukung dan menggabungkan banyak tipe bahasa, seperti Visual Basic, NET, C#.NET, J#.NET, C++NET serta bahasa. NET lainnya menjadi satu dalam lingkungan dot net framework. Dot.Net. Framework adalah teknologi inti dari dot net yang menyediakan berbagai library untuk digunakan oleh aplikasi menggunakan bahasa-bahasa pemograman pada Visual Studio.NET. Hasil aplikasi program yang dibangun menggunakan Visual Studio. NET dapat dijalankan pada berbagai platform operating System seperti Linux, Unix, Solaris dan OS (Priyanto, 2009).
11
2.4.2
Crystal Report Crystal report
merupakan perangkat lunak yang dikhususkan untuk
membangun sebuah laporan. Crystal report dapat digunakan dengan bahasa pemrograman berbasis windows seperti Borland Delphi, Visual basic 6.0, Visual Basic .Net, Visual C++, dan Visual Interdev. Beberapa kelebihan dari Crystal Report ini adalah : 1.
Dari segi pembuatan laporan tidak terlalu rumit yang memungkinkan para programmer pemula sekalipun dapat membuat laporan yang sederhana tanpa melibatkan banyak kode program.
2.
Integrasi
dengan
bahasa-bahasa
pemrograman
lain
yang
memungkinkan dapat digunakan oleh banyak programmer dengan masing-masing keahlian. 3.
Fasilitas impor hasil laporan yang mendukung format-format popular seperti Microsoft Word, Excel, Acces, Adobe Acrobat Reader, HTML dan sebagainya.
2.4.3
Microsoft Accces 2007 Kebutuhan terhadap database pada masa sekarang ini tidak lagi menjadi
dominasi mereka yang berlatar belakang komputer. Siapapun dapat membuat dan menggunakan database untuk mendukung kebutuhan masing-masing. Salah satunya dengan menggunakan Microsoft Acces (Kadir, A.2009).
12
Microsoft Acces adalah salah satu aplikasi dari Microsoft Office yang digunakan untuk pengelolaan database. Perangkat lunak ini menyediakan fasilitas yang memudahkan dalam: -
Mengelola database
-
Melakukan query
-
Membuat Form
-
Membuat laporan
-
Dan lain-lain.
2.5.
Simbol - simbol Diagram Flowchart Flowchart merupakan gambaran secara grafik dari langkah-langkah dan
urutan –urutan prosedur dari suatu program. Adapun simbol-simbol dari diagram flowchart adalah sebagai berikut: Tabel 2.1 Tabel simbol diagram flowchart No 1
Simbol
Keterangan Simbol titik terminal yang digunakan untuk awal dan akhir suatu proses
2
Simbol input/output yang digunakan untuk mewakili data input/output
3
Simbol
proses
yang
digunakan
untuk
menunjukkan pengeluaran yang dilakukan oleh komputer 4
Simbol penghubung yang digunakan untuk menunjukkan sambungan dari bagan alir yang terputus dari halaman yang masih sama
13
Offline connect merupakan simbol untuk
5
masukan dan keluaran suatu prosedur pada lembar kertas yang lain 6
Simbol untuk database yang digunakan dalam program
7
Simbol keputusan yang digunakan untuk suatu
penyelesaian
kondisi
di
dalam
program 8
Dokumen merupakan simbol untuk data yang berbentuk kertas maupun informasi
9
Simbol aliran data
2.6
Landasan Teori
2.6.1
Pengertian Sistem Sistem adalah kumpulan elemen, komponen atau subsistem kumpulan
elemen, komponen yang saling berintegrasi dan berinteraksi untuk mencapai tujuan tertentu. Sistem merupakan hubungan satu unit dengan unit-unit lainnya yang saling berhubungan satu sama lain, dan tidak dapat dipisahkan serta menuju suatu kesatuan dalam rangka mencapai tujuan yang telah ditetapkan (Jimmy L.Gaol, 2008). Beberapa ahli mengemukakan pengertian sistem sebagai berikut : 1.
Sistem adalah kumpulan dari komponen apapun baik fisik ataupun non fisik yang saling berhubungan satu sama lain dan bekerjasama secara harmonis untuk mencapai satu tujuan (Sutanto, 2008).
14
2.
Sistem adalah suatu kesatuan usaha yang terdiri dari bagian-bagian yang berkaitan satu sama lain yang berusaha mencapai satu tujuan dalam suatu lingkungan kompleks (Marimin, 2009).
3.
Sistem adalah sekelompok komponen yang saling berhubungan, bekerja bersama untuk mencapai tujuan bersama dengan menerima input serta menghasilkan output dan proses transformasi yang teratur (James, 2010).
4.
Sistem
adalah
suatu
kerangka dari
prosedur-prosedur
yang saling
berhubungan yang disusun sesuai dengan suatu skema yang menyeluruh untuk melaksanakan suatu kegiatan atau fungsi utama dari perusahaan (Zaki Baridwan, 2007). 5.
Sistem adalah sekelompok atau lebih komponen-komponen yang saling berkaitan atau subsistem-subsistem yang bersatu untuk mencapai tujuan yang sama (James A.Hall, 2007). Terdapat dua kelompok pendekatan didalam pendefinisian sistem, yaitu sistem yang menekankan pada prosedurnya dan sistem yang menekankan pada komponen-komponen atau elemen-elemennya. Sistem adalah suatu jaringan kerja dari prosedur-prosedur yang saling berhubungan, berkumpul bersamasama untuk melakukan suatu kegiatan atau menyelesaikan suatu sasaran tertentu. Sistem mempunyai bagian terkecil yang disebut komponen sistem atau sub sistem. Pada umumnya sistem mempunyai input yang dilewatkan kedalam sistem untuk diproses dan akan menghasilkan keluaran atau output. Suatu sistem mempunyai maksud tujuan tertentu. Maksud dari suatu sistem adalah untuk mencapai tujuan dan sasaran. Tujuan biasanya
15
dihubungkan dengan ruang linglup yang lebih luas dan sasaran dalam ruang ruang lingkup yang lebih sempit. Seringkali tujuan dan sasaran digunakan bergantian dan tidak dibedakan (Jagiyanto H.M, 2007). Suatu sistem memiliki berapa syarat yang harus dipenuhi yaitu sebagai berikut : 1. Sistem harus dibentuk untuk menyelesaikan masalah. 2. Elemen sistem harus mempunyai rencana yang ditetapkan. 3. Adanya hubungan diantara elemen sistem. 4. Tujuan organisasi lebih penting dari pada tujuan elemen. Sistem memiliki tiga komponen atau fungsi dasar yang berinteraksi yaitu sebagai berikut : 1.
Input, melibatkan penangkapan dan perakitan sebagai elemen yang memasuki sistem untuk diproses. Contohnya, bahan baku mentah, energi, data, dan usaha manusia harus terjamin dan diatur untuk pemrosesan.
2.
Pemrosesan melibatkan proses transformasi yang mengubah input menjadi output. Contohnya adalah proses manufaktur, proses bernafasnya manusia, atau perhitungan manusia.
3.
Output melibatkan perpindahan elemen yang telah diproduksi oleh proses transformasi ke tujuan akhirnya. Contohnya, barang
jadi, layanan oleh
manusia, dan informasi manajemen harus dipindahkan ke para pemakainya.
16
Dari definisi tersebut di atas dapat disimpulkan bahwa sistem merupakan prosedur-prosedur yang ditata sedemikian rupa sehinga aktivitas-aktivitas atau fungsi utama dari perusahaan dapat terlaksana dengan baik dan efisien. 2.6.2
Definisi Informasi Informasi adalah suatu hal yang sangat dibutuhkan pada sebuah organisasi
demi kelancaran usaha yang dilakukan oleh organisasi guna mencapai target yang ditentukan oleh anggota organisasi. Sumber dari informasi adalah data. Data adalah fakta yang menggambarkan suatu kejadian-kejadian yang mempunyai arti tersendiri. Sistem informasi adalah data yang telah diolah menjadi suatu bentuk yang lebih berarti bagi penerimanya dan bermanfaat dalam pengambilan keputusan saat ini atau mendatang (Hanif, A., 2007). Informasi merupakan hasil dari pengelolaan data dalam suatu bentuk yang lebih berguna dan lebih berarti bagi penerimaan yang juga menggambarkan suatu kejadian-kejadian (even) nyata (fact) yang digunakan untuk pengambilan keputusan(Jogiyanto, H.M., 1950). Informasi dikatakan berkualitas jika data tersebut bersifat relevan, akurat, tepat pada waktunya dan lengkap (Leod, Mc., 2001). 1. Relevan artinya informasi yang diberikan harus sesuai dengan yang dibutuhkan. Apabila kebutuhan informasi ini untuk suatu organisasi, maka informasi tersebut harus sesuai dengan kebutuhan informasi di berbagai tingkatan dan bagian yang ada dalam organisasi tersebut. 2. Akurat artinya informasi harus mencerminkan keadaan yang sebenarnya. Pengujian terhadap hal ini biasanya dilakukan melalui pengujian yang
17
dilakukan oleh dua orang atau lebih yang berbeda dan apabila hasil pengujian tersebut menghasilkan hasil yang sama data tersebut dianggap akurat. 3. Tepat waktu artinya informasi harus tersedia pada saat yang dibutuhkan untuk memecahkan masalah sebelum situasi krisis menjadi tidak terkendali atau kesempatan menghilang. Informasi yang datang pada penerima tidak boleh terlambat karena informasi yang sudah usang tidak mempunyai nilai lagi. 4. Lengkap artinya bahwa informasi yang diperoleh menyajikan gambaran lengkap dari suatu permasalahan atau penyelesaian. Ciri-ciri
informasi
yang lebih
detail
yaitu
efektivitas,
efisiensi,
confidensial, integritas, ketersediaan, kepatuhan dan kebenaran. Nilai dari informasi ditentukan oleh dua hal, yaitu manfaat dan biaya mendapatkannya. Suatu informasi dikatakan bernilai bila manfaatnya lebih efektif dibandingkan mendapatkannya(Susanto, A., 2004). 2.6.3
Pengertian sistem informasi Sistem informasi adalah merupakan kombinasi teratur apapun dari orang-
orang, hardware, software, jaringan komunikasi dan sumber daya data yang mengumpulkan, mengubah dan menyebarkan informasi dalam suatu organisasi. Dengan kata lain sistem informasi dapat dipahami sebagai suatu sistem didalam organisasi yang mempertemukan kebutuhan pengolahan transaksi harian, mendukung operasi, bersifat manajerial dan kegiatan strategi dari suatu organisasi dan menyediakan pihak dari luar tertentu dengan laporan-laporan yang diperlukan (Sutari, T., 2004). Komputer sebagai alat bantu pengolahan data dalam penyediaan sistem informasi. Sistem informasi terdiri dari dua kata yaitu sistem dan informasi.
18
Sesungguhnya yang dimaksud dengan sistem informasi tidak harus berhubungan dengan komputer. Sistem informasi pada umumnya dikenal sebagai suatu sistem dalam organisasi yang mendukung penyediaan informasi pada pengambilan keputusan. Pengertian Sistem Informasi adalah informasi yang diorganisasikan untuk mencapai tujuan dalam sebuah organisasi(Jogiyanto,H.M., 2000). Sistem informasi adalah kegiatan dari suatu prosedur-prosedur yang diorganisasikan bilamana dieksekusi akan menyediakan informasi untuk mendukukung
pengambilan
keputusan
dan
pengendalian
di
dalam
organisasi(Lucas, H.C., 2001). Sistem informasi adalah suatu kombinasi dari orang-orang, fasilitas teknologi, media, prosedur-prosedur dan pengendalian ditujukan untuk mendapatkan jalur komunikasi penting, memproses tipe transaksi rutin tertentu, memberi sinyal kepada manajemen dan yang lainnya terhadap kejadian-kejadian internal dan eksternal yang penting dan menyediakan suatu dasar untuk peng ambilan keputusannya yang cerdik(Nash, J.F., 2003 dan Robert, M.B.,2000). Sistem informasi merupakan kombinasi antara prosedur kerja, informasi, orang, dan teknologi informasi yang diorganisasikan untuk mencapai tujuan dalam sebuah organisasi (Gerald, J.F ., 2005). Sistem informasi adalah kumpulan perangkat keras dan perangkat lunak yang dirancang untuk mentransformasikan data ke dalam bentuk informasi yang berguna( Bornar dan Hopwood., 1993). Sistem informasi adalah suatu sistem buatan manusia yang secara umum terdiri atas sekumpulan komponen berbasis komputer dan manual yang dibuat untuk menghimpun, menyimpan, dan mengelola data serta menyediakan informasi keluaran kepada para pemakai. (Gelinas, dkk., 1990). Menurut Hall (2001) sistem
19
informasi adalah sebuah rangkaian prosedur formal dimana data dikelompokkan, diproses menjadi informasi, dan didistribusikan kepada pemakai. Secara umum kita dapat mendefenisikan sistem informasi sebagai seperangkat komponen yang berupa prosedur-prosedur dalam mengelola data menjadi informasi yang berguna untuk mendukung fungsi operasi manajemen dalam pengambilan keputusan. Kegiatan sistem informasi : a. Input Menggambarkan suatu kegiatan untuk menyediakan data yang diproses. b. Proses Menggambarkan bagaimana suatu data diproses untuk menghasilkan suatu informasi yang bernilai tambah. c. Output Suatu kegiatan untuk menghasilkan laporan dari proses diatas tersebut. d. Penyimpanan Suatu kegiatan untuk memelihara dan menyimpan. 2.6.4 Manfaat sistem informasi Untuk bisa menanggulangi hambatan seperti keterlambatan dalam pengolahan data dan penyajian informasi, maka diperlukan sebuah sistem yang baik agar dapat diakses sehingga menghasilkan informasi yang benar dan
20
mempercepat dalam penyajian informasi. Manfaat sistem informasi pada bagian kepegawaian yakni untuk mengolah data dan informasi tentang kepegawaian, termasuk meng-up date data jumlah pegawai, data kenaikan pangkat pegawai, data pensiun, data perpindahan pegawai dan lain-lain (Sutabri, T.,2003). Sistem informasi kepegawaian digunakan dalam proses pengumpulan data yang berhubungan dengan kepegawaian yang mencakup proses perekaman data kepegawaian yang meliputi antara lain biodata pegawai, riwayat kepangkatan, jabatan, pendidikan formal, pendidikan penjenjangan, keahlian, pelatihan yang pernah diikuti, daftar keluarga, hasil medikal kesehatan, hukuman dan penghargaan. Evaluasi kinerja pegawai berkaitan dengan perencanaan kerja pegawai beserta beban penilaian atas hasil pekerjaan sehingga dapat diperoleh suatu sistem evaluasi yang lebih obyektif yang merujuk berbagai fakta yang telah ditentukan sebelumnya (Irwansyah, P., 2007). Pendidikan dan pelatihan mencakup perencanaan kebutuhan pendidikan yang akan diikuti oleh pegawai yang berkaitan dengan tugas dan tanggungjawab serta realisasi pendidikan yang berupa pencatatan data pendidikan yang pernah diikuti. Pensiun berkaitan dengan berakhirnya masa kerja pegawai baik secara normal atau karena hal lainnya. Untuk itu dilakukan penyimpanan data pegawai yang pernah bekerja pada suatu organisasi (Sigit, I., 1999) Dengan aplikasi SIMPEG dapat meningkatkan efisiensi dan mempermudah pengolahan, pencarian dan pelaporan data pegawai di instansi pemerintah sebagai bahan pertimbangan pimpinan berkaitan dengan pengembangan karir dan kinerja pegawainya. Kebijakan sistem e-government mencakup pengembangan sistem
21
informasi manajemen di bidang kepegawaian dapat berlangsung lebih optimal, efisien dan efektif (Sutabri, T., 2004). 2.7
Definisi data Data adalah kenyataan yang menggambarkan suatu kejadian-kejadian dan
kesatuan yang nyata. Kesatuan nyata (fact and entity) adalah berupa obyek nyata berupa tempat, benda dan orang-orang yang betul-betul ada dan terjadi (Sutanto, 2004). Data adalah representasi fakta yang mewakili suatu objek seperti manusia, pegawai, siswa, pembeli, pelanggan, barang, peristiwa, konsep, keadaan, dan sebagainya yang direkam dalam bentuk angka, huruf, teks, gambar, bunyi, atau kombinasinya (Harianto, K., 2001). Data dapat berupa nilai yang terformat, teks, citra, audio, dan video. Data yang terformat adalah bagian dari informasi yang biasa terdiri atas fakta, atau bagian dari fakta yang mengandung arti. Fungsi data adalah sebagai bahan dasar yang obyektif (relatif) dalam proses penyusunan kebijaksanaan dan keputusan oleh pemimpin suatu organisasi. Misalnya data yang menyatakan tanggal atau jam dan menyatakan nilai mata uang (Kadir, A., 2003). 2.7.1 Data Flow Diagram (DFD) Data Flow Diagram (DFD) adalah suatu gambar dari sistem yang menggunakan sejumlah bentuk-bentuk simbol untuk menggambarkan bagaimana data mengalir melalui suatu proses yang saling berkaitan. Simbol-simbol yang dapat pada diagram arus data ini yaitu meliputi elemen-elemen yang berhubungan dengan sistem (entitas), proses, arus data dan penyimpanan (table/file) (Amsyah., 2005).
22
Data flow diagram (DFD) digunakan untuk menggambarkan suatu sistem yang telah ada atau sistem baru yang akan dikembangkan secara logika tanpa mempertimbangkan lingkungan fisik dimana data tersebut mengalir, bagaimana data ini diproses dan kemana data itu akan diberikan serta dimana data tersebut akan disimpan (Amsyah., 2005). Tabel 2.2 Simbol Data Flow Diagram (DFD)
Simbol dan Nama Simbol
Entitas Eksternal
Proses
Media penyimpanan Data
Keterangan
Menujukkan entitas luar sistem yang menghubungkan data dengan sistem
Menunjukkan
kegiatan
proses
dari
operasi pada sistem
Menunjukkan media penyimpanan data biasanya tabel-tabel yang ada pada database Simbol yang menyalurkan alur data input/output dari suatu proses keproses lain
Aliran Data
23
2.7.2
Entitas Relationship Diagram (ERD) Entitas
Relationship
Diagram
(ERD)
merupakan
diagram
yang
menggambarkan hubungan tabel berdasarkan entitas-entitas yang ada dan akan saling berhubungan satu dengan yang lain menggunakan field penghubung. Entitas adalah objek yang dapat dicatat dan direkam atau segala sesuatu yang ada dan dapat dibedakan. Entitas dapat berupa orang, tempat, benda, peristiwa atau konsep yang diolah untk menghasilkan informasi. Begitu juga dengan perancangan diagram relasi entitas yang dibuat agar menghasilkan suatu informasi mengenai alir data dari sistem yang dibangun (Agus,P.K., 1998). Tabel 2.3 Simbol Diagram Hubungan Entitas Simbol dan Nama Simbol
Entitas
Garis Relasi
Keterangan Jenis entitas dapat berupa elemen lingkungan, sumber daya atau transaksi yang field-fieldnya dipergunakan dalam aplikasi program.
Menunjukkan hubungan (keterkaitan) antar entitas
Menunjukkan nama relasi antar satu entitas dengan entitas lainnya. Hubungan Relasi
24
BAB III METODELOGI PENELITIAN
3.1
Lokasi Penelitian Penulis melakukan penelitian pada bagian kepegawaian pada Badan
Pemberdayaan Masyarakat (BPM) Aceh yang beralamat di Jln.Tgk. Syech Muda Wali No . E-19 Banda Aceh. 3.2
Waktu Penelitian Lama waktu penelitian dilakukan sejak tanggal 15 Maret s/d 13 Agustus
2012. Adapun jadwal pelaksanaan penelitian dapat dilihat pada tabel di bawah ini: Tabel 3.1 Tabel Waktu Penelitian NO
Jenis Kegiatan
Maret III
1
Pengambilan Data
2
Analisis Data
3
Pengumpulan Data
4
Perancangan Sistem
5
Desain Sistem
6
Uji Sistem
7
Final
IV
April I
II
III
Mei IV
I
II
III
Juni IV
I
II
III
Juli IV
I
II
III
Agustus IV
I
II
25
3.3
Metodelogi pengumpulan data Metode pengumpulan data adalah merupakan suatu rangkaian proses
pengadaan pengumpulan data untuk keperluan penelitian. Hal ini sangat dibutuhkan di dalam sebuah penelitian, sebab dengan banyaknya informasi kita dapat atau yang kita miliki maka akan semakin mudah dalam membuat ataupun menyelesaikan proses penelitian. Pengumpulan data dikelompokkan menjadi yaitu: 1. Data primer yaitu data yang dikumpulkan penelitian secara langsung melalui obyek penelitian 2. Data sekunder yaitu data yang sudah dikumpulkan pihak lain Di dalam penyusunan penulisan ini penulis menggunakan 2 (dua) cara pada umumnya sering digunakan dalam teknik pengumpulan data seperti: 1. Penelitian Lapangan Adalah penelitian ini dilakukan dengan secara langsung melihat kelapangan atau perusahaan yang menjadi objek tempat penelitian pada Badan Pemberdayaan Masyarakat (BPM) Aceh. Penelitian lapangan dapat dilakukan dengan 2 cara yaitu : a. Wawancara Penulis melakukan tanya jawab secara langsung kepada pegawai bagian kepegawaian atau berkaitan langsung dengan sistem yang diteliti, menanyakan masalah yang sering terjadi sehingga penulis mendapatkan informasi data yang tepat dan akurat yang sesuai dengan apa yang dibutuhkan.
26
a. Observasi Observasi adalah teknik pengumpulan data dengan ciri yang spesifik bila dibandingkan dengan teknik lain. Data tidak hanya dikumpulkan dari orang, namun didapat dari pengamatan terhadap benda dan hal-hal lainnya, seperti pengamatan tentang dokumen-dokumen. Dalam hal ini penulis melakukan peninjauan secara langsung terhadap sistem yang sedang berjalan atau sistem yang digunakan pada kantor tersebut. 2. Penelitian Pustaka (Library Research) Adalah penelitian yang dilakukan dengan menjadikan perpustakaan sebagai tempat penyelidikan secara teoritis yang diperoleh dari bahan-bahan bacaan, bahan-bahan kuliah dan tulisan-tulisan ilmiah lain yang erat kaitannya dengan permasalahan yang sedang diteliti di dalam penyusunan laporan ini. Hal ini didahului dengan pemilihan judul yang akan dibahas dan dijabarkan, setelah penetapan judul, kemudian mencari informasi tambahan dengan cara mengumpulkan dan mempelajari teori-teori serta bahan pendukung yang berkaitan dengan masalah yang diteliti melalui studi pustaka. 3.4
Alat-alat yang dipakai Untuk menjalankan sistem, perlu kita ketahui perangkat apasaja yang akan mendukung dalam proses program dan data. Perangkat komputer yang dibutuhkan, yaitu:
27
A.
Perangkat Keras (Hardware) Penggunaan perangkat keras yang baik akan mempengaruhi cepat
lambatnya proses program ynag dijalankan dan dihasilkan. Dalam hal ini penulis merinci spesifikasi komponen hardware yang digunakan penulis : 1.
CPU Core duo 2.00 Ghz
2.
Memori 1 GB
3.
Laptop 14 inci
4.
Kapasitas Hardisk 160 GB
5.
Printer yang digunakan Canon Pixma 2770
6.
Mouse
B.
Perangkat Lunak (Software) Adapun software yang digunakan untuk pembuatan program ini adalah
sebagai berikut : 1.
Sistem operasi yang digunakan adalah Windows XP
2.
Aplikasi Microsoft Word 2007 media pengolahan data yang dipakai untuk pengetikan karya tulis ilmiah ini.
3.
Microsoft Visual Basic. Net yang digunakan penulis sebagai sarana pembuatan program.
4. C.
Microsoft Acces 2007 sebagai sarana database yang digunakan. Perangkat Operator (Brainware) Sistem komputerisasi yang berfungsi sebagai alat bantu manusia dibidang
pengolahan data membutuhkan manusia sebagai aspek yang menangani proyek
28
pada komputer. Inilah yang disebut dengan aspek brainware. Brainware terdiri atas: 1. Sistem analis, yaitu orang yang membentuk dan membangun
fasilitas
rancangan sistem. 2. Programmer yang bertugas untuk membuat dan membangun program dengan menggunakan salah satu fasilitas software yang telah ditentukan. 3. Operator, yaitu orang yang menangani langsung dalam pengolahan data, mulai dari mempersiapkan data sampai dalam pengentrian/pemasukan data dalam komputer. 3.5
Metode Analisa Data Analisa data dengan metode deskriptif yaitu metode penganalisaan data
dimana data ditempatkan, disusun, diinterprestasikan, dianalisa sehingga memberikan keterangan untuk menghasilkan informasi yang lengkap guna pemecahan masalah yang dihadapi. 3.6
Analisa Sistem Untuk memulai membangun suatu program yang berupa aplikasi
mengenai pegawai pada kantor Badan Pemberdayaan Masyarakat (BPM) Aceh, penulis terlebih dahulu merencanakan alur kerja berdasarkan kebutuhan dari user yang akan menggunakan aplikasi yang akan dibuat. Berdasarkan pengamatan penulis, sistem yang sedang berjalan untuk pengelolaan data kepegawaian pada BPM saat ini masih secara manual yakni dengan menggunakan Microsoft Word dan Microsoft Excel. Maka penulis
29
mencoba merancang sebuah sistem informasi yang terkomputerisasi dan dapat mempercepat pekerjaan dalam pencariannya. 3.7
Perancangan Sistem Perancangan sistem merupakan upaya perusahaan untuk memulai sistem,
baik sistem yang lama maupun untuk memiliki sistem yang baru. Perancangan sistem dilakukan setelah mendapat gambaran dengan jelas apa yang harus dikerjakan. Dengan adanya aplikasi data pegawai ini tidak lagi direpotkan dengan semua yang berhubungan dengan masalah data pegawai BPM Aceh. Sistem pengolahan data yang dirancang : 1. Data Pegawai 2. Data Jabatan 3. Data Pelatihan 4. Data Pensiun
30
BAB IV HASIL DAN PEMBAHASAN
4.1
Diagram Konteks Diagram konteks adalah diagram tingkat tinggi dari data flow diagram
yang merupakan gambaran global dari sistem informasi yang menggambarkan aliran-aliran data ke dalam dan keluar sistem dan merupakan alat yang digunakan untuk melihat batasan antara sistem dengan eksternal entity. Diagram
konteks
sistem
informasi
data
pegawai
pada
Badan
Pemberdayaan Masyarakat (BPM) Aceh dapat dilihat pada gambar di bawah ini.
Pegawai
Data Kepegawaian
Data Pegawai
-
Sistem informasi kepegawaian BPM Aceh -
Admin Data Jabatan Data Pelatihan Data Pensiun
Laporan Data pegawai Laporan Data Jabatan Laporan Data Pelatihan Laporan Data Pensiun
Kepala Dinas
Gambar 4.1 Diagram Konteks
31
4.2
Flowchart Sistem yang diusulkan Start
Login
Salah
Cek Password
Benar Menu Utama
Akses menu data pegawai
Ya
Simpan
Database sistem
Tidak Akses menu data jabatan
Ya
Simpan
Database sistem
Tidak Akses menu data pelatihan
Ya
Simpan
Database sistem
Tidak Ya
Akses menu data pensiun
Simpan
Tidak Ya
Cetak laporan data pegawai
Laporan data pegawai
Tidak Ya
Cetak laporan data jabatan
Laporan data jabatan
Tidak
Cetak laporan data pelatihan
Ya Tidak Ya
Cetak laporan data pensiun
TtT
Stop
Laporan data pelatihan
Laporan data pensiun
Tidak
Gambar 4.2 Flowchart Kerja Sistem
Database sistem
32
Untuk memulai program yaitu harus memasukkan id user ke dalam form user yang sudah dibuat oleh Admin supaya memperoleh izin untuk akses sesuai dengan tugasnya, disaat password diinput jika tidak sesuai maka akan muncul sebuah pesan bahwa password yang anda masukkan tidak benar, kemudian user harus mencoba lagi dengan menginput password kembali sampai password yang diinput benar-benar sesuai. Jika password yang diinput sudah sesuai, maka akan muncul sebuah pesan selamat datang diaplikasi ini, setelah ini tampil sebuah form menu yang didalam form tersebut terdapat 2 (dua) pembagian, input data dan laporan. Data yang diinput akan disimpan kedalam database, data yang sudah disimpan juga dapat diedit dan di hapus kembali sesuai dengan keperluan masing-masing. Hasil dari semua pendataan yang sudah membentuk laporan dapat langsung dicetak, dengan cara masuk ke dalam form laporan data untuk memilih data yang akan dicetak sesuai kebutuhan masing-masing kemudian tekan tombol cetak. Setelah melakukan pencetakan laporan tersebut user akan langsung keluar dari aplikasi tersebut, laporan yang sudah dicetak kemudian diberikan kepada pimpinan. 4.3
Stuktur Program Setiap sistem informasi tentunya memliki struktur hirarki sistemnya
masing-masing. Proses input yaitu berupa proses pemasukan data sampai output yang pada intinya adalah mengolah data yang tidak berarti sehingga menjadi
33
informasi yang berguna bagi para pemakai informasi bagi pihak internal ataupun eksternal organisasi. Sistem informasi yang terstruktur dengan baik dapat menjadi suatu sistem yang dapat berjalan secara efektif untuk menghindari kesalahan-kesalahan yang tidak diinginkan. Suatu program dikatakan efektif apabila dapat digunakan secara mudah dan memenuhi segala kebutuhan yang dibutuhkan oleh sistem. Selain itu, penyimpanan data akan lebih efisien. Berikutnya dapat dilihat pada gambar struktur program dari sistem informasi kepegawaian pada BPM Aceh
STRUKTUR PROGRAM
INPUT
PROSES
OUTPUT
Data Pegawai
Up date data pegawai
SK Pegawai
Data
Up date data pegawai
SK jabatan
jabatan
Data Pelatihan
Data Pensiun
Up date data pegawai
Up date data pegawai
Gambar 4.3 Struktur Program
SK Pelatihan
SK Pensiun
34
4.4
Rancangan File Database Struktur file merupakan gambaran tentang file-file yang digunakan dalam
pengolahan data pegawai. Struktur file ini memproses data dari dokumen yang berbentuk kertas diubah menjadi susunan basis data, yang dimaksudkan untuk mendefinisikan dari tiap-tiap file selanjutnya didokumentasikan dalam kamus data yang sangat diperlukan untuk membuat file secara fisik dari rancangan struktur basis data. Tabel 4.1 User Nama Field Id Password
Tipe Varchar Varchar
Ukuran 20 20
Key *
Keterangan Id User Password
Tabel 4.2 Pegawai No 1 2 3 4 5 6 7
Nama Field NIP Nama Alamat Telepon/HP JK Tempat, Tgl_lahir Kode Jabatan
Tipe Int Varchar Varchar Int Varchar Varchar
Ukuran 18 20 20 18 10 20
Varchar
15
Key Keterangan *(PK) Nomor Induk Pegawai Nama Pegawai Alamat Telepon Jenis kelamin Tempat dan tanggal lahir pegawai Kode Jabatan
Tabel 4.3 Jabatan No Nama Field 1 Id_Jabatan 2 Nama Jabatan
Tipe Ukuran Varchar 15 Varchar 15
Key *
Keterangan Jabatan Pegawai Nama Jabatan
35
Tabel 4.4 Pelatihan No 1 2 3 4
Nama Field No SK Pelatihan NIP Nama NamaPelatihan
Tipe Int Int Varchar Varchar
Ukuran 17 23 22 18
Key *
Keterangan No SK Pelatihan Nomor Induk Pegawai Nama Pegawai NamaPelatihan
Tabel 4.5 Pensiun No Nama Field 1 No SK Pensiun 2 NIP 3 Nama 4.5
Tipe Int Int Varchar
Ukuran 15 20 18
Sistem Informasi Kepegawaian Masyarakat (BPM) Aceh
Key *
Keterangan Nomor SK Pensiun Nomor Induk Pegawai Nama Pegawai
pada
Badan
Pemberdayaan
Sistem yang sedang berjalan untuk pengelolaan data kepegawaian pada BPM Aceh saat ini masih secara manual dengan menggunakan Microsoft Word dan Microsoft Excel. Data kepegawaian merupakan data yang dinamis dan harus sering di up-date, namun karena minimnya peralatan teknologi dan sumber daya manusia di bidang komputer, maka pengolahan data hanya dilakukan seadanya saja tanpa ada database kepegawaian. Oleh sebab itu, penulis ingin merancang sebuah aplikasi Visual Basic .Net pada BPM Aceh. 4.6
Desain DFD (Data Flow Diagram) Pada gambar DFD di bawah ini pegawai memasukkan data pegawai, untuk
diproses kemudian disimpan ke dalam data pegawai. Badan Administrasi Keuangan
memasukkan data jabatan, data pensiun untuk diproses kemudian
disimpan dalam SK jabatan. Setelah diproses dan disimpan dalam masing-masing file semua data dicetak kemudian diserahkan kepada kepala dinas.
36
Pegawai
Isi form data pegawai
SK jabatan, SK pensiun
SK Pensiun SK Pegawai, SK Jabatan,
SK Jabatan,
SK Pelatihan, SK Pensiun
1
2
Pengolahan data pegawai
Pengolahan data jabatan
Data Pegawai Data Pegawai
Kepala seksi
Surat perintah
SK jabatan
Pelatihan
Data Pegawai
Data pegawai Data Pegawai
3
4
Pegolahan data Pelatihan
Pengolahan data pensiun
Data Pensiun SK Pelatihan
Pensiun
5 Data Pelatihan SK Pelatihan
SK Pegawai Kepal a Dinas
Cetak data
Data Pensiun Data Jabatan
Gambar 4.4 Data Flow Diagram Level 1
Bagian Administrasi keuangan
37
DFD di bawah menjelaskan bahwa setiap pegawai dapat menginput data pegawai dan mengedit data pegawai kemudian disimpan oleh pegawai yang bersangkutan.
Pegawai
Isi form data pegawai
Isi form data pegawai
1.2
1.1 Input data pegawai
Data pegawai
Edit data pegawai
Data pegawai
Pegawai Data pegawai
Gambar 4.5 Data Flow Diagram level 1 proses 1 DFD di bawah menjelaskan bahwa setiap pegawai dapat menginput data jabatan dan mengedit data jabatan serta menghapus data jabatan yang akan disimpan dalam file data jabatan.
Pegawai
Isi form data pegawai
Isi form data pegawai
2.1 Input data jabatan
2.2 Data Jabatan
Edit data jabatan
Data Jabatan
Jabatan Data Jabatan
Gambar 4.6 Data Flow Diagram level 1 proses 2
38
DFD di bawah ini menjelaskan bahwa setiap pegawai dapat menginput data pelatihan dan mengedit data pelatihan, Setelah diproses data pelatihan akan disimpan dalam file data pelatihan.
Pegawai
Isi form data pegawai
Isi form data pegawai
3.2
3.1 Input data pelatihan
Data pelatihan
Edit data pelatihan
Data pelatihan
Pelatihan Data pelatihan
Gambar 4.7 Data Flow Diagram level 1 proses 3
DFD di bawah ini menjelaskan bahwa setiap pegawai dapat menginput data pensiun dan mengedit data pensiun setelah diproses data pensiun akan disimpan dalam sebuah file data pensiun.
Pegawai
Isi form data pegawai
Isi form data pegawai 4.2 Edit data pensiun
4.1 Input data pensiun
Data pensiun
Pensiun
Data pensiun
Data pensiun
Gambar 4.8 Data Flow Diagram level 1 proses 4
39
DFD di bawah ini menjelaskan bahwa setiap data yang disimpan pegawai dapat
memproses SK pegawai kemudian diserahkan kepada pegawai yang
bersangkutan. SK pelatihan yang disimpan pada data jabatan kemudian dicetak dan diproses. Setelah diproses data diserahkan kepada badan administrasi keuangan. Data pensiun kemudian diproses kemudian diserahkan kepada badan administrasi keuangan. Pegawai
Jabatan
Data pegawai
Data Jabatan
5.1
5.2
Cetak SK Pegawai
Cetak SK Jabatan
SK Pegawai
SK Jabatan
Pegawai
Badan Administrasi Keuangan SK Pelatihan
SK Pensiun
5.3
5.4
Cetak SK Pelatihan
Cetak SK Pensiun
Data Pelatihan
Data Pensiun
Pelatihan
Gambar 4.9 Data Flow Diagram Proses 1 Level 5
40
4.7
Desain ERD (Entity Relationship Diagram) Pada desain ERD di bawah ini setiap pegawai mempunyai banyak jenjang
pendidikan yang terdiri dari Id_Pendidikan dan Pendidikan. Pegawai juga mempunyai jabatan yang terdiri dari Id_Jabatan dan Jabatan pada sebuah kantor ataupun perusahaan.
Id_Pendidikan * Nama NIP*
Kompetensi
NIP *
keahlian
Tempat, tgl_Lahir
PEGAWAI
Alamat
JENJANG
M Id_pendidikan** (FK)
Teleponen /HP Jenis_Kelamin
M
Punya
M PENDIDIKAN
Bidang_ Studi
Id_Pendidikan *
Fakultas
Id_jabatan (FK) **
I Jurusan
Punya
I Nama _Jabatan
Id_Jabatan
JABATAN
Nama_Ata san
Jabatan_Atasan
Gambar 4.10 Desain Entity Relationship Diagram
41
4.8
Perancangan Program yang Dirancang
4.8.1
Perancangan Form Login
Gambar 4.11 Form Login Form ini terdiri dari user name dan password yang digunakan untuk melakukan login agar dapat masuk ke dalam menu utama program, bila terjadi kesalahan pada password maka akan ditampilkan suatu pesan kesalahan, dan jika data yang dimasukkan benar maka akan masuk kedalam menu utama. Pada form password ini data yang akan dimasukkan harus benar dengan data yang tersimpan dalam database yaitu username dan password. Bila yang diinput username saja maka aplikasi tidak bisa dijalankan, begitu juga sebaliknya. 4.8.2 Form Data Pegawai Form dibawah ini merupakan form data pegawai dimana semua data pegawai/ karyawan pada Badan Pemberdayaan Masyarakat (BPM) Aceh akan disimpan kedalam sistem. Form ini berfungsi sebagai form untuk penginputan data pegawai yang tersedia pada sistem. Dan juga dapat melakukan berbagai proses yaitu proses penambahan (add), pengeditan (edit), penghapusan (delete)
42
data pegawai, dan pencarian (search). Pada form data pegawai terdapat beberapa text yang berfungsi untuk menampilkan keterangan dari biodata yang dipilih yaitu pada combo box kode jabatan. Di bawah tabel juga terdapat tombol text yang berfungsi untuk menampilkan jumlah pegawai yang telah diinput kedalam sistem, lihat gambar 4.12.
Gambar 4.12 Data Pegawai 4.8.3
Form Data Jabatan Form data jabatan digunakan untuk mengakses semua jabatan yang ada
pada Badan Pemberdayaan Masyarakat (BPM) Aceh. Dalam form ini kita bisa menambahkan nama jabatan baru atau menghapus nama jabatan yang sudah ada. Pada form jabatan ini juga dapat melakukan pencarian data sesuai dengan kebutuhan user. Jika kita menambahkan jabatan secara otomatis data yang kita simpan akan masuk kedalam database dan langsung terhubung dengan data pegawai, lihat pada gambar 4.13.
43
Gambar 4.13 Data Jabatan 4.8.4 Form Data Pelatihan Form data pelatihan digunakan untuk mengakses semua data pegawai berdasarkan SK Pelatihan yang ada pada Badan Pemberdayaan masyarakat (BPM) Aceh. Dalam form ini kita bisa menambahkan nomor SK Pelatihan, nama pelatihan, NIP, Nama Pegawai. Pada form ini juga dapat dilakukan berbagai proses seperti : edit data, hapus data dan juga dapat melakukan pencarian data sesuai dengan kebutuhan user, lihat gambar 4.14.
Gambar 4.14 Gambar Data Pelatihan
44
4.8.5
Form Data Pensiun Form data pensiun digunakan untuk mengakses semua data pegawai
berdasarkan SK pensiun yang ada pada Badan Pemberdayaan Masyarakat (BPM) Aceh. Dalam form ini kita bisa menambahkan No.SK Pensiun, TMT Pensiun, NIP, Nama Pensiun, pada form data pensiun ini dapat dilakukan berbagai proses seperti: edit data, hapus data dan juga dapat melakukan pencarian data sesuai dengan kebutuhan user, lihat pada gambar 4.15.
Gambar 4.15 Gambar Data Pensiun 4.8.6 Form Laporan Data Pegawai 1. Form Cetak Data Pegawai Form data laporan pegawai digunakan untuk mencetak data pegawai yang telah dimasukkan kedalam daftar report, semua data pegawai yang telah ditentukan akan tercetak apabila kita melakukan/menekan tombol cetak (print) maka akan muncul laporan yang telah kita pilih, dan jika kita menekan tombol kembali (cancel) maka tampilan laporan data pegawai akan kembali ke menu utama sistem. Di bawah dapat kita lihat tampilan form data pegawai;
45
Gambar 4.16 Cetak Laporan Data Pegawai
4.8.7 Form Laporan Data Jabatan 1. Form Cetak Berdasarkan Data Jabatan Form laporan data jabatan digunakan untuk mencetak data berdasrakan kode jabatan yang akan dipilih yang telah tersimpan kedalam database. Kode bagian yang telah dipilih akan terlihat dalam kotak text sehingga memudahkan user untuk mengetahui bahwa kode yang dipilih sesuai dengan nama yang telah muncul, sehingga kita dapat menekan tombol print untuk mencetak laporan data jabatan.
46
Gambar 4.17. Cetak Berdasarkan Jabatan 4.8.9 Form Laporan Data Pelatihan 1. Form Cetak Berdasarkan Pelatihan Form laporan data pelatihan digunakan untuk mencetak data berdasarkan SK Pelatihan yang akan dipilih yang telah tersimpan kedalam database. Kode bagian yang telah dipilih akan terlihat dalam kotak text sehingga memudahkan user untuk mengetahui bahwa kode yang dipilih sesuai dengan nama yang telah muncul, sehingga kita dapat menekan tombol print untuk mencetak laporan data pelatihan, lihat pada gambar di bawah ini;
Gambar 4.18 Cetak Data Pelatihan
47
4.8.10 Form Laporan Data Pensiun 1. Form Cetak Berdasarkan Pensiun Form laporan data pensiun digunakan untuk mencetak data berdasarkan SK Pensiun yang akan dipilih yang telah tersimpan kedalam database. Kode bagian yang telah dipilih akan terlihat dalam kotak text sehingga memudahkan user untuk mengetahui bahwa kode yang dipilih sesuai dengan nama yang telah muncul, sehingga kita dapat menekan tombol print untuk mencetak laporan data pensiun, lihat pada gambar di bawah ini;
Gambar 4.19 Cetak Data Pensiun
48
BAB V PENUTUP 5.1
Kesimpulan Dari hasil penelitian yang dilakukan pada Badan Pemberdayaan
Masyarakat (BPM) Aceh, dapat disimpulkan: 1. Dalam sistem informasi kepegawaian masih memerlukan suatu sistem yang dapat meningkatkan kinerja pegawai khusunya dalam pengolahan data pegawai yang selama ini masih secara manual. 2. Laporan tepat waktu 3. Kemungkinan tak terjadi kesalahan 4. Mudah digunakan oleh Admin 5. Penambahan dan pengkoreksian data lebih mudah 6. Data- data terorganisir secara baik dan tersimpan di hard disk 7. Dapat menambah kemajuan bagi instansi tersebut.
49
5.2
Saran Dalam upaya untuk membuat sistem informasi kepegawaian ini masih
terdapat kekurangan yang perlu diperbaiki baik dalam perancangan maupun dalam pembuatan program. Untuk mendapatkan hasil yang optimal dan informasi yang akurat, pemrosesan data kepegawaian yang valid, maka penulis memberikan saran sebagai berikut : 1. Walaupun dalam pengolahan datanya telah menggunakan media komputer tetap masih ada sistem yang perlu diperbaiki atau dikembangkan, sehingga setiap informasi yang dihasilkan menjadi efektif dan efisien. 2. Perlunya diadakan pelatihan terhadap operator dan pegawai yang akan menggunakan program aplikasi sistem informasi kepegawaian. 3. Penyediaan perangkat komputer yang memiliki kapasitas yang cukup untuk menjalankan SIMPEG yang sudah dibuat. 4. SIMPEG ini dibangun hanya sebatas data user, data pegawai, data jabatan, data pelatihan dan data pensiun. SIMPEG ini akan menjadi sempurna bila ditambahkan fitur yang lain seperti data golongan, absensi harian dan daftar gaji.
SISTEM INFORMASI KEPEGAWAIAN DENGAN MENGGUNAKAN MICROSOFT VISUAL BASIC .Net PADA BADAN PEMBERDAYAAN MASYARAKAT (BPM) ACEH
KARYA TULIS ILMIAH Diajukan untuk melengkapi tugas-tugas dan memenuhi syarat-syarat guna memperoleh Gelar Ahli Madya Komputer STMIK U’Budiyah Indonesia
Oleh Nama : Marliana Sibagariang NIM
: 07123019
PROGRAM STUDI D-III MANAJEMEN INFORMATIKA SEKOLAH TINGGI MANAJEMEN INFORMATIKA DAN KOMPUTER STMIK U’BUDIYAH INDONESIA BANDA ACEH 2012
50
DAFTAR PUSTAKA Abdul Kadir,2003. Pengenalan Sistem Informasi. penerbit Andi, Yogyakarta. Abdul Kadir,2003. Penuntun Praktis Belajar Database Menggunakan Microsoft Acces, Edisi II, Penerbit Andi. Yogyakarta. Amsyah,2005. Manajemen Informasi System. CV. Andi Offset, Yogyakarta 2005. Al Fatta,Hanif.,2007. Analisa dan Perancangan Sistem Informasi, Penerbit Andi, Yogyakarta . James,2010. Pengantar Sistem Informasi, Penerbit IPB Press, Jakarta . James A.Hall,2007. Pengertian Sistem, Penerbit Informatika, Bandung. Jogiyanto,H.M,1995. Sistem Teknologi Informasi. CV. Andi Offset, Yogyakarta. Kristanto. Harianto.,1994. Konsep dan Perancangan Database, penerbit Andi,Yogyakarta . Kurniawan Puji Agus,2005. Sistem informasi Manajemen, IPW, Jakarta L.Gaol, Jimmy.,2008. Sistem Informasi Manajemen Pemahaman dan Aplikasi, GRASINDO, Jakarta. Marimin,2009. Teori dan Aplikasi sistem Pakar Dalam Teknologi Manajerial, Edisi Kedua, IPB Press, Bogor. Putra, Irwansyah. Pengembangan Sistem Informasi.2007 Sigit, Ir. Ponco.W.1999. Analisa dan Perancangan Sistem, Penerbit Fajar, Jakarta. Susanto, 2008.Sistem Informasi Manajemen, Penerbit Fajar, Jakarta. Sutabri, Tata....,2003. Analisa sistem Informasi, Penerbit Andi, Jakarta. Sutabri, 2004. Analisis Sistem Informasi, Andi . Sutanto,2004. Sistem Basis Data. penerbit Graha Ilmu Yogyakarta. Sutari, Tata....,2004. Analisa Sistem Informasi, Edisi I, Penerbit Andi,Yogyakarta. Supriyanto Aji,2005. Pengantar Teknologi Informasi. Salemba Infotek, Jakarta. www.Ilmushare.com, 13 juli 2012 Zaki Baridwan,2007. Pengertian Sistem, Penerbit Erlangga, Edisi Kelima, Surabaya.
DAFTAR GAMBAR Halaman Gambar 4.1.
Diagram Konteks……........................................................... 30
Gambar 4.2.
Flowchart Kerja Sistem…………….....................................
31
Gambar 4.3
Struktur Program………….........................................................
33
Gambar 4.4
Data Flow Diagram Level 1……………………………………
36
Gambar 4.5
Data Flow Diagram level 1 proses 1..................................... 37
Gambar 4.6
Data Flow Diagram level 1 proses 2.....................................
37
Gambar 4.7
Data Flow Diagram level 1 proses 3.....................................
38
Gambar 4.8
Data Flow Diagram level 1 proses 4.....................................
38
Gambar 4.9
Data Flow Diagram level 1 proses 5.....................................
39
Gambar 4.10 Desain Entity Relationship Diagram..................................... 40 Gambar 4.11 Form Login……………………….......................................
41
Gambar 4.12 Form Data Pegawai……………….......................................
42
Gambar 4.13 Form Data Jabatan…………………………………………
43
Gambar 4.14 Form Data Pelatihan……………………………………….
43
Gambar 4.15 Form Data Pensiun…………………………………………
44
Gambar 4.16 Cetak Laporan Data Pegawai………………………………
45
Gambar 4.17 Cetak Berdasarkan Jabatan………………………………… 46 Gambar 4.18 Cetak Data Pelatihan……………………………………...... 46 Gambar 4.19 Cetak Data Pensiun…………………………………………. 47
xi
DAFTAR ISI Halaman Lembar Judul KTI..................................................................................
i
Lembar Pengesahan.................................................................................
ii
Lembar Persetujuan…………………………………………………….
iii
Lembar Pernyataan……………………………………………………...
iv
Kata Pengantar..........................................................................................
v
Abstrak…………………………………………………………………..
vii
Daftar Isi.....................................................................................................
viii
Daftar Gambar..........................................................................................
xi
Daftar Tabel...............................................................................................
xii
Daftar Lampiran.......................................................................................
xiii
BAB I PENDAHULUAN.........................................................................
1
1.1
Latar Belakang Masalah.......................................................
1
1.2
Perumusan Masalah.............................................................
3
1.3
Batasan Masalah..................................................................
3
1.4
Manfaat dan Tujuan Penelitian ..........................................
3
1.5
Sistematika Penulisan.........................................................
4
BAB II TINJAUAN KEPUSTAKAAN..................................................
6
2.1
Gambaran Umum Instansi………………………………..
6
2.2 Sejarah Singkat Badan Pemberdayaan Masyarakat (BPM) Provinsi Aceh……………………………………..
6
2.2.1
Tugas dan Fungsi…………………………………..
7
2.2.2
Visi dan Misi..............................................................
7
viii
2.3 Struktur Organisasi Badan Pemberdayaan Masyarakat (BPM) Aceh………………………………………………..
8
Bahasa Pemrograman...........................................................
9
2.4.1
Microsoft Visual . Net…………………………………
10
2.4.2
Crystal Report…………………………………………..
11
2.4.3
Microsoft Accces 2007………………………………..
11
2.5
Simbol-simbol Flowchart.....................................................
12
2.6
Landasan Teori....................................................................
13
2.6.1
Pengertian Sistem....................................................
13
2.6.2
Definisi Informasi..................................................
16
2.6.3
Pengertian Sistem Informasi..................................
17
2.6.4
Manfaat Sistem Informasi.........................................
19
2.7 Definisi Data.........................................................................
21
2.4
2.7.1
Data Flow Diagram...................................................
21
2.7.2
Entity Relationship Diagram.....................................
23
BAB III METODELOGI PENELITIAN.................................................
24
3.1
Lokasi Penelitian……...........................................................
24
3.2
Waktu Penelitian……………………………………………
24
3.3. Metodelogi pengumpulan data…………………………….
25
3.4
Alat-alat yang dipakai………………………………………
26
3.5
Metode Analisa Data………………………………………..
28
3.6
Analisa Sistem………………………………………………
29
3.7
Perancangan Sistem…………………………………………
29
ix
BAB IV HASIL DAN PEMBAHASAN………………………………..
30
4.1 Diagram Konteks…………………………………………..
30
4.2 Flowchart Sistem yang diusulkan…………………………
31
4.3 Stuktur Program……………………………………………
32
4.4 Rancangan File Database………………………………….
34
4.5 Sistem informasi kepegawaian pada Badan Pemberdayaan
BAB V
Masyarakat (BPM) Aceh ………………………………….
35
4.6 Desain DFD (Data Flow Diagram)…………………………..
35
4.7 Desain ERD (Entity Relationship Diagram)………………...
40
4.8 Perancangan Program Yang Dirancang……………………
41
4.8.1
Perancangan Form Login…………………………..
41
4.8.2
Form Data Pegawai………………… ……………
41
4.8.3
Form Data Jabatan…………………………………
42
4.8.4
Form Data Pelatihan……………………………….
43
4.8.5
Form Data Pensiun………………………………..
44
4.8.6
Form Laporan Data Pegawai………………………
45
4.8.7
Form Laporan Data Jabatan……………………….
46
4.8.8
Form Laporan Data Pelatihan……………………..
47
PENUTUP……………………………………………………..
48
5.1
Kesimpulan……………………………………………….
49
5.2 Saran………………………………………………………
49
DAFTAR PUSTAKA..................................................................................
50
LAMPIRAN.................................................................................................
51
x
xi
DAFTAR LAMPIRAN
Halaman 1. Struktur Organisasi Badan Pemberdayaan Masyarakat (BPM) Aceh..................................................................................
xiii
51
DAFTAR TABEL
Halaman
Tabel 2.1
Tabel simbol diagram flowchart........................................... 12
Tabel 2.2
Simbol Data Flow Diagram (DFD)..................................... 22
Tabel 2.3
Simbol Diagram Hubungan Entitas...................................... 23
Tabel 4.1
User…………......................................................................
Tabel 4.2
Data Pegawai……................................................................ 34
Tabel 4.3
Data Jabatan………............................................................
Tabel 4.4
Data Pelatihan........................................................................ 35
Tabel 4.5
Data Pensiun………………………………………………. 35
xii
34
34
KATA PENGANTAR Pertama-tama penulis mengucapkan syukur dan terima kasih yang sebesarbesarnya kepada Tuhan Yang Maha Esa atas segala rahmat dan kasih karuniaNya,
sehingga penulis dapat menyelesaikan Karya Tulis Ilmiah (KTI) yang
berjudul
“SISTEM
INFORMASI
KEPEGAWAIAN
DENGAN
MENGGUNAKAN MICROSOFT VISUAL BASIC .Net PADA BADAN PEMBERDAYAAN
MASYARAKAT
(BPM)
ACEH”.
Dalam
rangka
menyelesaikan program studi Manajemen Informatika untuk memperoleh gelar Ahli Madya pada STMIK U’Budiyah Indonesia. Penulis menyadari bahwa terwujudnya Karya Tulis Ilmiah (KTI) ini karena adanya bimbingan, bantuan, saran dan kerjasama dari berbagai pihak. Dengan segala kerendahan hati dan rasa hormat, penulis menyampaikan terimakasih diiringi dengan doa semoga Tuhan Yesus selalu menyertai, membimbing, memberikan rahmat-Nya atas segala bantuan yang diberikan. Dalam kesempatan ini penulis mengucapkan terimakasih yang tak terhingga kepada: 1. Bapak Drs. Alfian Ibrahim, MS selaku Ketua STMIK U’Budiyah Indonesia 2. Ibu Ima Dwitawati, S.Si, MBA sebagai dosen pembimbing yang telah meluangkan waktu dan
pikirannya untuk membimbing penulis, sehingga
penulis dapat menyelesaikan Karya Tulis Ilmiah (KTI) ini. 3. Bapak Faisal Tifta Zany,S.Si.,M,Sc sebagai ketua prodi D-III Manajemen Informatika yang telah memberi saran serta masukan dalam menyelesaikan penyusunan Karya Tulis Ilmiah (KTI) .
v
4. Terima kasih juga penulis ucapkan kepada Bapak Kepala Badan Pemberdayaan Masyarakat (BPM) Provinsi Aceh, beserta seluruh karyawan/i yang telah memberikan data serta informasi kepeda penulis dalam rangka penyelesaian penyusunan Karya Tulis Ilmiah (KTI) ini. 5. Seluruh Staff bagian kepegawaian dan Tata Laksana Badan Pemberdayaan Masyarakat (BPM) Aceh khususnya buat Ibu Cut Nurul Fitri, SH atas bantuannya selama penulis melaksanakan Penelitian. 6. Dosen-dosen dan seluruh staff
Akademik STMIK U’Budiyah yang telah
memberikan arahannya. 7. Buat suamiku tercinta yang telah memberi semangat, dorongan serta bantuan moral dan material, juga anakku Angel & Faira yang sangat mama sayangi. Mama mohon maaf karena sering tinggalin anakku yang manis dan manja... 8. Buat sahabat-sahabatku MI’08 & MI’09 khususnya buat Nanda yang selalu memberi dukungan selama pembuatan Karya Tulis Ilmiah (KTI) ini. Penulis menyadari bahwa Karya Tulis Ilmiah (KTI) ini masih jauh dari kesempurnaan, untuk itu kritik dan saran sangat diharapkan demi kesempurnaan Karya Tulis Ilmiah (KTI) ini. Akhirnya hanya ucapan terima kasih yang dapat penulis ucapkan, semoga Tuhan Yang Maha Esa membalas jasa baik yang telah disumbangkan oleh semua pihak.
Banda Aceh , 15 Agustus 2012
Penulis
vi
YAYASAN PENDIDIKAN U’BUDIYAH INDONESIA SEKOLAH TINGGI MANAJEMEN INFORMATIKA DAN KOMPUTER
STMIK U’BUDIYAH INDONESIA
Jl. T. Nyak Arief Lamnyong Banda Aceh Telp (0651) 7555565
LEMBAR KONSULTASI NAMA MAHASISWA NIM PRODI JUDUL KTI
PEMBIMBING NO.
: : : :
MARLIANA SIBAGARIANG 07123019 MANAJEMEN INFORMATIKA SISTEM INFORMASI KEPEGAWAIAN DENGAN MENGGUNAKAN MICROSOFT VISUAL BASIC 6.0 PADA BADAN PEMBERDAYAAN MASYARAKAT (BPM) ACEH : IMA DWITAWATI, S.Si., MBA
HARI / TANGGAL
ASISTENSI
TANDA TANGAN
1. 2. 3.
4. 5. 6. 7. 8. 9. 10. 11. 12. Banda Aceh, 02 juli 2012 Pembimbing,
Ima Dwitawati,S.Si.,MBA
Ka.Prodi Manajemen Informatika,
Faisal Tifta Zany,S.Si.,M.Sc
LEMBAR PENGESAHAN
SISTEM INFORMASI KEPEGAWAIAN DENGAN MENGGUNAKAN MICROSOFT VISUAL BASIC .Net PADA BADAN PEMBERDAYAAN MASYARAKAT (BPM) ACEH
Tugas Akhir oleh Marliana Sibagariang ini telah dipertahankan didepan dewan penguji pada tanggal 15 Agustus 2012.
Dewan Penguji : 1. Ketua
Ima Dwitawati, S,Si., MBA
2. Anggota
Faisal Tifta Zany, S.Si., M. Sc
3. Anggota
Al Hazrami, S.Kom
ii
LEMBAR PERNYATAAN
Dengan ini saya menyatakan bahwa Karya Tulis Ilmiah dengan judul ’’ SISTEM INFORMASI KEPEGAWAIAN DENGAN MENGGUNAKAN MICROSOFT VISUAL BASIC .Net PADA BADAN PEMBERDAYAAN MASYARAKAT (BPM) ACEH ” ini beserta seluruh isinya adalah benar-benar karya saya sendiri, dan tidak melakukan penjiplakan atau pengutipan dengan cara yang tidak sesuai dengan etika keilmuan yang berlaku dalam masyarakat keilmuan. Atas pernyataan ini saya siap menanggung resiko atau sanksi yang dijatuhkan kepada saya apabila kemudian ditemukan adanya pelanggaran terhadap etika keilmuan dalam karya saya ini atau ada klaim dari pihak lain terhadap keaslian karya saya ini.
Banda Aceh, 15 Agustus 2012 Yang membuat pernyataan,
Marliana Sibagariang
iv
v
LEMBAR PERSETUJUAN SISTEM INFORMASI KEPEGAWAIAN DENGAN MENGGUNAKAN MICROSOFT VISUAL BASIC.Net PADA BADAN PEMBERDAYAAN MASYARAKAT (BPM) ACEH
KARYA TULIS ILMIAH Diajukan untuk melengkapi tugas-tugas dan memenuhi syarat-syarat guna memperoleh gelar Ahli Madya Komputer STMIK U’Budiyah Indonesia
Oleh: Marliana Sibagariang 07123019
Disetujui, Penguji I
Penguji II
(FaisalTifta Zany, S.Si., M.Sc)
(Al Hazrami, S.Kom)
Ka. Prodi Manajemen Informatika
Dosen Pembimbing
(FaisalTifta Zany, S.Si., M.Sc)
(Ima Dwitawati, S.Si., MBA)
Mengetahui, Ka. STMIK U’Budiyah Indonesia
(Drs. Alfian Ibrahim., MS) iii
LISTING PROGRAM
Kode Vb Net 2008 1. Form Login Imports System.Data.OleDb Public Class Login Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Koneksi() cmd = New OleDbCommand("select * from Pemakai where Nama_Pemakai='" & TextBox1.Text & "' and Password_Pemakai='" & TextBox2.Text & "'", Conn) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then Me.Visible = False MenuUtama.Show() MenuUtama.Panel1.Text = rd.GetString(0) MenuUtama.Panel2.Text = rd.GetString(1) MenuUtama.Panel3.Text = rd.GetString(2) If MenuUtama.Panel3.Text <> "ADMIN" Then MenuUtama.PemakaiToolStripMenuItem.Enabled = False Else MenuUtama.PemakaiToolStripMenuItem.Enabled = True End If Else MsgBox("login salah, periksan kembali Nama Pemakai dan Password Pemakai") TextBox1.Focus() End If End Sub Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress If e.KeyChar = Chr(13) Then TextBox2.Focus() End Sub Private Sub TextBox2_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox2.KeyPress If e.KeyChar = Chr(13) Then Button1.Focus() End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click TextBox1.Clear() TextBox2.Clear() End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click End
End Sub Private Sub Login_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged End Sub Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged End Sub End Class 2. Form Data Pegawai Imports System.Data.OleDb Public Class Pegawai Sub Kosongkan() TNIP.Text = "" TNAMAPEG.Text = "" TTMPL.Text = "" TTGLL.Text = "" CJK.Text = "" TTELP.Text = "" TALAMAT.Text = "" CKODEJAB.Text = "" LNAMAJAB.Text = "" TNIP.Focus() End Sub Sub DataBaru() TNAMAPEG.Text = "" TTMPL.Text = "" TTGLL.Text = "" CJK.Text = "" TTELP.Text = "" TALAMAT.Text = "" CKODEJAB.Text = "" LNAMAJAB.Text = "" TNAMAPEG.Focus() End Sub Sub TabelPegawai() da = New OleDbDataAdapter("Select * from Pegawai", Conn) ds = New DataSet ds.Clear()
da.Fill(ds, "Pegawai") DGV.DataSource = (ds.Tables("Pegawai")) DGV.ReadOnly = True End Sub Sub AturKolom() DGV.Columns(0).Width DGV.Columns(1).Width DGV.Columns(2).Width DGV.Columns(3).Width DGV.Columns(4).Width DGV.Columns(5).Width DGV.Columns(6).Width DGV.Columns(7).Width End Sub
= = = = = = = =
130 240 100 80 80 80 150 30
Sub TampilJabatan() cmd = New OleDbCommand("select * from Jabatan", Conn) rd = cmd.ExecuteReader CKODEJAB.Items.Clear() Do While rd.Read CKODEJAB.Items.Add(rd.Item(0)) Loop End Sub Sub TampilTabel() Call TabelPegawai() End Sub Private Sub TNIP_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TNIP.KeyPress If e.KeyChar = Chr(13) Then cmd = New OleDbCommand("select * from Pegawai where NIP='" & TNIP.Text & "'", Conn) rd = cmd.ExecuteReader rd.Read() If rd.HasRows = True Then TNAMAPEG.Text = rd.Item(1) TTMPL.Text = rd.Item(2) TTGLL.Text = rd.Item(3) CJK.Text = rd.Item(4) TTELP.Text = rd.Item(5) TALAMAT.Text = rd.Item(6) CKODEJAB.Text = rd.Item(7) TNAMAPEG.Focus() Else Call DataBaru() TNAMAPEG.Focus() End If End If If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled() = True
End Sub Private Sub TNAMAPEG_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TNAMAPEG.KeyPress If e.KeyChar = Chr(13) Then TNAMAPEG.Text = UCase(TNAMAPEG.Text) TTMPL.Focus() End If End Sub Private Sub TTMPL_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TTMPL.KeyPress If e.KeyChar = Chr(13) Then TTGLL.Focus() End Sub Private Sub TTGLL_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TTGLL.KeyPress If e.KeyChar = Chr(13) Then CJK.Focus() End Sub Private Sub CJK_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles CJK.KeyPress If e.KeyChar = Chr(13) Then TTELP.Focus() End Sub Private Sub TTELP_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TTELP.KeyPress If e.KeyChar = Chr(13) Then TALAMAT.Focus() End Sub Private Sub TALAMAT_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TALAMAT.KeyPress If e.KeyChar = Chr(13) Then CKODEJAB.Focus() End Sub Private Sub CmdSimpan_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles CmdSimpan.Click If TNIP.Text = "" Or TNAMAPEG.Text = "" Or TTMPL.Text = "" Or TTGLL.Text = "" Or CJK.Text = "" Or TTELP.Text = "" Or TALAMAT.Text = "" Or CKODEJAB.Text = "" Then MsgBox("Data Belum Lengkap") Exit Sub Else cmd = New OleDbCommand("Select * from Pegawai where NIP='" & TNIP.Text & "'", Conn) rd = cmd.ExecuteReader rd.Read() If Not rd.HasRows Then
Dim sqltambah As String = "Insert into Pegawai(NIP,NAMAPEG,TMP_LAHIR,TGL_LAHIR,JENIS_KELAMIN,TELEPON,ALA MAT,KODE_JABATAN) values " & _ "('" & TNIP.Text & "','" & TNAMAPEG.Text & "','" & TTMPL.Text & "','" & TTGLL.Text & "','" & CJK.Text & "','" & TTELP.Text & "','" & TALAMAT.Text & "','" & CKODEJAB.Text & "')" cmd = New OleDbCommand(sqltambah, Conn) cmd.ExecuteNonQuery() Call Kosongkan() Call TabelPegawai() Else Dim sqledit As String = "Update Pegawai set " & _ "NAMAPEG='" & TNAMAPEG.Text & "', " & _ "TMP_LAHIR='" & TTMPL.Text & "', " & _ "TGL_LAHIR='" & TTGLL.Text & "', " & _ "JENIS_KELAMIN='" & CJK.Text & "', " & _ "TELEPON='" & TTELP.Text & "', " & _ "ALAMAT='" & TALAMAT.Text & "', " & _ "KODE_JABATAN='" & CKODEJAB.Text & "' " & _ "where NIP='" & TNIP.Text & "'" cmd = New OleDbCommand(sqledit, Conn) cmd.ExecuteNonQuery() Call Kosongkan() Call TabelPegawai() End If End If End Sub Private Sub CmdBatal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdBatal.Click Call Kosongkan() End Sub Private Sub CmdTutup_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdTutup.Click Me.Close() End Sub Private Sub CmdHapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdHapus.Click If TNIP.Text = "" Then MsgBox("Isi Nip Pegawai terlebih dahulu") TNIP.Focus() Exit Sub Else If MessageBox.Show("Yakin akan dihapus..?", "", MessageBoxButtons.YesNo) = Windows.Forms.DialogResult.Yes Then cmd = New OleDbCommand("Delete * from Pegawai where NIP='" & TNIP.Text & "'", Conn) cmd.ExecuteNonQuery() Call Kosongkan() Call TabelPegawai()
Else
Call Kosongkan() End If End If End Sub Private Sub Pegawai_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Call Koneksi() Call TabelPegawai() Call TampilJabatan() Call AturKolom() TNIP.MaxLength = 19 : TNAMAPEG.MaxLength = 50 : TTMPL.MaxLength = 50 : TTELP.MaxLength = 12 : TALAMAT.MaxLength = 100 End Sub Private Sub CKODEJAB_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles CKODEJAB.KeyPress If e.KeyChar = Chr(13) Then CmdSimpan.Focus() End Sub Private Sub CKODEJAB_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CKODEJAB.SelectedIndexChanged cmd = New OleDbCommand("select * from Jabatan where KODE_JABATAN='" & CKODEJAB.Text & "'", Conn) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then LNAMAJAB.Text = rd.Item(1) Else MsgBox("Kode Jabatan tidak terdaftar") CKODEJAB.Text = "" LNAMAJAB.Text = "" CKODEJAB.Focus() End If End Sub End Class 3.
Form Jabatan
Imports System.Data.OleDb Public Class Jabatan Sub Kosongkan() TKODEJAB.Text = "" TNAMAJAB.Text = "" TKODEJAB.Focus() End Sub
Sub DataBaru() TNAMAJAB.Text = "" TNAMAJAB.Focus() End Sub Sub AturKolom() DGV.Columns(0).Width = 100 DGV.Columns(1).Width = 350 End Sub Sub Tampilkan() da = New OleDbDataAdapter("Select * from Jabatan", Conn) ds = New DataSet ds.Clear() da.Fill(ds, "Jabatan") DGV.DataSource = (ds.Tables("Jabatan")) DGV.ReadOnly = True End Sub Private Sub TKODEJAB_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TKODEJAB.KeyPress If e.KeyChar = Chr(13) Then cmd = New OleDbCommand("select * from Jabatan where KODE_JABATAN='" & TKODEJAB.Text & "'", Conn) rd = cmd.ExecuteReader rd.Read() If rd.HasRows = True Then TNAMAJAB.Text = rd.Item(1) TNAMAJAB.Focus() Else Call DataBaru() TNAMAJAB.Focus() End If End If If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled() = True End Sub Private Sub TNAMAJAB_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TNAMAJAB.KeyPress If e.KeyChar = Chr(13) Then TNAMAJAB.Text = UCase(TNAMAJAB.Text) CmdSimpan.Focus() End If End Sub Private Sub CmdSimpan_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles CmdSimpan.Click If TKODEJAB.Text = "" Or TNAMAJAB.Text = "" Then MsgBox("Data Belum Lengkap") Exit Sub
Else
cmd = New OleDbCommand("Select * from Jabatan where KODE_JABATAN='" & TKODEJAB.Text & "'", Conn) rd = cmd.ExecuteReader rd.Read() If Not rd.HasRows Then Dim sqltambah As String = "Insert into Jabatan(KODE_JABATAN,NAMA_JABATAN) values " & _ "('" & TKODEJAB.Text & "','" & TNAMAJAB.Text & "')" cmd = New OleDbCommand(sqltambah, Conn) cmd.ExecuteNonQuery() Call Kosongkan() Call Tampilkan() Else Dim sqledit As String = "Update Jabatan set " & _ "NAMA_JABATAN='" & TNAMAJAB.Text & "' " & _ "where KODE_JABATAN='" & TKODEJAB.Text & "'" cmd = New OleDbCommand(sqledit, Conn) cmd.ExecuteNonQuery() Call Kosongkan() Call Tampilkan() End If End If End Sub Private Sub CmdHapus_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles CmdHapus.Click If TKODEJAB.Text = "" Then MsgBox("Isi Kode Jabatan terlebih dahulu") TKODEJAB.Focus() Exit Sub Else If MessageBox.Show("Yakin akan dihapus..?", "", MessageBoxButtons.YesNo) = Windows.Forms.DialogResult.Yes Then cmd = New OleDbCommand("Delete * from Jabatan where KODE_JABATAN='" & TKODEJAB.Text & "'", Conn) cmd.ExecuteNonQuery() Call Kosongkan() Call Tampilkan() Else Call Kosongkan() End If End If End Sub Private Sub CmdTutup_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles CmdTutup.Click Me.Close() End Sub Private Sub CmdBatal_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles CmdBatal.Click
Call Kosongkan() End Sub Private Sub Jabatan_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Call Koneksi() Call Tampilkan() Call AturKolom() TKODEJAB.MaxLength = 3 : TNAMAJAB.MaxLength = 50 End Sub End Class 4.
Form Pelatihan
Imports System.Data.OleDb Public Class Pelatihan Sub Kosongkan() TNOSKLATIHAN.Text = "" TNAMALATIHAN.Text = "" CNIP.Text = "" LNAMAPEG.Text = "" TNOSKLATIHAN.Focus() End Sub Sub DataBaru() TNAMALATIHAN.Text = "" CNIP.Text = "" LNAMAPEG.Text = "" TNAMALATIHAN.Focus() End Sub Sub AturKolom() DGV.Columns(0).Width = 50 DGV.Columns(1).Width = 310 DGV.Columns(2).Width = 150 End Sub Sub Tampilkan() da = New OleDbDataAdapter("Select * from Pelatihan", Conn) ds = New DataSet ds.Clear() da.Fill(ds, "Pelatihan") DGV.DataSource = (ds.Tables("Pelatihan")) DGV.ReadOnly = True End Sub Sub TabelPegawai() cmd = New OleDbCommand("select * from Pegawai", Conn) rd = cmd.ExecuteReader
CNIP.Items.Clear() Do While rd.Read CNIP.Items.Add(rd.Item(0)) Loop End Sub Sub TampilPegawai() Call TabelPegawai() End Sub Private Sub TNOSKLATIHAN_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TNOSKLATIHAN.KeyPress If e.KeyChar = Chr(13) Then cmd = New OleDbCommand("select * from Pelatihan where SK_LATIHAN='" & TNOSKLATIHAN.Text & "'", Conn) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then TNAMALATIHAN.Text = rd.Item(1) CNIP.Text = rd.Item(2) TNAMALATIHAN.Focus() Else Call DataBaru() TNAMALATIHAN.Focus() End If End If If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled() = True End Sub Private Sub CmdSimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdSimpan.Click If TNOSKLATIHAN.Text = "" Or TNAMALATIHAN.Text = "" Or CNIP.Text = "" Then MsgBox("Data Belum Lengkap") Exit Sub Else cmd = New OleDbCommand("Select * from Pelatihan where SK_LATIHAN='" & TNOSKLATIHAN.Text & "'", Conn) rd = cmd.ExecuteReader rd.Read() If Not rd.HasRows Then Dim sqltambah As String = "Insert into Pelatihan(SK_LATIHAN,NAMA_LATIHAN,NIP) values " & _ "('" & TNOSKLATIHAN.Text & "','" & TNAMALATIHAN.Text & "','" & CNIP.Text & "')" cmd = New OleDbCommand(sqltambah, Conn) cmd.ExecuteNonQuery() Call Kosongkan() Call Tampilkan() Else
Dim sqledit As String = "Update Pelatihan set " & _ "NAMA_LATIHAN='" & TNAMALATIHAN.Text & "', " & _ "NIP='" & CNIP.Text & "' " & _ "where SK_LATIHAN='" & TNOSKLATIHAN.Text & "'" cmd = New OleDbCommand(sqledit, Conn) cmd.ExecuteNonQuery() Call Kosongkan() Call Tampilkan() End If End If End Sub Private Sub CmdHapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdHapus.Click If TNOSKLATIHAN.Text = "" Then MsgBox("Masuk No. SK Pelatihan terlebih dahulu") TNOSKLATIHAN.Focus() Exit Sub Else If MessageBox.Show("Yakin akan dihapus..?", "", MessageBoxButtons.YesNo) = Windows.Forms.DialogResult.Yes Then cmd = New OleDbCommand("Delete * from Pelatihan where SK_LATIHAN='" & TNOSKLATIHAN.Text & "'", Conn) cmd.ExecuteNonQuery() Call Kosongkan() Call Tampilkan() Else Call Kosongkan() End If End If End Sub Private Sub CmdBatal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdBatal.Click Call Kosongkan() End Sub Private Sub CmdTutup_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdTutup.Click Me.Close() End Sub Private Sub Pelatihan_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Call Koneksi() Call Tampilkan() Call TampilPegawai() Call AturKolom() TNOSKLATIHAN.MaxLength = 5 End Sub
Private Sub TNAMALATIHAN_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TNAMALATIHAN.KeyPress If e.KeyChar = Chr(13) Then CNIP.Focus() End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Pegawai.Show() End Sub Private Sub CNIP_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles CNIP.KeyPress If e.KeyChar = Chr(13) Then CmdSimpan.Focus() End Sub Private Sub CNIP_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CNIP.SelectedIndexChanged cmd = New OleDbCommand("select * from Pegawai where NIP='" & CNIP.Text & "'", Conn) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then LNAMAPEG.Text = rd.Item(1) End If End Sub End Class 5. Form Pensiun Imports System.Data.OleDb Public Class Pensiun Sub Kosongkan() TNOSKPENSIUN.Text = "" CNIP.Text = "" LNAMAPEG.Text = "" TTMTPENSIUN.Text = "" TNOSKPENSIUN.Focus() End Sub Sub DataBaru() TTMTPENSIUN.Text = "" CNIP.Text = "" LNAMAPEG.Text = "" TTMTPENSIUN.Focus() End Sub
Sub AturKolom() DGV.Columns(0).Width = 80 DGV.Columns(1).Width = 100 DGV.Columns(2).Width = 130 End Sub Sub Tampilkan() da = New OleDbDataAdapter("Select * from Pensiun", Conn) ds = New DataSet ds.Clear() da.Fill(ds, "Pensiun") DGV.DataSource = (ds.Tables("Pensiun")) DGV.ReadOnly = True End Sub Sub TabelPegawai() cmd = New OleDbCommand("select * from Pegawai", Conn) rd = cmd.ExecuteReader CNIP.Items.Clear() Do While rd.Read CNIP.Items.Add(rd.Item(0)) Loop End Sub Sub TampilPegawai() Call TabelPegawai() End Sub Private Sub CmdTutup_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdTutup.Click Me.Close() End Sub Private Sub CmdBatal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdBatal.Click Call Kosongkan() End Sub Private Sub TNOSKPENSIUN_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TNOSKPENSIUN.KeyPress If e.KeyChar = Chr(13) Then cmd = New OleDbCommand("select * from Pensiun where SKPENSIUN='" & TNOSKPENSIUN.Text & "'", Conn) rd = cmd.ExecuteReader rd.Read() If rd.HasRows = True Then TTMTPENSIUN.Text = rd.Item(1) CNIP.Text = rd.Item(2) TTMTPENSIUN.Focus() Else Call DataBaru()
TTMTPENSIUN.Focus() End If End If If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled() = True End Sub Private Sub CmdSimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdSimpan.Click If TNOSKPENSIUN.Text = "" Or TTMTPENSIUN.Text = "" Or CNIP.Text = "" Then MsgBox("Data Belum Lengkap") Exit Sub Else cmd = New OleDbCommand("Select * from Pensiun where SKPENSIUN='" & TNOSKPENSIUN.Text & "'", Conn) rd = cmd.ExecuteReader rd.Read() If Not rd.HasRows Then Dim sqltambah As String = "Insert into Pensiun(SKPENSIUN,TMT_PENSIUN,NIP) values " & _ "('" & TNOSKPENSIUN.Text & "','" & TTMTPENSIUN.Text & "','" & CNIP.Text & "')" cmd = New OleDbCommand(sqltambah, Conn) cmd.ExecuteNonQuery() Call Kosongkan() Call Tampilkan() Else Dim sqledit As String = "Update Pensiun set " & _ "TMT_PENSIUN='" & TTMTPENSIUN.Text & "', " & _ "NIP='" & CNIP.Text & "' " & _ "where SKPENSIUN='" & TNOSKPENSIUN.Text & "'" cmd = New OleDbCommand(sqledit, Conn) cmd.ExecuteNonQuery() Call Kosongkan() Call Tampilkan() End If End If End Sub Private Sub CmdHapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdHapus.Click If TNOSKPENSIUN.Text = "" Then MsgBox("Pilih No. SK Pensiun terlebih dahulu") TNOSKPENSIUN.Focus() Exit Sub Else If MessageBox.Show("Yakin akan dihapus..?", "", MessageBoxButtons.YesNo) = Windows.Forms.DialogResult.Yes Then cmd = New OleDbCommand("Delete * from Pensiun where SKPENSIUN='" & TNOSKPENSIUN.Text & "'", Conn) cmd.ExecuteNonQuery()
Else
Call Kosongkan() Call Tampilkan()
Call Kosongkan() End If End If End Sub Private Sub Pensiun_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Call Koneksi() Call Tampilkan() Call TampilPegawai() Call AturKolom() TNOSKPENSIUN.MaxLength = 3 End Sub Private Sub CNIP_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles CNIP.KeyPress If e.KeyChar = Chr(13) Then CmdSimpan.Focus() End Sub Private Sub CNIP_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CNIP.SelectedIndexChanged cmd = New OleDbCommand("select * from Pegawai where NIP='" & CNIP.Text & "'", Conn) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then LNAMAPEG.Text = rd.Item(1) End If End Sub Private Sub TTMTPENSIUN_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TTMTPENSIUN.KeyPress If e.KeyChar = Chr(13) Then CNIP.Focus() End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Pegawai.Show() End Sub End Class 5. Form Login Imports System.Data.OleDb Public Class Login
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Koneksi() cmd = New OleDbCommand("select * from Pemakai where Nama_Pemakai='" & TextBox1.Text & "' and Password_Pemakai='" & TextBox2.Text & "'", Conn) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then Me.Visible = False MenuUtama.Show() MenuUtama.Panel1.Text = rd.GetString(0) MenuUtama.Panel2.Text = rd.GetString(1) MenuUtama.Panel3.Text = rd.GetString(2) If MenuUtama.Panel3.Text <> "ADMIN" Then MenuUtama.PemakaiToolStripMenuItem.Enabled = False Else MenuUtama.PemakaiToolStripMenuItem.Enabled = True End If Else MsgBox("login salah, periksan kembali Nama Pemakai dan Password Pemakai") TextBox1.Focus() End If End Sub Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress If e.KeyChar = Chr(13) Then TextBox2.Focus() End Sub Private Sub TextBox2_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox2.KeyPress If e.KeyChar = Chr(13) Then Button1.Focus() End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click TextBox1.Clear() TextBox2.Clear() End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click End End Sub Private Sub Login_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged End Sub Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged End Sub End Class
