PENGOLAHAN DATA LIPUTAN KEPRI CYBER SCHOOL TELEVISION (KCS-TV)
KERJA PRAKTEK
Disusun Oleh :
NAMA
: FANI SUSANTO
NIM
: 1210422
PROGRAM STUDI TEKNIK INFORMATIKA SEKOLAH TINGGI TEKNOLOGI INDONESIA TANJUNGPINANG TANJUNGPINANG 2013
PENGOLAHAN DATA LIPUTAN KEPRI CYBER SCHOOL TELEVISION (KCS-TV)
KERJA PRAKTEK diajukan untuk memenuhi syarat kelulusan mata kuliah Kerja Praktek program strata satu jurusan teknik informatika
Disusun Oleh :
NAMA
: FANI SUSANTO
NIM
: 1210422
PROGRAM STUDI TEKNIK INFORMATIKA SEKOLAH TINGGI TEKNOLOGI INDONESIA TANJUNGPINANG TANJUNGPINANG 2013
ABSTRAK Perkembangan teknologi informasi dan komunikasi dewasa ini telah berkembang sangat pesat dan hampir telah mempengaruhi semua aspek kehidupan manusia. Dalam era teknologi informasi ini ditandai dengan kecepatan dan kemudahan untuk mendapatkan informasi yang dibutuhkan. Didalam proses pengolahan data liputan pada Kepri Cyber School Television sampai saat ini masih menggunakan sistem manual. Mulai dari registrasi customer, pengecekan jadwal liputan, sampai pembuatan laporan. Karena ada beberapa kekurangan dari sistem yang suda ada, maka diharapkan adanya suatu sistem yang baru yang dapat mendukung dan memperbaiki sistem yang sudah ada, oleh karena itu perlu dicari alternatif dalam penanganan data tersebut. Untuk mengatasi masalah diatas, maka perlu sistem informasi secara komputerisasi agar informasi yang di berikan lebih akurat, efesien dan cepat guna untuk mewujudkan kinerja yang baik, maka dibuatlah suatu sistem informasi pengolahan data liputan di Kepri Cyber School Television (KCS-TV) yang akan membantu dalam pengolahan data secara tersistem.
i
ABSTRACT The development of information and communication technology today has grown very rapidly and has affected almost every aspect of human life. In this information technology age is marked by speed and convenience to obtain the required information. In the process of data processing in coverage Kepri Cyber School Television is currently using manual. Ranging from customer registration, check the schedule of coverage, until the report generation. Because system there are several shortcomings of existing systems, it is expected that the existence of a new system that can support and improve the existing system, therefore we need to find an alternative in handling the data. If we look at together, the computer is the best solution in coverage of the data processing. To overcome the above issues and to get good work of the company, Kepri Cyber School Television needs a computerized information system, so the information given is more accurate, more efficient and faster. So the company should make in and out good information system to help in systemized data management.
ii
KATA PENGANTAR
Assalamu’alaikum warahmatullahi wabarakatuh. Banyak nikmat yang Allah berikan, tetapi sedikit sekali yang kita ingat. Segala puji hanya layak untuk Allah Tuhan seru sekalian alam atas segala berkat, rahmat, taufik, serta hidayah-Nya yang tiada terkira besarnya, sehingga penulis dapat menyelesaikan makalah dengan judul ”PENGOLAHAN DATA LIPUTAN KEPRI CYBER SCHOOL TELEVISION (KCS-TV)”. Laporan kerja praktek ini bertujuan untuk memenuhi salah satu syarat dalam menempuh ujian Strata Satu (S1) pada jurusan Teknik Informatika Sekolah Tinggi Teknologi Indonesia Tanjungpinang. Dalam penyusunannya, penulis memperoleh banyak bantuan dari berbagai pihak, karena itu penulis mengucapkan terima kasih yang sebesar-besarnya kepada: 1.
Bapak HM. Louis Frederick, SE.,SH.,MM. Selaku Ketua Sekolah Tinggi Teknologi Indonesia Tanjungpinang.
2.
Bapak Andi Ikbal, ST. Selaku dosen pembimbing dalam penyusunan laporan kerja praktek.
3.
Dosen-dosen Sekolah Tinggi Teknologi Indonesia yang ikut memberikan dukungan dan semangatnya bagi penulis.
4.
Segenap manajemen KEPRI CYBER SCHOOL TELEVISION yang telah memberikan izin bagi penulis untuk mengadakan penelitian .
iii
5.
Terutama ku persembahkan Kerja Praktek ini sebagai tanda baktiku kepada kedua orang tuaku tercinta Ayahanda Dodi Saputra dan Ibunda Gita Sri Astuti. Terimakasihku atas cinta, kasih sayang, nasehat dan doa yang tiada hentihentinya sehingga penulis dapat menyelesaikan perkuliahan dan kerja praktek ini dengan baik
6.
Semua pihak yang telah banyak membantu penulis selama penyusunan kerja praktek ini yang tidak dapat penulis sebutkan satu persatu.
Meskipun penulis berharap isi dari makalah ini bebas dari kekurangan dan kesalahan, namun selalu ada yang kurang. Oleh karena itu, penulis mengharapkan kritik dan saran yang membangun agar skripsi ini dapat lebih baik lagi. Akhir kata dengan kerendahan hati penulis mengucapkan terima kasih kepada berbagai pihak yang tidak dapat disebutkan satu persatu segala bantuannya. Semoga mendapat balasan yang lebih dari Allah SWT, Amin. Wassalammu’alaikum warahmatullahi wabarakatuh.
Tanjungpinang, 01 Mei 2013
Penulis
iv
PENGOLAHAN DATA LIPUTAN KEPRI CYBER SCHOOL TELEVISION (KCS-TV)
KERJA PRAKTEK diajukan untuk memenuhi syarat kelulusan mata kuliah Kerja Praktek program strata satu jurusan teknik informatika
Disusun Oleh : Nama
: Fani Susanto
Nim
: 1210422
Telah diperiksa dan disetujui sebagai Kerja Praktek, Tanggal 1 Juni 2013
Tim Penguji,
1. KETUA
:
Drs. H. Mohd. Saleh H. Umar
: ……………………..
2. PENGUJI
:
Siti Yuliyanti, ST
: ……………………..
Mengetahui :
Dosen Pembimbing
Andi Ikbal, ST NIDN.1022028302
Ketua Program StudiTeknikInformatika
Ade Winarni, MT NIDN. 1002048601
DAFTAR ISI
Abstrak ....................................................................................................... i Abstract ...............................................................................................................ii Kata Pengantar ......................................................................................... iii Daftar Isi.................................................................................................... v Daftar Gambar........................................................................................ viii Daftar Tabel .............................................................................................. x Daftar Simbol ........................................................................................... xi BAB 1 PENDAHULUAN ........................................................................ 1 1.1. 1.2. 1.3. 1.4. 1.5. 1.6.
Latar Belakang Masalah .................................................................. 1 Identifikasi Masalah......................................................................... 2 Tujuan dan Manfaat......................................................................... 2 Batasan Masalah .............................................................................. 3 Tempat dan Waktu Kerja Praktek.................................................... 3 Metode Penelitian ............................................................................ 4 1.6.1 Metode Pengumpulan Data .................................................... 4 1.6.2 Metode Pengembangan Perangkat Lunak .............................. 5 1.7 Perencanaan Jadwal Kerja Praktek.................................................. 8 1.8 Sistematika Penulisan....................................................................... 9 BAB II LANDASAN TEORI ................................................................. 11 2.1. Pengertian Data.............................................................................. 11 2.2. Pengolahan Data ............................................................................ 11 2.3. Pengertian Sistem ......................................................................... 12 2.4. Karakteristik istem ........................................................................ 14 2.5. Sistem Informasi............................................................................ 15 2.6. Konsep Dasar Sistem Informasi .................................................... 17 2.7. Pengertian Informasi...................................................................... 17 2.8. Siklus Informasi............................................................................. 18 2.9. Kualitas Informasi ......................................................................... 19 2.10. Definisi Peliputan .......................................................................... 21 2.11. Profil Perusahaan ........................................................................... 22 2.11.1 Sejarah KCS-TV................................................................. 22
v
2.11.2 Tujuan ................................................................................. 23 2.12. Struktur Organisai.......................................................................... 24 2.13. Konsep Pemodelan Sistem ............................................................ 28 2.13.1. Dekomposisi ...................................................................... 28 2.13.2. Modularitas ........................................................................ 28 2.13.3. Coupling ............................................................................ 29 2.13.4. Kohesi ................................................................................ 29 2.14. Konsep Basis Data (Database)...................................................... 31 2.14.1 Pengertian Basis Data ......................................................... 31 2.14.2 Entity Relationship Diagram (ERD)................................... 32 2.14.3 Jenis Kerelasian Antar Entitas(relationship) ...................... 33 2.14.4 Perancangan Model Data.................................................... 34 2.15. Tools yang Digunakan ................................................................... 35 2.15.1. Crystal Report 8.5.............................................................. 35 2.15.2. Visual Basic 2008 .............................................................. 36 2.15.3. Microsoft Acces 2003........................................................ 41 BAB III ANALISIS SISTEM ................................................................. 44 3.1. 3.2. 3.3. 3.4. 3.5. 3.6.
Analisis Data.................................................................................. 44 Analisis Prosedur ........................................................................... 45 Analisis Dokumen ......................................................................... 51 Permasalahan Pada Sistem Yang Sedang Berjalan ....................... 52 Gambaran Sistem Yang diUsulkan................................................ 53 Analisa Kebutuhan Sistem............................................................. 53 3.6.1. Analisis Keluaran Program ................................................. 53 3.6.2. Analisis Kebutuhan Pengguna............................................. 54 3.6.3. Analisis Kebutuhan Fungsional........................................... 54 3.6.4. Analisis Kebutuhan Perangkat Keras .................................. 55 3.6.5. Analisis Kebutuhan Perangkat Lunak ................................. 55
BAB IV PERANCANGAN SISTEM..................................................... 53 4.1. 4.2. 4.3. 4.4. 4.5. 4.6. 4.7.
Flowmap ........................................................................................ 56 Diagram Konteks ........................................................................... 63 Data Flow Diagram (DFD)........................................................... 64 Entity Relationship Diagram(ERD)............................................... 68 Rancangan Struktur Program......................................................... 68 Rancangan Struktur File ................................................................ 69 Rancangan Antar Muka (User Interface) ...................................... 72 4.7.1. Struktur Menu ...................................................................... 72 4.7.2. Perancangan Input Output Program ..................................... 73 vi
BAB V IMPLEMENTASI SISTEM....................................................... 78 5.1. 5.2. 5.3. 5.4. 5.5.
Kebutuhan Perangkat Keras .......................................................... 78 Kebutuhan Perangkat Lunak.......................................................... 78 Kegiatan Implementasi ................................................................. 79 Manual Instalasi............................................................................. 80 Hasil Implementasi ........................................................................ 81
BAB VI Penutup .................................................................................. 87 6.1.Kesimpulan ....................................................................................... 87 6.2.Saran.................................................................................................. 87 Daftar Pustaka Lampiran
vii
DAFTAR GAMBAR Gambar 1.1
Pradigma Waterfall...............................................................5
Gambar 2.1
Model Hubungan Elemen-Elemen Sistem .........................13
Gambar 2.2
Konsep Sistem Informasi ...................................................16
Gambar 2.3
Siklus Pengolahan Data......................................................19
Gambar 2.4
Kualitas Informasi ..............................................................20
Gambar 2.5
Struktur Organisasi Kepri Cyber School Television ..........25
Gambar 2.6
Interface Antar Muka Crystal Report 8.5...........................35
Gambar 2.7
Tahap Penulisan Kode Program .........................................38
Gambar 2.8
Tahap Pengembangan Software .........................................39
Gambar 2.9
Antara Aplikasi.Net,.NET Famework.................................40
Gambar 3.0
Interface Pada Aplikasi Visual Basic 2008 ........................40
Gambar 3.1
Flowmap Berjalan Registrasi Customer.............................47
Gambar 3.2
Flowmap Berjalan Pembatalan Produksi............................48
Gambar 3.3
Flowmap Berjalan Pengambilan Hasil Produksi................50
Gambar 4.1
Flowmap Usulan Registrasi Customer ...............................58
Gambar 4.2
Flowmap Usulan Pembatalan Produksi..............................60
Gambar 4.3
Flowmap Usulan Pengambilan Hasil Produksi ..................62
Gambar 4.4
Diagram Konteks................................................................63
Gambar 4.5
DFD Level 0 .......................................................................64
Gambar 4.6
DFD Level 1 Proses 1.........................................................65
Gambar 4.7
DFD Level 1 Proses 2.........................................................65
Gambar 4.8
DFD Level 1 Proses 3.........................................................66
Gambar 4.9
DFD Level 1 Proses 4.........................................................67
Gambar 5.0
ERD ....................................................................................68
viii
Gambar 5.1
Struktur Program Pengolahan Data Liputan.......................69
Gambar 5.2
Struktur Menu Pengolahan Data Liputan ...........................72
Gambar 5.3
Perancangan Antarmuka Login ..........................................73
Gambar 5.4
Perancangan Antarmuka Menu Utama...............................73
Gambar 5.5
Perancangan Antarmuka Registrasi ...................................74
Gambar 5.6
Perancangan Antarmuka Pembatalan Produksi..................74
Gambar 5.7
Perncangan Antarmuka Pengambilan Hasil Produksi........75
Gambar 5.8
Perancangan Laporan Formulir Registrasi.........................75
Gambar 5.9
Perancangan Laporan Pembatalan......................................76
Gambar 6.0
Perancangan Laporan Pengambilan ...................................76
Gambar 6.1
Perancangan Jadwal Produksi ............................................77
Gambar 6.2
Form Login.........................................................................81
Gambar 6.3
Form Menu Utama .............................................................82
Gambar 6.4
Form Registrasi ..................................................................82
Gambar 6.5
Nota Bayar..........................................................................83
Gambar 6.6
Form Pembatalan................................................................83
Gambar 6.7
Form Pengambilan..............................................................84
Gambar 6.8
Cetak Formulir....................................................................84
Gambar 6.9
Cetak Laporan Pembatalan Produksi..................................85
Gambar 7.0
Cetak Laporan Pengambilan Hasil Produksi ......................85
Gambar 7.1
Cetak Jadwal Produksi .......................................................86
Gambar 7.2
Cetak Laporan Pendapatan Perbulan..................................86
ix
DAFTAR TABEL
Table 1.1
Waktu Pelaksanaan Kerja Praktek..................................... 8
Tabel 2.1
Simbol Kerelasasian Antar Entitas.................................. 33
Tabel 2.2
Keterangan Interface Visual Basic 2008.NET ............... 41
Table 2.3
Struktur File Data Registrasi ........................................... 69
Tabel 2.4
Struktur File Data Pembatalan......................................... 71
Tabel 2.5
Struktur File Data Pengambilan ..................................... 71
x
DAFTAR SIMBOL SIMBOL DI FLOWMAP
NAMA DOKUMEN PROSES MANUAL PROSES KOMPUTER
ARSIP DATABASE
PILIHAN INPUT MANUAL
SIMBOL DI DFD
NAMA ENTITAS EKSTERNAL PROSES DATA STORE DATA FLOW
SIMBOL DI ERD
NAMA ENTITAS RELATIONSHIP ATRIBUT GARIS
xi
BAB I PENDAHULUAN
1.1
Latar Belakang Masalah Berbagai organisasi pemerintahan daerah, perusahaan swasta, atau pun
pihak – pihak lain kurangnya memanfaatkan teknologi untuk menyimpan dan mengelola data organisasi atau perusahaannya. Kualitas dan pelayanan yang cepat menjadi harapan dan keinginan dalam suatu perusahaan swasta maupun pemerintahan daerah, hal tersebut menjadi suatu bahan pemikiran dan analisis yang harus diterapkan dalam setiap rencana dan kebijakan yang akan diambil. Ketersediaan informasi yang cepat, akurat dan menyeluruh disamping akan membantu dalam membenahi proses pengajuan dalam suatu sistem pengolahan data. Dan dapat membantu proses suatu pekerjaan dari manual ke komputerisasi. Penulis mencoba mengamati sistem pengolahan data pada Kepri Cyber School Television, yang akhirnya akan menghasilkan suatu aplikasi pengolahan data liputan yang dapat mempermudah pemakai dalam mengoperasikannya. Proses pengolahan data liputan pada Kepri Cyber School Television saat ini masih menggunakan sistem manual dalam menuliskan pengajuan form peliputan, dan dalam pembuatan laporan liputan. Hal ini dapat menyebabkan sulitnya pencarian data liputan. Agar proses pencatatan form pengajuan liputan pada Kepri Cyber School Television tersebut dapat berjalan dengan efektif dan efisien, sudah seharusnya untuk menggunakan aplikasi pengolahan data liputan berbasis komputer yang dapat menangani proses pengajuan dan pengolahan data liputan. Dengan
1
2
dibentuknya suatu sistem dengan proses komputerisasi, maka diharapkan dapat mengatasi masalah-masalah yang telah terjadi. 1.2
Identifikasi Masalah Identifikasi masalah adalah suatu tahapan proses merumuskan masalah
untuk mengenali masalah yang ingin diselesaikan. Dalam pelaksanaan pengolahan data liputan Kepri Cyber School Television ini masih menemui masalah, adapun masalah yang dihadapi antara lain sebagai berikut : 1. Proses pengolahan data liputan saat ini masih menggunakan sistem manual yaitu dengan cara menuliskan form data liputan. 2. Pengecekan jadwal produksi membutuhkan waktu yang lama dengan cara mengecek satu-satu arsip yang ada. 3. Proses pembuatan laporan yang masih menggunakan sistem manual. 4. Sangat diperlukannya sistem komputerisasi untuk menunjang pelayanan yang lebih baik. 1.3
Tujuan dan Manfaat Tujuan dari adanya pengolahan data liputan ini yaitu : 1. Memberikan informasi mengenai data yang akan diliput. 2. Memberikan kemudahan pelayanan untuk melakukan proses peliputan. 3. Memberikan informasi yang cepat, tepat dan akurat sehingga dapat membantu proses pembuatan laporan. Manfaat yang diambil dari rancangan sistem ini adalah untuk memberikan
suatu kemudahan dalam segala proses yang berhubungan dengan pengajuan
3
proses pengolahan data liputan dan pembuatan laporan menjadi lebih efektif dan efisien. 1.4
Batasan Masalah Batasan masalah dimaksudkan untuk membatasi ruang lingkup pembahasan,
agar sistem yang dirancang lebih terarah. Adapun ruang lingkup masalah yang membatasi, antara lain : 1. Menangani kegiatan operasional peliputan yang mencakup: a. Pengolahan data liputan b. Transaksi pembayaran liputan dibayarkan penuh disaat customer melakukan registrasi. c. Pembayaran hanya kembali 50% jika customer melakukan pembatalan liputan. 2. Membantu karyawan dalam pembuatan laporan : a. Laporan registrasi peliputan b. Laporan data liputan perbulan 1.5
Tempat dan Waktu Kerja Praktek Kerja praktek ini dilaksanakan di dinas pendidikan Provinsi Kepulauan Riau
bagian Kepri Cyber School Television yang beralamat di jl. Di pandjaitan km.8.
4
1.6
Metode Penelitian Metode penelitian adalah suatu kegiatan ilmiah yang dilakukan dengan
teknik yg teliti dan sistematik. Metodologi penelitian merupakan suatu proses yang digunakan untuk memecahkan suatu masalah secara logis, dimana memerlukan data-data untuk mendukung terlaksananya suatu penelitian. Metodologi ini akan dijelaskan dalam bentuk pengumpulan data dan metode pengembangan sistem. Adapun metode penelitian yang penulis gunakan yaitu metode waterfall. 1.6.1 Metode Pengumpulan Data Metode Pengumpulan Data merupakan teknik atau cara yang dilakukan untuk mengumpulkan data. Dalam pelaksanaan kegiatan pengumpulan data yang menjadi dasar dan untuk melengkapi laporan kerja praktek ini, maka digunakan teknik yang umum dalam kegiatan ilmiah, yaitu : a. Wawancara (Interview), yaitu kegiatan berupa tanya jawab langsung dengan orang yang berkaitan dengan pengelolaan data. b. Observasi, pengamatan langsung dimana dilaksanakan kerja praktek ini. c. Studi Literatur, pengumpulan data secara tidak langsung, yaitu dengan mengumpulkan data-data liputan yang berhubungan dengan penulisan laporan kerja praktek ini.
5
1.6.2 Metode Pengembangan Perangkat Lunak Perangkat Lunak adalah kumpulan beberapa perintah komputer yang dieksekusi oleh mesin komputer dalam menjalankan pekerjaannya yaitu memproses informasi. Metode pengembangan sistem yang digunakan dalam membangun pengolahan data liputan ini menggunakan model waterfall
yang
menyarankan pengembangan perangkat lunak secara sistematik dan berurutan yang dimulai dari tingkatan sistem tertinggi dan berlanjut ke tahap analisis, desain, pengkodean, pengujian dan pemeliharaan. Kelebihan dari metode ini adalah terstuktur, dinamis, dan sequintal.
Gambar 1.1 Model Waterfall (Nugroho, 2005)
Tahapan model air terjun (waterfall) adalah sebagai berikut : a. Kebutuhan sistem ( Requirement system )
6
Proses pencarian kebutuhan diintensifkan dan di fokuskan pada software. Untuk mengetahui sifat dari program yang akan dibuat, Melakukan pengumpulan data dan penetapan kebutuhan semua elemen sistem. b. Analisa (Analysis) Melakukan analisis terhadap permasalahan yang dihadapi dan menetapkan kebutuhan perangkat lunak, fungsi performasi dan iterfacing. c. Perancangan ( Design ) Proses ini digunakan untuk mengubah kebutuhan-kebutuhan diatas menjadi tampilan program atau aplikasi sebelum coding di mulai. Design harus dapat mengimplementasikan kebutuhan yang telah di sebutkan pada tahap sebelumnya. d. Pembuatan Program/pengkodean ( Coding ) Pengkodean yang mengimplementasikan hasil dan design ke dalam kode/bahasa yang di mengerti oleh mesin komputer dengan bahasa pemrograman tertentu. e. Pengujian ( Implementasi dan Testing ) Untuk dapat dimengerti oleh mesin, dalam hal ini komputer, maka design tadi harus di ubah bentuknya menjadi bentuk yang dapat dimengerti oleh mesin, yaitu ke dalam bahasa pemrograman melalui proses coding. Tahap ini merupakan implementasi dari tahap design yang secara teknis nantinya dikerjakan oleh programmer. Kegiatan ini untuk
7
melakukan pengetesan program yang sudah benar atau belum diuji dengan cara manual jika testing sudah benar . f. Perawatan ( Maintenence ) Pemeliharaan suatu software sangat di perlukan, termasuk di dalamnya adalah pengembangan, karena software yang dibuat tidak selamanya hanya seperti itu. Ketika di jalankan mungkin saja masih ada kesalahan kecil yang tidak di temukan sebelumnya, atau ada penambahan fitur-fitur yang belum ada pada software tersebut. Pengembangan diperlukan ketika adanya perubahan dari perusahaan seperti penggantian sistem operasi atau perangkat lainnya. Dengan menggunakan Metode Waterfall sangat efektif, karena setiap tugas yang diberikan kepada setiap bagian harus diselesaikan terlebih dahulu, tahap demi tahap setelah itu dilanjutkan ketahap atau tugas berikutnya secara berurutan.
8
1.7
Perencanaan Jadwal Kerja Praktek Untuk pengerjaan aplikasi pengolahan data liputan di Kepri Cyber School
Television ini dilakukan selama 2 semester perkuliahan dari tanggal 6 November 2012 sampai tanggal 20 Mei 2013 untuk mengumpulkan data dan analisis, dengan pengaturan waktu berikut ini : Tabel 1.1 Waktu Pelaksanaan Kerja Praktek N o 1.
Kegiatan
Bulan
Pengumpulan Data November - Observasi 2012 - Wawancara November 2012 November - Kajian Pustaka 2012
2.
Analisis Sistem
3.
Desain
4.
Pengkodean
5.
Pengujian
6.
Pemeliharaan
7.
Pembuatan Laporan
8.
Bimbingan
November 2012
Minggu
Pertama Kedua
Ketiga Keempat
Desember 2012
Pertama
Januari 2012
PertamaKedua
Januari 2013
Pertama
Januari 2013
Pertama
November 2012 April 2013 November 2012 – Mei 2013
Realisasi Pada hari selasa, 6 November 2012 Senin, 12 November 2012, dilakukan wawancara. Mengumpulkan datadata dan teori-teori dari beberapa sumber. Menyimpulkan kebutuhan perusahaan ke dalam sistem. Membuat gambaran sistem yang akan dibangun dengan permasalahan yang ada. Membangun sistem dengan aplikasi visual basic .Net . Memastikan sistem yang dibuat sesuai dengan apa yang diharapkan. Melakukan perbaikanperbaikan kecil yang diperlukan. Pembuatan laporan yang dimulai dengan BAB I s.d BAB VI. Bimbingan dilakukan sebanyak 11 kali
9
1.8
Sistematika Penulisan Sistematika penulisan ini disusun dalam beberapa bab dan sub bab, yang
masing-masing saling mempunyai keterkaitan dalam bahasannya. Adapun sistematika penulisan kerja praktek ini sebagai berikut : BAB I PENDAHULUAN, Bab ini berisi uraian tentang latar belakang masalah, rumusan masalah yang berisi identifikasi masalah, batasan masalah, tujuan kerja praktek, waktu dan tempat kerja praktek, metodologi penelitian serta sistematika penulisan yang berisikan penjelasan ringkasan per bab. BAB II LANDASAN TEORI, Bab ini menjelaskan tentang pengertian atau teori-teori yang digunakan sebagai penjelasan dari permasalahan yang dibahas. BAB III ANALISIS SISTEM, Bab ini menguraikan tentang masalah atau kelemahan yang terdapat di sistem yang lama dan menguraikan kebutuhan sistem agar dapat diusulkan untuk menyelesaikan masalah pada sistem yang lama. BAB IV PERANCANGAN SISTEM, Bab ini menguraikan tentang perancangan proses yaitu flowmap, diagram konteks, data flow diagram (DFD), hirarki proses, perancangan basis data yaitu perancangan media penyimpanan dan entity relationship diagram (ERD), serta perancangan antarmuka. BAB V IMPLEMENTASI SISTEM, Bab ini berisi tentang uji coba sistem dan program, dan manual instalasi.
10
BAB VI PENUTUP, Bab ini memberikan kesimpulan tentang hasil-hasil yang dicapai dalam perancangan perangkat lunak dan saran untuk pengembangan perangkat lunak berikutnya.
BAB II LANDASAN TEORI
2.1
Pengertian Data Menurut Jogiyanto HM, data adalah” … bentuk yang masih mentah yang
belum dapat bercerita banyak sehingga perlu diolah lebih lanjut.” 1 Untuk menghasilkan sebuah informasi, data harus diolah terlebih dahulu dengan menggunakan model proses tertentu. Informasi yang dihasilkan dapat membantu user dan mengambil keputusan dan melakukan tindakan yang sesuai dengan keputusan yang diambil. Tindakan ini akan menghasilkan sejumlah data kembali. Keseluruhan proses ini dinamakan proses pengolahan data. 2.2
Pengolahan Data Pengolahan data adalah suatu proses perubahan data dengan menggunakan
suatu model proses yang kemudian diubah menjadi informasi
dimana penerima
informasi akan membuat keputusan dan mengambil tindakan yang akan membuat sejumlah data. 2 Dalam proses pengolahan data, terdapat dua hal penting yang harus ada, yaitu sistem pengolahan data dan masalah yang akan diselesaikan. Untuk mendapatkan hasil yang berguna berupa informasi bagi user, data mealui sejumlah thap kegiatan yang disebut dengan siklus pengolahan data. 1 2
Prof.Dr.Jogiyanto HM, MBA, Analisis dan, 2005,hal.8 Prof.Dr.Jogiyanto HM, MBA, Analisis dan, 2005,hal.9
11
12
2.3
Pengertian Sistem 3
Kumpulan dari bagian-bagian yang bekerja sama untuk mencapai tujuan yang
sama. (Hanif Al Fatta ., 2007 : 3). Menurut Murdick dan Ross didalam buku ( Hanif Al Fatta ., 2007 : 3) definisi sistem adalah : “perangkat elemen yang di gabungkan satu dengan lainnya untuk suatu tujuan bersama.” Sedangkan definisi lain Menurut Webster’s didalam buku ( Hanif Al Fatta ., 2007 : 3) definisi sistem adalah : “Sistem adalah elemen-elemen yang saling berhubungan dan membentuk satu kesatuan atau organisasi.” Sementara menurut Mc.Leod didalam buku ( Hanif Al Fatta, 2007 : 4 ) definisi sistem adalah : “Sekelompok elemen-elemen yang terintegrasi dengan maksud yang sama untuk mencapai suatu tujuan.” Sumber daya mengalir dari elemen output dan untuk menjamin prosesnya berjalan dengan baik maka dihubungkan dengan mekanisme control. Untuk lebih jelasnya elemen sistem tersebut dapat digambarkan dengan model sebagai berikut:
3
Hanif Al Fatta, Pengertian Sistem, 2007 : 3,4.
13
Gambar 2.1 Model Hubungan Elemen-Elemen Sistem
Banyak ahli mengajukan konsep sistem dengan deskripsi yang berbeda, tetapi pada prinsipnya hampir sama dengan konsep dasar sistem umumnya. Schronderberg (1971) dalam Suradinata (1996) secara ringkas menjelaskna bahwa sistem adalah 4; 1. Komponen-komponen yang saling berhubungan satu sama lain. 2. Suatu keseluruhan tanpa memisahkan komponen pembentuknya. 3. Bersama-sama dalam mencapai tujuan. 4. Memiliki input dan output yang dibutuhkan oleh sistem lainnya. 5. Terdapat proses yang mengubah input menjadi output. 6. Menunjukan adanya entropi. 7. Memiliki aturan. 8. Memiliki subsistem yang lebih kecil. 9. Memiliki deferensiasi antar subsistem. 4
Hanif Al Fatta, Analisis dan perancangan sistem Informasi,. hal : 5
14
10. Memiliki tujuan yang sama meskipun mulainya berbeda. 2.4
Kateristik Sistem Menurut Hanif Al Fatta (2007 : 5) untuk memahami atau mengembangkan
suatu sistem, maka perlu membedakan unsur-unsur dari sistem yang membentuknya. Berikut adalah karakteristik sistem yang dapat membedakan suatu sistem dengan sistem lainnya ; 1. Batasan (boundary) Penggambaran dari suatu elemen atau unsur mana yang termasuk di dalam sistem dan mana yang di luar sistem. 2. Lingkungan (environment) Segala sesuatu diluar sisstem, lingkungan yang menyediakan asumsi, kendala, dan input terhadap suatu sistem. 3. Masukan (input) Sumber daya (data, bahan baku, peralatan, energi) dari lingkungan yang dikonsumsi dan dimanipulasi oleh suatu sistem. 4. Keluaran (output) Sumber daya atau produk (informasi, laporan, dokumen, tampilan layar komputer, barang jadi) yang disediakan untuk lingkungan sistem oleh kegiatan dalam suatu sistem. 5. Komponen (component)
15
Kegiatan-kegiatan atau proses dalam suatu sistem yang mentransformasikan input menjadi bentuk setengah jadi (output). Komponen ini bisa merupakan subsistem dari sebuah sistem. 6. Penghubung (interface) Tempat dimana komponen atau sistem dan lingkungannya bertemu dan berinteraksi. 7. Penyimpanan (storage) Area yang dikuasi dan digunakan untuk penyimpanan sementara dan tetap dari informasi, energi, bahan baku, dan sebagainya. Penyimpanan merupakan suatu media penyangga di antara komponen tersebut bekerja dengan berbagai tingkatan yang ada dan memungkinkan komponen yang berbeda dari berbagai data yang sama.
2.5
Sistem Informasi 5
Menurut Robert A. Leitch dan K. Roscoe Davis yang telah dikutip dalam buku
( Jogiyanto H. M., 1995 : 11 ) dalam bukunya menyebutkan : “Sistem informasi adalah suatu sistem di dalam suatu organisasi yang mempertemukan kebutuhan pengolahan transaksi harian, mendukung operasi, bersifat manajerial dan kegiatan strategi dari suatu organisasi dan menyediakan bagi pihak luar berupa laporan-laporan yang diperlukan.”
5
Jogiyanto H. M., Sistem informasi halaman 11
16
Sedangkan menurut John F. Nash dan Martin B Robert didalam buku ( Jogiyanto H. M., 1995 : 8 ) adalah : “Sistem informasi merupakan kombinasi dari manusia, fasilitas atau alat teknologi, media prosedur dan pengendalian yang dimaksud menata jaringan komunikasi yang penting, pengolahan atas transaksi-transaksi tertentu dan rutin, membantu manajemen, pemakai intern dan ekstern serta menyediakan dasar pengambilan keputusan yang tepat.” Sistem informasi dapat didefinisikan sebagai suatu alat untuk menyajikan informasi dengan cara sedemikian rupa sehingga bermanfaat bagi penerimanya (Kertahadi, 1995). Tujuannya adalah untuk menyajikan informasi guna pengambilan keputusan pada perencanaan, pemrakarsaan, pengorganisasian, pengendalian kegiatan operasi subsistem untuk perusahaan, dan menyajikan sinergi organisasi pada proses (Murdick dan Ross, 1993). Dengan demikian, sistem informasi berdasarkan konsep (input, Processing output – IPO) dapat di lihat pada gambar berikut 6:
Gambar 2.2 Konsep Sistem Informasi
6
Hanif Al Fatta, Analisis dan perancangan sistem Informasi,. hal : 9
17
2.6
Konsep Dasar Sistem Informasi Menurut Jogiyanto (2005 : 11) telah diketahui bahwa informasi merupakan hal
yang sangat penting bagi manajemen di
dalam pengambilan keputusan.
Pertanyaannya adalah dari mana informasi tersebut bisa didapatkan?. Informasi dapat diperoleh dari sistem informasi (information system) atau disebut juga dengan processing systems atau information processing systems atau information-generating systems. Sistem informasi didefinisikan oleh Robert A. Leith dan K. Roscoe Davis sebagai berikut : “Sistem informasi adalah suatu sistem di dalam suatu organisasi yang mempertemukan kebutuhan pengolahan transaksi harian, mendukung operasi, bersifat manajerial dan kegiatan strategi dari suatu organisasi dan menyediakan pihak luar tertentu dengan laporan-laporan yang diperlukan”.
2.7
Pengertian Informasi Informasi merupakan hal yang sangat penting bagi manajemen didalam
pengambilan keputusan. Sumber-sumber informasi untuk pengambilan keputusan, bisa diperoleh baik dari sumber internal maupun eksternal. Menurut Robert N Anthony dan John Dearden didalam buku (Davis,1995 : 89) mendefinisikan informasi sebagai berikut : “Informasi adalah data yang telah diolah menjadi bentuk yang lebih berarti dan bermanfaat dalam pengambilan keputusan saat ini atau mendatang”. Informasi
18
yang dihasilkan tersebut haruslah berkualitas, karena informasi merupakan landasan bagi manajemen dalam pengambilan keputusan.” Telah diketahui bahwa informasi merupakan hal yang sangat penting bagi manajemen di dalam pengambilan keputusan.Informasi dapat diperoleh dari sistem informasi (system information) atau disebut processing Sistem atau Information Processing Sistem. Sistem informasi di definisikan oleh Robert A. Leitch dan K. Roscoe Davis didalam buku ( Jugiyanto, 1999 : 37) sebagai berikut: “Sistem informasi adalah suatu sistem dalam sebuah organisasi yang mempertemukan kebutuhan pengolahan transaksi harian, mendukung operasi, bersifat managerial dan kegiatan strategi dari suatu organisasi dan menyediakan pihak luar tertentu dengan laporan-laporan yang diperlukan”. 2.8
Siklus Informasi Menurut Andri Kristanto (2008 : 10) data yang masih merupakan bahan mentah
apabila tidak diolah maka data tersebut tidak berguna. Data tersebut akan berguna dan menghasilkan suatu informasi apabila diolah melalui suatu model. Model yang digunakan untuk mengolah data tersebut disebut dengan model pengolahan data atau lebih dikenal dengan nama siklus pengolahan data.
19
Gambar 2.3 Siklus Pengolahan Data7 Dari gambar diatas dapat dijelaskan bahwa data yang merupakan suatu kejadian yang menggambarkan kenyataan yang terjadi dimasukan melalui elemen input kemudian data tersebut akan diolah dan diproses menjadi suatu output, dan output tersebut adalah informasi yang dibutuhkan. Informasi tersebut akan diterima oleh pemakai atau penerima, kemudian penerima akan memberikan umpan balik yang berupa evaluasi terhadap informasi tersebut dan hasil umpan balik tersebut akan menjadi data yang akan dimasukan menjadi input kembali. Begitu seterusnya. 2.9
Kualitas Informasi Menurut Jogiyanto (2005 : 10). Kualitas dari suatu informasi (quality of
information) tergantung dari tiga hal, yaitu informasi harus akurat (accurate), tepat pada waktunya (timeliness) dan relevan (relevance).
7
Andi Kristanto., Perancangan Sistem informasi dan Aplikasinya halaman 10
20
Gambar 2.4 Kualitas Informasi (Sumber : Analisis dan Desain. Oleh : Jogiyanto) Dari gambar 2.2 diatas dapat dijelaskan sebagai berikut : 1. Akurat : Informasi harus bebas dari kesalahan-kesalahan dan tidak bisa atau menyesatkan. Akurat juga berarti informasi harus jelas mencerminkan maksudnya. Informasi harus akurat karena dari sumber informasi sampai ke penerima informasi kemungkinan banyak terjadi gangguan (noise) yang dapat merubah atau merusak informasi tersebut. 2. Tepat pada waktunya : Informasi yang datang pada penerima tidak boleh terlambat. Informasi yang sudah usang tidak akan mempunyai nilai lagi. Karena informasi merupakan landasan di dalam pengambilan keputusan. Bila pengambilan keputusan terlambat, maka dapat berakibat fatal untuk organisasi. Dewasa ini mahalnya nilai informasi disebabkan harus cepatnya
21
informasi tersebut didapat, sehingga diperlukan teknologi mutakhir untuk mendapatkan, mengolah dan mengirimkannya. 3. Relevan : Informasi tersebut mempunyai manfaat untuk pemakaiannya. Relevansi informasi untuk tiap-tiap orang satu dengan yang lainnya berbeda. Misalnya informasi mengenai sebab-sebab kerusakan mesin produksi kepada akuntan perusahaan adalah kurang relevan dan akan lebih relevan bila ditujukan kepada ahli teknik perusahaan. Sebaliknya informasi mengenai harga pokok produksi untuk ahli teknik merupakan informasi yang kurang relevan, tetapi relevan untuk akuntan. Dalam bab ini berisi tentang uraian teoritis mengenai pengertian-pengertian, metode penyusunan data serta mengenai bahasa pemrograman yang digunakan. 2.10 Definisi Peliputan Peliputan adalah suatu kegiatan yang dilakukan untuk pengambilan gambar atau berita acara yang meliputi berbagai hal, yang berkenaan dengan ketersediaan dan kesiapan peralatan (mulai dari kamera video, lampu, peralatan lain yang dibutuhkan, dsb.). Peliutan terbagi menjadi dua kategori yaitu : 1. Liputan Terjadwal Liputan terjadwal adalah liputan yang memang sudah direncanakan atau diagendakan.
22
2. Liputan tak Terjadwal Liputan tak terjadwal adalah liputan yang dilakukan karena suatu peristiwa terjadi secara tiba-tiba dan akan dilakukan liputan pada hari itu juga. 2.11 Profil Perusahaan 2.11.1 Sejarah KCS-TV Sejalan dengan kebijakan pembangunan pendidikan nasional dan dalam rangka berpartisipasi untuk ikut serta pemerataan kesempatan pendidikan dan meningkatkan mutu pembelajaran bagi masyarakat maka Dinas Pendidikan Propinsi Kepulauan Riau telah ikut membangun Infrastruktur Multimedia yang dapat dimanfaatkan untuk pemerataan pendidikan dan peningkatan kualitas pembelajaran. Pembangunan infrastruktur multimedia ini didasari oleh kesadaran akan adanya tantangan global dalam proses pembelajaran yang mengadopsi Pembelajaran Abad 21 (21st Century Learning), yaitu sebuah kesadaran akan adanya perubahan sebagai berikut: 1. Tantangan budaya / masyarakat global, semakin terbukanya dunia tanpa batas yang membuat masyarakat dunia berinteraksi tanpa memandang asal bangsa, letak geografis dan interaksi yang menciptakan budaya global
23
2. Teknologi Informasi Komunikasi (TIK) terintegrasi dalam pembelajaran, perkembangan teknologi informasi memungkinkan untuk dimanfaatkan dalam proses kegiatan belajar mengajar baik di kelas maupun di luar kelas kompetensi SDM berbasis teknologi informasi, dalam setiap kesempatan kompetisi di dunia luar (di luar sekolah) maka sdm yang memiliki kompetensi dalam teknologi informasi selalu memiliki nilai lebih. 2.11.2 TUJUAN Tujuan didirikannya KCS-TV atau disebut juga Kepri Cyber School adalah memperluas kesempatan setiap warga masyarakat untuk memperoleh pendidikan dengan kualitas yang setara tidak terbatasi oleh kendala geografis dan waktu, dan meningkatkan mutu pendidikan dengan metode pembelajaran beragam
memanfaatkan
teknologi
multimediadan
memudahkan
proses
pembelajaran baik bagi tenaga pengajar (guru) maupun peserta belajar (siswa). Kepri Cyber School ini terdiri dari studio multimedia, transmisi televisi, aplikasi e-learning, serta aplikasi sistem informasi manajemen sekolah. Selain itu, kami juga mendirikan pusat data (data center) dan pusat operasi jaringan (network operations center) yang terpusat di gedung Dinas Pendidikan Provinsi Kepulauan Riau dan tersambung ke 12 sekolah dengan menggunakan teknologi wireless agar sekolah-sekolah ini dapat memanfaatkan fasilitas e-learning, sistem informasi manajemen sekolah dan TV berbasis IP (internet protocol) atau yang biasa disebut IP TV.
24
Dengan adanya Kepri Cyber School ini, selain dapat dimanfaatkan oleh ke 12 sekolah, juga dapat dimanfaatkan oleh masyarakat umum melalui siaran televisi yang menggunakan frekuensi UHF. Sehingga siaran pendidikan yang dipancarkan dari studio kami, dapat dinikmati oleh masyarakat di rumah yang berada di wilayah kota tanjungpinang. 2.12 Struktur Organisasi Struktur organisasi perusahaan adalah salah satu alat bagi manajemen dalam pembagian tugas dan tanggung jawab serta wewenang di dalam mempermudah pencapaian
tujuan.
Dan
untuk
mendukung
rencana
pengembangan
serta
memantapkan pelayanan maka KCS-TV telah menetapkan struktur organisasi yang memadai. Dengan struktur organisasi yang baik maka diharapkan akan memudahkan koordinasi antar bagian dan setiap bagian akan mengetahui wewenang dan tanggung jawabnya dalam melakukan pekerjaan demi kelancaran operasi perusahaan.
25
Gambar 2.5 Struktur Organisasi Kepri Cyber School Television
26
1. Kepala dinas a. Bertanggung jawab sepenuhnya dalam melaksanakan tugasnya untuk kepentingan dinas pendidikan dalam mencapai maksud dan tujuannya. b. Merencanakan, mengembangkan, menerapkan kebijakan dan tujuan dinas pendidikan. 2. Kepala balai a. Mengkoordinir kegiatan yang berada dibawah struktur organisasinya. b. Mengatur tugas, jadwal kerja dan membimbing bawahannya serta mengamati perfomance untuk memastikan kesesuaian dengan peraturanperaturan pelaksanaan prosedur kerja. 3. Kepala Produksi a. Mengatur jadwal liputan dan mengkordinir dalam melaksanakan kegiatan liputan. Bertanggung jawab atas kelancaran kerja bawahannya. 3.1. Pemberitaan a. Menjalankan aktivitas kegiatan liputan yang sesuai dengan jadwal yang telah diterapkan oleh kepala produksi. 3.2. Website a. Mengelola liputan menjadi data dan diposting melalui website resminya. 3.3. Data & Pustaka Media a. Mengarsipkan atau menyimpan data liputan yang telah dikerjakan.
27
4. Pengujian program penyiaran a. Menguji konten pembelajaran yang akan di tanyangkan berbasis kurikulum yang ada di indonesia. b. Menguji tingkat kualitas audio dan video konten yang akan di tayangkan. 5. Teknik a. Mengkordinasikan tayangan-tayangan yang berbentuk live show. 5.1. Teknik produksi & penyiaran a. Mengatur jadwal kegiatan live show. 5.2. Camera & lighting a. Mengoprasikan dan menjalankan camera sesuai prosedur SOP (Standar Operasional Prosedur). 5.3. Audio & audio vtr a. Mengoprasikan sistem penyangan dalam berbentuk live show maupun typing. b. Mengecek audio video dalam suatu proses tayangan live show maupun typing. 5.4. Switcher & com a. Mengatur perpindahan gambar dari kamera satu ke kamera lainya. b. Merekam aktivitas kegiatan penayangan perhari. 5.5. Ob van & view a. Bertanggung jawab atas kelancaran siaran langsung melalui mobil pemancar.
28
b. Bertugas
meliput
kegiatan
dilapangan
secara
langsung
menggunakan mobil siaran transmisi. 2.13 Konsep Pemodelan Sistem Beberapa konsep sistem yang penting untuk lebih mudah memahami pengertian sistem dan sistem informasi lebih jauh maka perlu diingat beberapa konsep yang penting dalam pengembangan sistem, yaitu 8 : 2.13.1
Dekomposisi
Untuk menganalisa dan memahami secara menyeluruh sebuah sistem yang besar, biasanya dibutuhkan waktu yang cukup lama. Untuk mempermudah pekerjaan ini digunakan konsep dekomposisi. Dengan komposisi adalah pembagian sistem ke dalam komponen-komponen yang lebih kecil (subsistem). Dekomposisi memiliki beberapa keutungan, diantaranya : a. Analisis menjadi lebih mudah mengatur dan menganalisa setiap subsistem secara lebih detail b. Pada pengembangan sistem, sistem bisa didekomposisi menjadi beberapa modul. Pengembangan beberapa modul bisa dilakukan secara paralel dengan syarat tidak ada ketergantungan antar modul yang dibangun. 2.13.2
Modularitas
Konsep modularitas berhubungan dengan dekomposisi. Pada saat melakukan dekomposis, diharapkan sistem yang besar terbagi menjadi subsistem-subsistem yang relatif sama ukurannya. Dengan modul-modul ini 8
Hanif Al Fatta, Analisis dan perancagan sistem informasi, Andi, hal.8, 2007, Yogyakarta.
29
maka beban kerja mengembangkan sistem bisa didistribusikan secara merata pada semua sumber daya yang ada. Pengembangan sistem jadi lebih sederhana karena hanya terfokus pada satu modul terlebih dahulu, baru dilakukan integrasi antar modul. 2.13.3
Coupling
Dari modul-modul yang kita peroleh, kadang-kadang ditemukan beberapa modul yang memiliki ketergantungan dengan modul yang lain. Pada kasus seperti ini, modul-modul yang saling bergantungan harus dipasangkan (dicouple). Dengan cara ini bisa di ketahui bisa diketahui modul yang bisa bekerja secara independen dan modul-modul yang harus diselesaikan terlebih dahulu sebelum modul yang lain bisa bekerja. 2.13.4
Kohesi
Dari proses coupling antar modul, kita bisa dapatkan kelompok-kelompok modul dengan karakteristik yang hampir sama. Disini muncul konsep kohesi di mana kelompok modul itu harus dianalisa bersama-sama dengan kelompok modul yang saling berkohesi. Analisis-analisis yang digunakan dalam melakukan suatu pemodelan proses umumnya adalah sebagai berikut : 1. Diagram Sistem Prosedur ( Flowmap ) Gambaran sistem mengenai prosedur secara grafik dengan menggunakan simbol-simbol diagram alir.
30
2. Diagram Konteks ( Context Diagram ) DFD pertama dalam proses bisnis. Menunjukkan konteks di mana proses bisnis dalam 1 proses tunggal (proses 0). Diagram konteks juga menunjukkan semua entitas luar yang menerima informasi dari atau memberikan informasi ke sistem. 3. Data Flow Diagram (DFD) Data Flow Diagram menujukkan semua proses utama yang menyusun keseluruhan sistem. Untuk membaca suatu DFD kita harus memahami dulu, elemen-elemen yang menyusun suatu DFD. Ada empat elemen yang menyusun sutu DFD yaitu :9 1. Proses : Aktivitas atau fungsi yang dilakukan untuk alasan bisnis yang spesifik, biasa berupa manual maupun terkomputerisasi. 2. Data Flow : Suatu data tunggal atau kumpulan logis suatu data, selalu diawali atau berakhir pada suatu proses. 3. Data Store : Kumpulan data yang disimpan dengan cara tertentu. Data yang mengalir disimpan dalama data store. Aliran data di update atau ditambahkan ke dalam data store. 4. External Entity : Orang, organisasi, atau sistem yang berada diluar sistem tetapi berintraksi dengan sistem.
9
Hanif Al Fatta, Analisis dan Perancangan Sistem Informasi, hal.106
31
2.14 Konsep Basis Data (Database) 2.14.1
Pengertian Basis Data
Basis data adalah kumpulan informasi yang terorganisasi dan disajikan untuk tujuan khusus. Basis data terkomputerisasi dapat di-update sebab file tersusun rapih, informasi dapat dibaca serta dicari dengan cepat dan di-retrieve menggunakan komputer. Teknnologi basis data sudah diperkenalkan untuk mengganti sistem pengolahan data pada pertengahan tahun 1960.Suatu basis data adalah suatu koleksi / kumpulan dari data yang disimpan secara berhubungan yang melayani kebutuhan dari berbagai pengguna di dalam satu atau banyak organisasi. Sistem manajemen basis data (DBMS) dikembangkan untuk mengatasi berbagai kesulitan dalam penggunaan sistem pengolahan file. Sistem manajemen basis data (DBMS) adalah suatu sistem perangkat lunak kompleks yang mengatur permintaan dan penyimpanan data ke dan dari disk. DBMS menyediakan keamanan (security), privacy (privacy), integritas (integrity) dan kontrol konkurensi (conrrency controls). DBMS menyediakan semua layanan dasar yang diperlukan untuk mengorganisir dan memelihara basis data, termasuk layanan berikut : 10 a. Memindahkan data ked dan dari file-file data fisik jika dibutuhkan. b. Mengelola akses data oleh berbagai pengguna secara bersamaan, untuk mencegah pengupdate-an secara bersamaan. 10
Janner Simarmata, Perancangan Basis Data, Andi, Ed.1, hal.13, 2007, Yogyakarta.
32
c. Mengelola transaksi sehingga masing-masing perubahan transaksi basis data berhasil atau tidak sama sekali. d. Mendukung bahasa query (query language). e. Membeckup basis data dan pemulihan dari kegagalan. f. Mekanisme keamanan untuk mencegah perubahan dan akses data yang tidak sah. 2.14.2
Entity Relationship Diagram (ERD)
Model Entity Relationship yang berisi komponen-komponen himpunan entitas dan himpunan relasi yang masing-masing dilengkapi dengan atributatribut yang mereprentasikan seluruh fakta dari dunia nyata yang kita tinjau, dapat digambarkan dengan lebih sistematis dengan menggunakan Diagram Entity Relationship Notasi-notasi simbolik dalam Diagram E-R yang kita gunakan adalah sebagai berikut : 1. Persegi panjang,menyatakan himpunan entitas. 2. Lingkaran / Elip, menyatakan atribut (atribut yang berfungsi sebagai key digaris bawahi). 3. Belah ketupat, menyatakan himpunan relasi 4. Garis, sebagai penghubung antara himpunan relasi dengan himpunan entitas dan himpunan entitas dengan atributnya.
33
2.14.3
Jenis Kerelasian Antar Entitas (relationship)
Suatu kerelasian antara dua buah entitas akan merepresentasikan suatu kunci penghubung atau file transaksi. Jenis kerelasian 1-ke-1 dan n-ke-n, umumnya memerlukan file transaksi, sedangan jenis kerelasian 1-ke-n umumnya memerlukan atribut sebagai kunci penghubung. Pada gambar 2.3 dalah gambar simbol kerelasian antar entitas (Sutanta, 2004)11.
Tabel 2.1 Simbol Kerelasian Antar Entitas
Kerelasian antar entitas dikelompokkan dalam 3 jenis, yaitu (Silberschatz, 2001) : a. Kerelasian jenis 1-ke-1/satu ke satu (one to one) : Kerelasian jenis ini terjadi jika kejadian atau transaksi di antara dua entitas yang berhubung
11
Edhy Sutanta, Basis Data Dalam Tinjauan Konseptual, Andi, Ed.1, hal.102, 2011, Yogyakarta.
34
hanya memungkinkan terjadi sebuah kejadian atau transaksi pada kedua entitas. b. Kerelasian jenis n-ke-1/banyak ke satu (many to one) atau 1-ke-n/satu ke banyak (one to many) : Kerelasian jenis ini terjadi jika kejadian atau transaksi di antara dua entitas yang berhubungan hanya memungkinkan terjadi satu kali dalam entitas pertama dan dapat terjadi lebih dari satu kali kejadian atau transaksi pada entitas kedua. c. Kerelasian jenis n-ke-n/banyak ke banyak (many to many) : Kerelasian jenis ini terjadi jika kejadian atau transaksi diantara dua entitas yang berhubungan memungkinkan terjadi lebih dari satu kali dalam entitas pertama dan entitas kedua. 2.14.4
Perancangan Model Data
1. Data Capturing : Suatu proses pengumpulan data yang dijadikan bahan untuk dilakukuannya proses komputerisasi, data-data dikumpulkan bisa berupa formulir, nota, laporan, dan dokumen-dokumen lain yang relevan dengan permasalahan. 2. Normalisasi : Normalisasi adalah teknik yang digunakan untuk memvalidasi model data. Serangkaian aturan diberlakukan pada data model logis untuk meningkatkan pengaturannya. 12
12
Hanif Al Fatta, Analisis dan perancangan sistem informasi, Andi, hal.129, 2007, Yogyakarta.
35
2.15 Tools yang digunakan 2.15.1
Crystal Report 8.5
Crystal report merupakan program khusus untuk membuat laporan yang terpisah dari program Microsoft Visual .NET, tetapi keduanya dapat dihubungkan. Berikut ini merupakan interface atau tampilan dari dari crystal report 8.5
Gambar 2.6 Interface Antar Muka Crystal Report 8.5
36
2.15.2 13
Visual Basic 2008 Visual Basic berawal dari bahasa BASIC yang dikembangkan mulai dari
tahun 1963. BASIC adalah singkatan dari Beginner’s All Purpose Symbolic Instruction Code. Sesuai namanya, bahasa BASIC dibuat untuk tujuan memudahkan pengguna agar dapat dengan mudah mempelajari, membuat, dan mengembangkan program komputer. Visual Basic merupakan pengembangan lebih lanjut dari bahasa BASIC yang dilakukan oleh Microsoft. Visual Basic ditujukan sebagai perangkat untuk membuat dan mengembangkan program secara cepat (Rapid Application Development: RAD). Terutama jika menggunakan antarmuka berbasis windows (Graphical User Interface: GUI). Visual Basic 1.0 merupakan versi pertama Visual Basic dan dirilis pada tahun 1991. Visual Basic 1.0 ditujukan untuk sistem operasi Microsoft DOS. Selanjutnya diteruskan dengan Visual Basic 2.0 di tahun 1992, versi 3.0 tahun 1993, versi 4.0 tahun 1995, versi 5.0 tahun 1997, dan versi 6.0 tahun 1998. Visual Basic 6.0 sangat populer dan masih banyak dipakai hingga saat ini. Sayangnya, dukungan terhadap Visual Basic 6 telah dihentikan oleh Microsoft mulai bulan Maret 2008. Namun, program yang dibuat dengan Visual Basic 6 masih dapat dijalankan pada sistem operasi terbaru seperti Windows Server 2008 maupun Windows Vista. 13
Rachmad Hakim S., Visual Basic 2008 for Pemula Banget, hal.2.
37
Visual Basic .NET diluncurkan Februari 2002, merupakan penerus dari Visual Basic 6.0 dan menggunakan platform .NET yang berbeda dengan Visual Basic sebelumnya. Ada beberapa terminologi yang sebaiknya diketahui dengan jelas. Visual Basic, merupakan bahasa dan aturan pemrograman yang harus ditaati dalam menuliskan perintah-perintah agar program dapat dikompilasi. Visual Studio 2008, merupakan aplikasi IDE (Integrated Development Environment) yang digunakan untuk mengembangkan software. Di dalam aplikasi IDE inilah tersedia berbagai fitur yang memudahkan pemrograman, seperti kompilasi, debugging, pengaturan projek, mengedit antarmuka secara visual, dll. .NET Framework, merupakan library dan virtual machine yang terus berkembang mengikuti teknologi terbaru. Versi .NET Framework dimulai dari versi 1.0, 1.1, 2.0, 3.0, dan 3.5. Versi .NET yang terbaru biasanya dirilis dengan perbaikan serta dukungan terhadap teknologi baru sehingga semakin memudahkan pengembangan software. Pemrograman dengan Visual Basic dibuat dengan beberapa tahap berikut: 1. Menuliskan kode program dengan bantuan aplikasi IDE. Artinya, Anda menuliskan program menggunakan aplikasi Microsoft Visual Studio 2008 atau Visual Basic 2008.
38
2. Mengompilasi kode program tersebut menjadi program yang dapat dijalankan/dieksekusi.
Hasil
kompilasi
adalah
instruksi
CIL
(Common
Intermediate Language) atau MSIL (Microsoft Intermediate Language) yang hanya dimengerti oleh kompiler JIT (Just In Time) dan tidak dapat dieksekusi langsung pada komputer. 3. Penyebaran (distribusi) program di komputer dengan .NET Framework.
Gambar 2.7 Tahapan Penulisan Kode Program, Kompilasi, Eksekusi Hasil Kompilasi dengan JIT
39
MSIL atau sekarang disebut dengan CIL merupakan bahasa yang bersifat netral (tidak tergantung sistem operasi dan hardware komputer). Kompilasi JIT dilakukan oleh Common Language Runtime (CLR) untuk mengubah bahasa CIL yang bersifat netral (platform independent), menjadi kode yang dapat dibaca oleh perangkat keras (hardware) dan sistem operasi yang digunakan (platform sekarang).
Gambar 2.8 Tahap Pengembangan Software dengan Visual Studio 2008 .NET Framework .NET Framework merupakan software kerangka kerja yang menghubungkan antara aplikasi .NET dengan sistem operasi yang secara garis besar terdiri dari:
Library, berisi kode-kode siap pakai dan banyak dibutuhkan oleh programmer.
40
Virtual machine, berupa aplikasi yang digunakan untuk menjalankan program hasil kompilasi.
Gambar 2.9 Antara aplikasi .NET, .NET Framework, dan Sistem Operasi
Gambar 3.0 Interface pada Aplikasi Visual Basic 2008
41
Tabel 2.2 keterangan interface visual basic 2008 .NET
Interface
Menu bar Toolbar
Keterangan
Menu standar pada Visual Basic atau Visual Studio 2008 Daftar tool (perangkat) untuk menjalankan perintah yang sering digunakan
Toolbox
Daftar kontrol yang dapat ditambahkan ke dalam program sebagai antarmuka (interface)
Form Designer
Digunakan untuk mengedit tampilan form serta mengatur posisi kontrol pada form
Solution Explorer
Digunakan untuk mengolah file dan projek berhubungan dengan Solution
Properties
Digunakan untuk mengedit properti dari form dan kontrol yang sedang diedit
Error list
Menampilkan pesan error jika ada kesalahan
2.15.3
Microsoft Access 2003
Microsoft Access 2003 merupakan salah satu program pengolah database yang canggih, yang digunakan untuk mengolah berbagai jenis data dengan pengoperasian yang mudah. Diantaranya, dapat melakukan proses penyortiran, pengaturan data, pembuatan label data serta pembuatan laporan kegiatan seharihari, (Madcoms, 2003).
42
Microsoft Access 2003 memiliki beberapa keunggulan yaitu: 1. Database window toolbar untuk mempercepat proses pembuatan, pendataan dan pengolahan objek database. 2. Fasilitas grup untuk mengelompokkan objek di dalam database. 3. Menampilkan sub data pada objek label, query dan form. Microsoft access 2003 bisa menyimpan informasi dalam banyak tabel yang saling berhubungan, sehingga disebut dengan database relasional. Jika informasi dalam sebuah database relasional dapat diorganisir dengan cepat kita bisa menganggap tabel tersebut sebagai sebuah area penyimpanan tunggal, dan dapat menarik informasi secara elektronik dari tabel berbeda dalam urutan yang akan diinginkan. Kelebihan-kelebihan dari Microsoft Access 2003: 1. Bisa membuat database yang terstruktur. 2. Bisa membuat suatu database relasional dengan menggunakan aplikasi pemrograman Visual tertentu. 3. Bisa untuk menjalankan Quary sesuai dengan tabel-tabel yang telah ditentukan. 4. Bisa untuk membuat report (Laporan) sesuai dengan informasi yang diinginkan.
43
5. Bisa untuk memacu dalam merancang sebuah form sesuai dengan bahasa pemrograman tertentu.
BAB III ANALISIS SISTEM
Tujuan analisis sistem yang berjalan yaitu untuk memperoleh gambaran tentang sistem yang dipergunakan atau yang sedang berjalan didalam KCS-TV yang mana didalam proses pelayanan yang diberikan kepada para customer yang ada pada KCSTV masih belum berjalan maksimal, karena proses penanganan petugas pada customer yang ada masih dilakukan secara manual, mulai dari input data customer dan untuk mengetahui jadwal produksi yang kosong cukup lama karena perlu mencari satu per satu data yang ada apakah sudah diisi atau belum.
3.1
Analisis Data Analisis data yang dilakukan adalah pada dua jenis data yaitu data masukkan
dan data keluaran sebagai laporan yang dihasilkan oleh sistem. 1. Data Masukkan a. Data registrasi Berisi tentang data-data atau identitas customer. 2. Data Keluaran a. Laporan registrasi, pembatalan produksi, dan pengambilan hasil produksi
44
45
Merupakan laporan yang berisi informasi-informasi tentang data-data registrasi customer, pembatalan produksi customer, dan pengambilan hasil produksi. 3.2
Analisis Prosedur Analisis prosedur merupakan prosedur-prosedur yang sedang berjalan di KCS-
TV dapat dilihat sebagai berikut : 1. Prosedur registrasi customer adalah sebagai berikut : a. Petugas memberi formulir registrasi kepada customer untuk diisi. b. Setelah formulir diisi oleh customer diberikan lagi kepetugas. c. Petugas mengecek kelengkapan data, jika data tidak lengkap maka diberikan lagi ke customer. Jika data lengkap formulir akan diberikan ke bagian produksi. d. Bagian produksi akan mengecek jadwal produksi, jika jadwal telah terisi maka formulir diberikan kepada petugas dan diinformasikan kepada customer bahwa jadwal produksi sudah terisi, jika jadwal kosong maka formulir diberikan kepada petugas dan diberikan lagi ke customer untuk ditandatangani. e. Formulir yang sudah ditandatangani customer akan diberikan kepada kepala bagian untuk ditandatangani. f. Formulir yang telah ditandatangani customer dan kepala bagian akan diberikan lagi kepada petugas.
46
g. Customer akan melakukan pembayaran. h. Petugas membuat nota pembayaran 3 rangkap yang akan diberikan kepada customer 2 rangkap adalah nota bukti pembayaran dan nota pengambilan hasil liputan , dan untuk petugas. i. memberikan nota pembayaran kepada customer. j. Petugas membuat laporan registrasi 2 rangkap, dan diberikan kepada bagian produksi untuk diarsipkan dan diberikan kepada kepala bagian untuk diarsipkan.
47
Gambar 3.1 flowmap registrasi customer
48
2. Prosedur pembatalan produksi oleh customer : a. Customer menyerahkan nota pembayaran, nota yang berwarna putih dan kuning kepada petugas. b. Uang customer hanya kembali 50% dari biaya produksi. c. Petugas membuat laporan pembatalan produksi 2 rangkap, diberikan kepada bagian produksi dan kepala bagian untuk diarsipkan.
Gambar 3.2 flwomap berjalan pembatalan produksi
49
3. Prosedur pengambilan hasil produksi : a. Customer memberikan nota bayar yang berwarna putih dan kuning kepada petugas. b. Petugas menyerahkan hasil produksi kepada customer beserta nota bayar yang berwarna putih dan kuning. c. Customer menandatangani nota pengambilan. d. Customer memberikan nota yang berwarna kuning kepada petugas dan nota yang berwarna putih untuk customer sebagai bukti nota pembayaran customer. e. Petugas membuat laporan pengambilan hasil produksi, dan diberikan kepada kepala bagian untuk diarsipkan.
50
Gambar 3.3 flowmap berjalan pengambilan hasil produksi
51
3.3
Analisis Dokumen Analisis dokumen merupakan proses untuk mengetahui spesifikasi dan
informasi yang ada pada suatu dokumen. Dokumen yang digunakan oleh petugas adalah sebagai berikut : 1. Formulir Registrasi Fungsi
: Untuk mengisi data customer
Sumber
: Petugas.
Media
: Kertas.
2. Nota Bayar Fungsi
: 1. Untuk Bukti pembayaran Costumer (Putih). : 2. Untuk diarsipkan petugas (Merah). : 3. Pengambilan Hasil Liputan (Kuning).
Sumber
: Petugas
Media
: Kertas
3. Laporan keluar Fungsi
: Untuk melaporkan data customer
Sumber
: Petugas.
Media
: Kertas.
52
3.4
Permasalahan Pada Sistem yang Sedang Berjalan Karena sistem yang berjalan yang dilakukan oleh petugas masih dikerjakan
secara manual, maka ditemukan adanya beberapa kelemahan dan kekurangan yang ada, yaitu sebagai berikut : 1. Efisiensi Dalam pelayanan kepada customer dan pembuatan laporan yang dilakukan oleh petugas masih dilakukan secara manual, ini merupakan suatu kendala bagi petugas karena memerlukan waktu yang cukup lama. Maka diharapkan dengan ditetapkan sistem komputerisasi penyajian laporan menjadi lebih baik dan efisien. 2. Keakuratan Data Dalam pembuatan laporan yang dilakukan oleh petugas masih dilakukan secara manual sehingga mengakibatkan data kurang akurat. Pengolahan data dengan komputer diharapkan menjamin keakuratan data-data yang disajikan. 3. Ketepatan Waktu Karena sulit dan lamanya proses yang dilakukan secarang manual, maka keterlambatan informasi bisa terjadi, padahal ketepatan waktu sangatlah penting dalam menghasilkan informasi.
53
4. Pencarian Data Pada Proses pengarsipan secara manual pencarian data sangat sulit dilakukan karena harus mencari data yang begitu banyak, dengan menggunakan komputer pencarian data dapat dengan cepat dilakukan. 3.5
Gambaran Sistem yang di Usulkan Untuk meningkatkan efisiensi dan efektifitas kerja dibutuhkan suatu sistem
informasi registrasi yang mendukung kinerja petugas dalam proses registrasi dan pelayanan terhadap customer serta sistem komputerisasi
dengan menggunakan
komputer sebagai alat bantu primer. Perangkat lunak tersebut mampu memanipulasi data-data registrasi yang ada sehingga proses penyimpanan data diatur sedemikian rupa serta data yang disimpan mudah untuk didapatkan kembali, proses pengecekan data registrasi mudah dilakukan, update data bisa cepat serta laporan registrasi selalu siap kapan saja diperlukan. 3.6
Analisis Kebutuhan Sistem Dalam sistem informasi registrasi yang dikomputerisasikan diperlukan
beberapa komponen untuk mendukung berjalannya sistem diantaranya : 3.6.1 Analisis Keluaran Program Data keluaran yang dihasilkan oleh aplikasi pengolahan data liputan KCS-TV
adalah
Laporan
registrasi
customer,
pengambilan hasil produksi, dan penghasilan.
pembatalan
produksi,
54
3.6.2 Analisis Kebutuhan Pengguna Analisis pengguna dibutuhkan untuk menjalankan sistem yang sudah dibuat dapat digunakan oleh pengguna atau petugas yang ditetapkan oleh KCSTV. 3.6.3 Analisis Kebutuhan Fungsional Analisi fungsional dilakukan untuk mengetahui apakah sistem yang dibangun benar-benar berfungsi dengan baik atau tidak. Adapun kebutuhan fungsional dari aplikasi pengolahan data liputan KCS-TV adalah sebagai berikut: a. Sistem harus dapat melakukan entry registrasi customer yang akan diliput: 1. Pengguna dapat melakukan entry pendataan customer. 2. Pengguna dapat melakukan entry data kegiatan yang diajukan oleh customer. 3. Pengguna dapat melakukan entry pendataan konsep liputan. 4. Pengguna dapat melakukan entry pendataan equipment. 5. Program dapat menghitung otomatis berdasarkan data konsep liputan dan equipment. 6. Program dapat mencari data customer berdasarkan order nomor. 7. Pengguna jadwal mengecek jadwal produksi. b. Sistem harus dapat melakukan entry pembatalan liputan:
55
1. Pengguna dapat membatalkan liputan berdasarkan oder nomor costumer. 2. Program dapat mengurangi hasil pendapatan liputan 3. Pengguna dapat membuat laporan pembatalan liputan c. Sistem harus dapat melakukan entry pengambilan hasil liputan: 1. Pengguna dapat mengetahui status costumer dan merubahnya 2. Pengguna dapat membuat nota tanda terima pengambilan hasil liputan. 3. Pengguna dapat membuat laporan jadwal liputan. 3.6.4 Analisis Kebutuhan Perangkat Keras Hardware yang dibutuhkan dalam pembangunan
aplikasi pengolahan
data KCS-TV berupa Personal Computer (PC) atau komputer yang dapat mendukung program Visual Basic.NET adapun spesifikasi hardware dapat disesuaikan. 3.6.5 Analisis Kebutuhan Perangkat Lunak Aplikasi yang dibangun akan berjalan diatas suatu sistem operasi, menimbang sistem operasi yang sudah umum digunakan, maka sistem yang akan dibangun menggunkan sistem operasi Microsoft windows. Adapun untuk testing debugging tentunya diperlukan aplikasi khusus debugging atau sederhananya toolpemrograman. Dalam hal ini digunakan VisualBasic.NET sebagai debugging atau pemrogramming tool.
BAB IV PERANCANGAN SISTEM
Perancangan sistem ini merupakan tahapan lanjutan dari proses analisis masalah. Didalam perancangan sistem akan menjelaskan proses dari setiap tahapan yang akan dilakukan didalam pengembangan sistem aplikasi ini. Perancangan sistem ini nantinya akan membantu dalam pembuatan aplikasi sesuai dengan proses yang ditentukan, berikut ini adalah tahapan – tahapan dari proses tersebut antara lain : 1. Flow Map 2. Diagram Konteks (Context Diagram) 3. Data Flow Diagram ( DFD ) 4. Entity Relationship Diagram ( ERD ) 5. Rancangan Struktur Program 6. Rancangan Struktur File 7. Rancangan Antar Muka
4.1
Flow Map Pada Flow Map yang diusulkan hanya menambahkan sistem manual dengan
sistem komputerisasi. Pada sistem baru yang akan dikembangkan dimana data tersebut akan disimpan kedalam harddisk dan sebagainya, prosedur dibawah ini menjelaskan atau menerangkan sistem baru yang diusulkan pada KCS-TV.
56
57
1.
Flowmap Usulan Registrasi Customer a. Petugas mengecek jadwal produksi, jika terisi maka diinformasikan ke customer, jika kosong petugas akan menginput data regitrasi customer. b. Petugas akan mencetak formulir. c. Formulir diberikan kepada customer untuk ditandatangani. d. Formulir diberikan lagi kepada petugas, dan petugas meberikan formulir kepada kepala bagian untuk di tandatangani. e. Petugas menginput data customer. f. Customer melakukan pembayaran. g. Petugas mencetak nota bayar 3 rangkap. h. Nota bayar diberikan customer 2 rangkap, dan 1 untuk petugas. i. Petugas membuat laporan registrasi customer 2 rangkap untuk bagian produksi dan kepala bagian.
58
Gambar 4.1 Flowmap Usulan Registrasi Customer
59
2.
Flowmap Usulan Pembatalan Produksi a. Customer memberikan nota bayar kepada petugas. b. Petugas mengecek data customer dan melakukan pembatalan ditabel pembatalan. c. Petugas akan mengembalikan uang customer 50%. d. Petugas mencetak laporan pembatalan produksi 2 rangkap dan diberikan kepada bagian produksi dan kepala bagian.
60
Gambar 4.2 Flowmap Usulan Pembatalan Produksi
61
3.
Flowmap Usulan Pengambilan Hasil Produksi a. Customer menyerahkan nota pengambilan yang berwarna kuning. b. Petugas mengisi data bahwa hasil produksi diambil. c. Petugas memberikan hasil produksi kepada customer bersamaan dengan nota bayar. d. Nota bayar akan di tandatangani oleh customer. e. Customer memberikan nota bayar yang berwarna kuning kepada petugas. Nota yang berwarna putih untuk customer sebagai nota bayar customer. f. Petugas mencetak laporan pengambilan hasil produksi 2 rangkap, diberikan kepada bagian produksi dan kepala bagian.
62
Gambar 4.3 Flowmap Usulan Pengambilan Hasil Produksi
63
4.2
Diagram Konteks Diagram konteks merupakan gambaran secara global untuk memudahkan
pemahaman terhadap suatu sistem yang menggambarkan aliran data yang masuk kedalam sistem dan yang keluar dari sistem menuju entitas-entitas eksternal. Diagram konteks pada Pengolahan Data Liputan KCS-TV dapat dilihat pada gambar dibawah ini.
Gambar 4.4 Diagram Konteks
64
4.3
Data Flow Diagram (DFD) Diagram flow diagram level 0 pada Aplikasi Pengolahan Data KCS-TV dapat
dilihat pada gambar dibawah ini :
Gambar 4.5 DFD Level 0
65
Berikut ini merupakan DFD level 1 proses 1 yang menjelaskan tentang proses penginputan data registrasi yang dapat dilihat sebagai berikut:
Gambar 4.6 DFD Level 1 Proses 1 Berikut ini merupakan DFD level 1 proses 2 yang menjelaskan tentang proses penginputan data pembatalan yang dapat dilihat sebagai berikut:
Gambar 4.7 DFD Level 1 Proses 2
66
Berikut ini merupakan DFD level 1 proses 3 yang menjelaskan tentang proses penginputan data pengambilan yang dapat dilihat sebagai berikut:
Gambar 4.8 DFD Level 1 Proses 3
67
Berikut ini merupakan DFD level 1 proses 4 yang menjelaskan tentang proses cetak laporan dan cetak nota bayar yang dapat dilihat sebagai berikut:
Gambar 4.9 DFD Level 1 Proses 4
68
4.4
Entity Relationship Diagram (ERD) Entity Relationship Diagram (ERD) pada KCS-TV dapat di lihat pada gambar
dibawah ini :
Gambar 5.0 ERD
Penjelasan pada ERD: 1. Satu customer dapat melakukan satu kali registrasi. 2. Satu customer dapat melakukan satu kali pembatalan produksi. 3. Satu customer dapat melakukan satu kali pengambilan hasil produksi. 4.5
Rancangan Struktur Program Struktur program ini penyelesaian tentang sistem yang dipandang dari elemen
data, elemen kontrol, modul-modul dan hubungan modul. Untuk lebih jelasnya dapat dilihat pada gambar berikut:
69
Gambar 5.1 Struktur Program Pengolahan Data Liputan 4.6
Rancangan Struktur File Struktur File merupakan urutan isi atau data-data item yang terdaftar pada
sebuah record. File yang dipakai untuk Pengolahan Data KCS-TV ada 4 file yaitu, tabel login, tabel pembatalan, tabel pengambilan, dan tabel registrasi untuk lebih jelasnya dapat dilihat pada tabel-tabel dibawah ini. 1. Struktur File Data Registrasi Nama Tabel
: Registrasi
Primary key
: Order_Nomor Tabel 2.3 Struktur File Data Registrasi
No.
Nama Field
Type
Lebar
Keterangan
1
Order_Nomor
Text
8
Primary key
70
2
Nama_Pmhn
Text
31
Not Null
3
Jabatan_Pmhn
Text
31
Not Null
4
Instansi
Text
31
Not Null
5
Lokasi_Pmhn
Text
31
Not Null
6
Operasional
Text
31
Not Null
7
Nama_Kegiatan
Terxt
31
Not Null
8
tanggal
Date/Time
-
Not Null
9
Jam
Date/Time
-
Not Null
10
lokasi
Text
30
Not Null
11
pic
Number
-
Not Null
12
No_HP
Number
-
Not Null
13
Jenis_liputan
Text
21
Not Null
14
Narsum
Text
30
Not Null
15
Naskah
Text
10
Not Null
16
Kamera
Text
30
Not Null
17
Tripot
Text
30
Not Null
18
Mic
Text
30
Not Null
19
Info_lain
Text
30
Not Null
20
Biaya
Number
-
Not Null
21
Tanggal_daftar
Date/Time
-
Not Null
71
2. Struktur File Data Pembatalan Nama Tabel
: Pembatalan
Primary key
: Order_Nomor Tabel 2.4 Struktur File Data Pembatalan
No
Nama Field
Type
Lebar
Keterangan
1
Order_Nomor
Text
30
Primery key
2
Nama_pmhn
Text
30
Not Null
3
Lokasi_pmhn
Text
30
Not Null
4
No_HP
Number
-
Not Null
5
Tanggal
Date/Time
-
Not Null
6
Jam
Date/Time
-
Not Null
7
Status
Text
30
Not Null
3. Struktur File Data Pengambilan Nama Tabel
: Pengambilan
Primary key
: Order_Nomor Tabel 2.5 Struktur File Data Pengambilan
No
Nama Field
Type
Lebar
Keterangan
1
Oreder_Nomor
Text
30
Primery key
2
Nama_pmhn
Text
30
Not Null
72
3
Lokasi_pmhn
Text
30
Not Null
4
No_HP
Number
-
Not Null
5
Tanggal
Date/Time
-
Not Null
6
Penerima
Text
30
Not Null
7
Pengambilan
Text
30
Not Null
4.7
Perancangan Antar Muka (User Interface) Perancangan antar muka (User Interface) merupakan tampilan menu pada
Pengolahan Data Liputan KCS-TV. Perancangan antar muka ini terdiri dari perancangan input dan perancangan output. 4.7.1 Struktur Menu Struktur menu Sistem pengolahan data liputan merupakan rancangan tampilan menu terdiri dari beberapa sub yang digunakan dalam program sistem pengolahan data.
Gambar 5.2 Struktur Menu Pengolahan Data Liputan
73
4.7.2 Perancangan Input Output Program Adapun perancangan input output program dapat dilihat dibawah ini.
Gambar 5.3 Perancangan Antarmuka Login
Gambar 5.4 Perancangan Antarmuka Menu Utama
74
Gambar 5.5 Perancangan Antarmuka Registrasi
Gambar 5.6 Peramcamgan Antarmuka Pembatalan
75
Gambar 5.7 Perancangan Antarmuka Pengambilan
Gambar 5.8 Laporan Formulir Registrasi
76
Gambar 5.9 Laporan Pembatalan
Gambar 6.0 Laporan Pengambilan
77
Gambar 6.1 Jadwal Produksi
BAB V IMPLEMENTASI SISTEM
Bab ini penulis menguraikan beberapa hal yang dilakukan dalam proses pada sistem, uraian instalasi pada Pengolahan Data Liputan KCS-TV berikut penulis uraikan beberapa tahapan Implementasi Sistem. 5.1
Kebutuhan Perangkat Keras Perangkat keras yang diperlukan untuk keperluan menjalankan Pengolahan
Data Liputan KCS-TV adalah dengan spesifikasi minimal sebagai berikut: 1.Intel Pentuim 4. 2.Hardisk 40 Gb. 3.Memori 1 Gb. 4.Mouse dan Keyboard. 5.Monitor. 6.Printer. 5.2
Kebutuhan Perangkat Lunak Untuk mendukung Pengolahan Data Liputan KCS-TV selain perangkat keras
dibutuhkan juga perangkat lunak sebagai pendukung untuk menjalankan aplikasi diantaranya sebagai berikut :
78
79
1.Sistem Operasi Microsoft Windows7. 2.NET Framework 3.5 3.Microsoft Access 2003. 4.Crystal Report 8.5. 5.3
Kegiatan Implementasi Kegiatan implementasi ini antara lain : a. Pembuatan program Pemrograman
merupakan
kegiatan
yang
sangat
menunjang
terselenggaranya aplikasi yang baru karena pemrograman yang baik dan terstruktur dapat menghasilkan suatu informasi sesuai dengan kebutuhan. Sebelum aplikasi diterapkan maka aplikasi harus diuji coba terlebih dahulu agar terbatas dari kesalahan-kesalahan yang mungkin terjadi. Pengujian aplikasi dapat dilakukan untuk setiap modul program (Program Utama, Sub Program, Modul Koneksi) yang dilanjutkan dengan pengujian semua modul untuk meyakinkan semua modul sudah terintegrasi tanpa kesalahan. b. Pengujian sistem Pengujian Sistem ini dilakukan untuk memeriksa kekompakan antar komponen Sistem dengan tujuan utamanya selain itu juga untuk memastikan elemen-elemen sistem berfungsi sesuai dengan yang diharapkan. c. Pengujian program Dengan pengujian program ini diharapkan program dapat menerima dengan baik, memproses dan memberikan keluaran program yang baik pula.
80
Tahap pengujian ini dilakukan menggunakan metode black box. Pengujian black box adalah pengujian yang berdasarkan fungsi dasar dari masing-masing proses pada program. Tahap pengujian ini dilakukan untuk proses input misalnya input data customer. Kemudian tahap selanjutnya dilakukan pengujian terhadap laporan-laporan yang dihasilkan oleh program. Uji coba black box berusaha untuk menemukan kesalahan dalam beberapa kategori, diantaranya : 1. Fungsi-fungsi yang salah atau hilang 2. Kesalahan interface 3. Kesalahan dalam struktur data atau akses database eksternal 4. Kesalahan performa 5. kesalahan inisialisasi dan terminasi 5.4
Manual Instalasi 1. Manual Program Pembuatan instalasi memanfaat kan fasilitas yang ada pada visual basic .Net sehingga menghasilkan file ekstensi setup.exe. apabila kita jalankan maka akan program akan langsung terinstalasi pada komputer. Untuk databasenya sudah lansung terkoneksi dengan program karena berada dalam direktori yang sama.
81
2. Pemeliharan Sistem Agar data dalam database tersimpan dengan aman maka harus melakukan pemeliharaan data. hal ini sangat berguna agar data kita aman dari kehilangan data. Melakukan backup dengan cara mengcopy database accessnya dan sebaiknya dilakukan secara berkala 5.5
Hasil Implementasi Hasil perancangan kedalam sebuah sistem dan aplikasi yang kemudian akan
memperlihatkan output sebagai hasil implementasi. Kegiatan implementasi meliputi implementasi basis data, implementasi antar muka.
Gambar 6.2 Form Login
82
Gambar 6.3 Form Menu Utama
Gambar 6.4 Form Registrasi
83
Gambar 6.5 Nota Bayar
Gambar 6.6 Form Pembatalan
84
Gambar 6.7 Form Pengambilan
Gambar 6.8 Cetak Formulir
85
Gambar 6.9 Laporan Pembatalan Produksi
Gambar 7.0 Laporan Pengambilan Hasil Produksi
86
Gambar 7.1 Jadwal Produksi
Gambar 7.2 Laporan Pendapatan Perbulan
87
BAB VI PENUTUP
6.1
Kesimpulan Berdasarkan hasil proses perancangan dan pembuatan perangkat lunak yang
dibuat untuk KCS-TV, penulis menyimpulkan bahwa : 1. Dengan adanya Pengolahan Data Liputan ini proses pengerjaan menjadi lebih cepat. 2. Pengecekan jadwal produksi dapat dilakukan dengan cepat. 3. Pembuatan laporan dapat dilakukan dengan mudah dan tepat waktu. 4. 6.2
Pencarian data menjadi lebih mudah jika terjadi kesalahan.
Saran Guna membantu atau mempermudah Pengolahan Data Liputan serta
meningkatkan efesiensi dan efektifitas kerja adapun perbaikan-perbaikan yang perlu diadakan dalam pengembangan perangkat lunak ini antara lain : 1. Diperlukan back up data sebagai cadangan apabila terjadi suatu kerusakan terhadap media penyimpanan. 2. Perlu perawatan dan pengembangan lebih lanjut agar program ini dapat memberikan pelayanan yang lebih baik. 3. perlu dikembangkan menjadi suatu jaringan dikarenakan program ini masih bersifat berdiri sendiri.
DAFTAR PUSTAKA Al Fatta , Hanif, Analisis dan Perancangan Sistem Informasi, penerbit Yogyakarta Hakim , Rachmad S., Visual Basic 2008 for Pemula Banget, hal.2, Penerbit Yogyakarta Jogiyanto H. M., Sistem informasi halaman 11,Penerbit Bandung Kristanto,Andi,Perancangan Sistem informasi dan Aplikasinya halaman
10,
Penrbit Bandung Nugroho, Ardi, analisis dan perancangan sistem dengan metode berorientasi objek, informatika, hal:125, 2005, Bandung. Simarmata,Janner, Perancangan Basis Data, Andi, Ed.07, Penerbit Yogyakarta. http://elib.unikom.ac.id/download.php?id=4759
Login Imports System.Data.OleDb Public Class login Private Sub btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkeluar.Click Close() End Sub Private Sub btnok_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnok.Click str = " select * from login where username='" & txtuser.Text & "' and password='" & txtpaswd.Text & "'" cmd = New OleDbCommand(str, kon) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then txtpaswd.Text = "" txtuser.Text = "" With Menuutama .Button1.Enabled = True .Button2.Enabled = True .Button3.Enabled = True .Button4.Enabled = True .Button5.Enabled = True .Button6.Enabled = True .Button7.Enabled = True End With Me.Hide() With Menuutama .btnlogin.Enabled = False End With Else MsgBox("Username atau Password Salah") End If End Sub Private Sub login_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Call koneksi() End Sub Private Sub txtpaswd_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtpaswd.KeyDown If e.KeyCode = Keys.Enter Then btnok.PerformClick() End If End Sub End Class
Menu Utama Public Class Menuutama Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click registrasi.Show() End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click pembatalan.Show() End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click pengambilan.Show() End Sub Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click Close() login.Close() End Sub Private Sub Menuutama_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Button1.Enabled = False Button2.Enabled = False Button3.Enabled = False Button5.Enabled = False Button6.Enabled = False Button7.Enabled = False End Sub Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click cetak_laporan.Show() End Sub Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click laporan.Show() End Sub Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click pemasukan.Show() End Sub Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnlogin.Click
login.Show() End Sub End Class Registrasi Imports System.Data.OleDb Public Class registrasi Dim lokasi As String Dim jenis As String Dim narsum As String Dim naskah As String Dim kamera As String Dim tripot As String Dim hjenis As Integer Dim hnarsum As Integer Dim hnaskah As Integer Dim hkamera As Integer Dim htripot As Integer Dim hmic As Integer Dim total As Integer Sub bersih() txtorder.Text = "" txtnama.Text = "" txtlok.Text = "" txtlokasi.Text = "" txtnarsum.Text = "" txtnama.Text = "" txtoper.Text = "" txtperson.Text = "" txtnaskah.Text = "" txtmic.Text = "" txttripot.Text = "" txthp.Text = "" txtinfo.Text = "" txtinstansi.Text = "" txtjabatan.Text = "" txtjenis.Text = "" txtkamera.Text = "" txtkegiatan.Text = "" lbltot.Text = "" txtharga1.Text = "" txtharga2.Text = "" txtharga3.Text = "" txtharga4.Text = "" txtharga5.Text = "" txthmic.Text = "" rdbdok.Checked = False rdbhard.Checked = False rdbkamera.Checked = False
rdbnarsum1.Checked = False rdbnarsum2.Checked = False rdbkamera2.Checked = False rdbkamera3.Checked = False rdblain1.Checked = False rdbtripot.Checked = False rdbtripot2.Checked = False rdblain3.Checked = False rdblain2.Checked = False rdbsoft.Checked = False rdbstudio.Checked = False rdbtripot3.Checked = False rdboutdoor.Checked = False rdbnaskah1.Checked = False rdbnaskah2.Checked = False rdbnaskah3.Checked = False lbltgl.Text = Today End Sub Private Sub RadioButton3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdblain1.CheckedChanged txtlokasi.Enabled = True txtlokasi.Focus() End Sub Private Sub registrasi_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Call koneksi() lbltgl.Text = Today End Sub Private Sub btnsimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsimpan.Click If txtperson.Text = "0" Then MsgBox("Personal Tidak Boleh 0") Exit Sub ElseIf rdblain2.Checked = True And txtharga2.Text = "0" Then MsgBox("Masukan Harga Jenis Liputan") Exit Sub ElseIf rdblain3.Checked = True And txtharga1.Text = "0" Then MsgBox("Masukan Harga Narsum") Exit Sub ElseIf rdbnaskah3.Checked = True And txtharga3.Text = "0" Then MsgBox("Masukan Harga Naskah") Exit Sub ElseIf rdbkamera3.Checked = True And txtharga4.Text = "0" Then MsgBox("Masukan Harga Kamera") Exit Sub ElseIf rdbtripot3.Checked = True And txtharga5.Text = "0" Then MsgBox("Masukan Harga Tripot") Exit Sub
ElseIf txthmic.Text = "0" Then MsgBox("Masukan Harga Mic") Exit Sub End If Try If rdbstudio.Checked Then lokasi = rdbstudio.Text ElseIf rdboutdoor.Checked Then lokasi = rdboutdoor.Text ElseIf rdblain1.Checked Then lokasi = txtlokasi.Text End If If rdbsoft.Checked Then jenis = rdbsoft.Text hjenis = txtharga1.Text ElseIf rdbhard.Checked Then jenis = rdbhard.Text hjenis = txtharga1.Text ElseIf rdbdok.Checked Then jenis = rdbdok.Text hjenis = txtharga1.Text ElseIf rdblain3.Checked Then jenis = txtjenis.Text hjenis = txtharga1.Text End If If rdbnarsum1.Checked Then narsum = rdbnarsum1.Text hnarsum = txtharga2.Text ElseIf rdbnarsum2.Checked Then narsum = rdbnarsum2.Text hnarsum = txtharga2.Text ElseIf rdblain2.Checked Then narsum = txtnarsum.Text hnarsum = txtharga2.Text End If If rdbnaskah1.Checked Then naskah = rdbnaskah1.Text hnaskah = txtharga3.Text ElseIf rdbnaskah2.Checked Then naskah = rdbnaskah2.Text hnaskah = txtharga3.Text ElseIf rdbnaskah3.Checked Then naskah = txtnaskah.Text hnaskah = txtharga3.Text End If If rdbkamera.Checked Then kamera = rdbkamera.Text hkamera = txtharga4.Text ElseIf rdbkamera2.Checked Then kamera = rdbkamera2.Text
hkamera = txtharga4.Text ElseIf rdbkamera3.Checked Then kamera = txtkamera.Text hkamera = txtharga4.Text End If If rdbtripot.Checked Then tripot = rdbtripot.Text htripot = txtharga5.Text ElseIf rdbtripot2.Checked Then tripot = rdbtripot2.Text htripot = txtharga5.Text ElseIf rdbtripot3.Checked Then tripot = txttripot.Text htripot = txtharga5.Text End If hmic = txthmic.Text total = hjenis + hnaskah + hnarsum + hkamera + htripot + hmic lbltot.Text = total str = " insert into Registrasi values ('" & txtorder.Text & "','" & txtnama.Text & "','" & txtjabatan.Text & "','" & txtinstansi.Text & "','" & txtlok.Text & "','" & txtoper.Text & "','" & txtkegiatan.Text & "','" & dttgl.Text & "','" & dtjam.Text & "','" & lokasi & "','" & txtperson.Text & "','" & txthp.Text & "','" & jenis & "','" & narsum & "','" & naskah & "','" & kamera & "','" & tripot & "','" & txtmic.Text & "','" & txtinfo.Text & "','" & lbltot.Text & "','" & lbltgl.Text & "')" cmd = New OleDbCommand(str, kon) cmd.ExecuteNonQuery() str = " insert into temp values ('" & txtorder.Text & "','" & txtnama.Text & "','" & txtjabatan.Text & "','" & txtinstansi.Text & "','" & txtlok.Text & "','" & txtoper.Text & "','" & txtkegiatan.Text & "','" & dttgl.Text & "','" & dtjam.Text & "','" & lokasi & "','" & txtperson.Text & "','" & txthp.Text & "','" & jenis & "','" & narsum & "','" & naskah & "','" & kamera & "','" & tripot & "','" & txtmic.Text & "','" & txtinfo.Text & "','" & lbltot.Text & "','" & lbltgl.Text & "')" cmd = New OleDbCommand(str, kon) cmd.ExecuteNonQuery() MsgBox(" Data Berhasil Di simpan") cetaknota.Show() cetaknota.crv.ReportSource = Nothing cetaknota.crv.SelectionFormula = "{Registrasi.Order_Nomor}='" & txtorder.Text & "'" cetaknota.crv.ReportSource = "Nota.rpt" cetaknota.crv.RefreshReport() bersih() txtharga1.Text = "" txtharga2.Text = "" txtharga3.Text = "" txtharga4.Text = "" txtharga5.Text = ""
Catch ex As Exception MsgBox(" Data Tidak Berhasil DiSimpan") End Try End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click data.Show() End Sub Private Sub btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkeluar.Click Me.Dispose() End Sub Private Sub btnhapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnhapus.Click str = "select * from Registrasi where Order_Nomor='" & txtorder.Text & "'" cmd = New OleDbCommand(str, kon) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then str = "delete * from Registrasi where Order_Nomor='" & txtorder.Text & "'" cmd = New OleDbCommand(str, kon) cmd.ExecuteNonQuery() MsgBox(" Data Berhasil Di hapus") bersih() Else MsgBox(" Data Tidak Berhasil Di Hapus") End If End Sub Private Sub txtorder_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtorder.KeyPress If e.KeyChar = Chr(13) Then str = " select * from Registrasi where Order_Nomor='" & txtorder.Text & "'" cmd = New OleDbCommand(str, kon) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then txtnama.Text = rd.Item(1) txtjabatan.Text = rd.Item(2) txtinstansi.Text = rd.Item(3) txtlok.Text = rd.Item(4) txtoper.Text = rd.Item(5) txtkegiatan.Text = rd.Item(6) dttgl.Value = rd.Item(7) dtjam.Value = rd.Item(8)
txtperson.Text = rd.Item(10) txthp.Text = rd.Item(11) txtmic.Text = rd.Item(17) txtinfo.Text = rd.Item(18) lbltot.Text = rd.Item(19) lbltgl.Text = rd.Item(20) Else MsgBox("data tidak di temukan") 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 btnupdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnupdate.Click If rdbstudio.Checked Then lokasi = rdbstudio.Text ElseIf rdboutdoor.Checked Then lokasi = rdboutdoor.Text ElseIf rdblain1.Checked Then lokasi = txtlokasi.Text End If If rdbsoft.Checked Then jenis = rdbsoft.Text hjenis = 1000 ElseIf rdbhard.Checked Then jenis = rdbhard.Text hjenis = 1000 ElseIf rdbdok.Checked Then jenis = rdbdok.Text hjenis = 1000 ElseIf rdblain3.Checked Then jenis = txtjenis.Text hjenis = txtharga1.Text End If If rdbnarsum1.Checked Then narsum = rdbnarsum1.Text hnarsum = 1000 ElseIf rdbnarsum2.Checked Then narsum = rdbnarsum2.Text hnarsum = 1000 ElseIf rdblain2.Checked Then narsum = txtnarsum.Text hnarsum = txtharga2.Text End If If rdbnaskah1.Checked Then naskah = rdbnaskah1.Text hnaskah = 1000 ElseIf rdbnaskah2.Checked Then naskah = rdbnaskah2.Text
hnaskah = 1000 ElseIf rdbnaskah3.Checked Then naskah = txtnaskah.Text hnaskah = txtharga3.Text End If If rdbkamera.Checked Then kamera = rdbkamera.Text hkamera = 1000 ElseIf rdbkamera2.Checked Then kamera = rdbkamera2.Text hkamera = 1000 ElseIf rdbkamera3.Checked Then kamera = txtkamera.Text hkamera = txtharga4.Text End If If rdbtripot.Checked Then tripot = rdbtripot.Text htripot = 1000 ElseIf rdbtripot2.Checked Then tripot = rdbtripot2.Text htripot = 1000 ElseIf rdbtripot3.Checked Then tripot = txttripot.Text htripot = txtharga5.Text End If total = hjenis + hnaskah + hnarsum + hkamera + htripot + hmic lbltot.Text = total str = " update Registrasi set Nama_pmhn='" & txtnama.Text & "',Jabatan_pmhn='" & txtjabatan.Text & "',Instansi='" & txtinstansi.Text & "',Lokasi_pmhn='" & txtlok.Text & "',Operasional='" & txtoper.Text & "',Nama_kegiatan='" & txtkegiatan.Text & "',tanggal='" & dttgl.Text & "',jam='" & dtjam.Text & "',lokasi='" & lokasi & "',pic='" & txtperson.Text & "',no_hp='" & txthp.Text & "',Jenis_liputan='" & jenis & "',Narsum='" & narsum & "',Naskah='" & naskah & "',Kamera='" & kamera & "',Tripot='" & tripot & "',Mic='" & txtmic.Text & "',Info_lain='" & txtinfo.Text & "',Biaya='" & lbltot.Text & "',Tanggal_daftar='" & lbltgl.Text & "' where Order_Nomor='" & txtorder.Text & "'" cmd = New OleDbCommand(str, kon) cmd.ExecuteNonQuery() MsgBox("data Berhasil Di Update") bersih() End Sub Private Sub rdboutdoor_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdboutdoor.CheckedChanged txtlokasi.Enabled = False End Sub
Private Sub rdbstudio_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbstudio.CheckedChanged txtlokasi.Enabled = False End Sub Private Sub rdblain3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdblain3.CheckedChanged txtjenis.Enabled = True txtharga1.Enabled = True End Sub Private Sub rdbdok_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbdok.CheckedChanged txtjenis.Enabled = False txtharga1.Text = 300000 End Sub Private Sub rdbhard_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbhard.CheckedChanged txtjenis.Enabled = False txtharga1.Text = 200000 End Sub Private Sub rdbsoft_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbsoft.CheckedChanged txtjenis.Enabled = False txtharga1.Text = 1000000 End Sub Private Sub rdblain2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdblain2.CheckedChanged txtnarsum.Enabled = True End Sub Private Sub rdbnarsum2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbnarsum2.CheckedChanged txtnarsum.Enabled = False txtharga2.Text = 0 End Sub Private Sub rdbnarsum1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbnarsum1.CheckedChanged txtnarsum.Enabled = False
txtharga2.Text = 100000 End Sub Private Sub rdbnaskah3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbnaskah3.CheckedChanged txtnaskah.Enabled = True End Sub Private Sub rdbnaskah2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbnaskah2.CheckedChanged txtnaskah.Enabled = False txtharga3.Text = 0 End Sub Private Sub rdbnaskah1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbnaskah1.CheckedChanged txtnaskah.Enabled = False txtharga3.Text = 100000 End Sub Private Sub rdbkamera3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbkamera3.CheckedChanged txtkamera.Enabled = True End Sub Private Sub rdbkamera2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbkamera2.CheckedChanged txtkamera.Enabled = False txtharga4.Text = 200000 End Sub Private Sub rdbkamera_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbkamera.CheckedChanged txtkamera.Enabled = False txtharga4.Text = 100000 End Sub Private Sub rdbtripot3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbtripot3.CheckedChanged txttripot.Enabled = True End Sub
Private Sub rdbtripot2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbtripot2.CheckedChanged txttripot.Enabled = False txtharga5.Text = 200000 End Sub Private Sub rdbtripot_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdbtripot.CheckedChanged txttripot.Enabled = False txtharga5.Text = 100000 End Sub Private Sub btnctk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnctk.Click cetaknota.Show() cetaknota.crv.ReportSource = Nothing cetaknota.crv.SelectionFormula = "{Registrasi.Order_Nomor}='" & txtorder.Text & "'" cetaknota.crv.ReportSource = "NotA.rpt" cetaknota.crv.RefreshReport() End Sub
Private Sub dttgl_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles dttgl.ValueChanged End Sub Private Sub txthp_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txthp.KeyPress If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled = True End Sub Private Sub txtnama_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtnama.KeyPress If Not ((e.KeyChar >= "a" And e.KeyChar <= "z") Or e.KeyChar = vbBack) Then e.Handled = True End Sub Private Sub txtharga1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtharga1.KeyPress If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled = True End Sub Private Sub txtharga2_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtharga2.KeyPress
If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled = True End Sub Private Sub txtharga3_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtharga3.KeyPress If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled = True End Sub Private Sub txtharga4_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtharga4.KeyPress If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled = True End Sub Private Sub txtharga5_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtharga5.KeyPress If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled = True End Sub Private Sub txthmic_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txthmic.KeyPress If Not ((e.KeyChar >= "0" And e.KeyChar <= "9") Or e.KeyChar = vbBack) Then e.Handled = True End Sub End Class Pembatalan Produksi Imports System.Data.OleDb Public Class pembatalan Dim potong As Integer Dim hasil As Integer Dim aset As DataSet Sub bersih() txtlokasi.Text = "" txtnama.Text = "" txtoder.Text = "" txttlp.Text = "" End Sub Sub tampil() str = " select * from pembatalan" da = New OleDbDataAdapter(str, kon) ds = New DataSet ds.Clear() da.Fill(ds, "batal") dgv.DataSource = (ds.Tables("batal"))
End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Me.Dispose() End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click bersih() End Sub Private Sub btnbatal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnbatal.Click str = " select * from pembatalan where Order_Nomor='" & txtoder.Text & "'" cmd = New OleDbCommand(str, kon) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then MsgBox("GAGAL! registrasi Atas Nama " & rd.Item(1) & " sudah DIBATALKAN!!!!") Exit Sub End If str = " insert into pembatalan values ('" & txtoder.Text & "','" & txtnama.Text & "','" & txtlokasi.Text & "','" & txttlp.Text & "','" & dttgl.Value & "','" & dtjam.Value & "','" & LBLBATAL.Text & "')" cmd = New OleDbCommand(str, kon) cmd.ExecuteNonQuery() potong = lbltemp.Text * 0.5 lbltemp.Text = lbltemp.Text - potong str = "update Registrasi set Biaya='" & lbltemp.Text & "' where Order_Nomor='" & txtoder.Text & "'" cmd = New OleDbCommand(str, kon) cmd.ExecuteNonQuery() str = " delete * from temp where Order_Nomor ='" & txtoder.Text & "'" cmd = New OleDbCommand(str, kon) cmd.ExecuteNonQuery() bersih() tampil() End Sub Private Sub pembatalan_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Call koneksi() tampil() End Sub Private Sub txtoder_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtoder.KeyPress
If e.KeyChar = Chr(13) Then str = " select * from pengambilan where Order_Nomor='" & txtoder.Text & "'" cmd = New OleDbCommand(str, kon) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then MsgBox("PROSES PELIPUTAN SUDAH TERLAKSANA!!!!") ElseIf Not rd.HasRows Then str = " select * from registrasi where Order_Nomor='" & txtoder.Text & "'" cmd = New OleDbCommand(str, kon) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then txtnama.Text = rd.Item("Nama_pmhn") txtlokasi.Text = rd.Item("Lokasi_pmhn") txttlp.Text = rd.Item("No_HP") dttgl.Text = rd.Item("Tanggal") dtjam.Text = rd.Item("jam") lbltemp.Text = rd.Item("Biaya") Else MsgBox("Data Tidak Ada") End If End If End If End Sub End Class Pengambilan Hasil Produksi Imports System.Data.OleDb Public Class pengambilan Dim hari As Integer Sub bersih() txtpenerima.Text = "" txtorder.Text = "" txtnama.Text = "" txthp.Text = "" txtpmhn.Text = "" End Sub Sub selisih() Dim date1 As Date = dttgl.Value Dim date2 As Date = dtlama.Value Dim Dim Dim Dim
totalDays As Int32 = date1.DayOfYear - date2.DayOfYear totalWeeks As Int32 = date1.DayOfWeek - date2.DayOfWeek totalYears As Int32 = date1.Year - date2.Year totalMonths As Int32 = date1.Month - date2.Month
If totalDays < 0 Or totalYears < 0 Or totalYears < 0 Then
MsgBox("Tanggal Tidak Sesuai") Exit Sub End If End Sub Sub tampil() str = " select * from pengambilan" da = New OleDbDataAdapter(str, kon) ds = New DataSet ds.Clear() da.Fill(ds, "ambil") dgv.DataSource = (ds.Tables("ambil")) End Sub Private Sub pengambilan_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Call koneksi() tampil() selisih() End Sub Private Sub btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkeluar.Click Me.Dispose() End Sub Private Sub btnhapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnhapus.Click str = " delete * from pengambilan where Order_Nomor='" & txtorder.Text & "'" cmd = New OleDbCommand(str, kon) cmd.ExecuteNonQuery() bersih() tampil() End Sub Private Sub dgv_CellDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles dgv.CellDoubleClick txtorder.Text = dgv.SelectedCells(0).Value txtnama.Text = dgv.SelectedCells(1).Value txtpmhn.Text = dgv.SelectedCells(2).Value txthp.Text = dgv.SelectedCells(3).Value dttgl.Value = dgv.SelectedCells(4).Value txtpenerima.Text = dgv.SelectedCells(5).Value lblambil.Text = dgv.SelectedCells(6).Value End Sub Private Sub btnubah_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnubah.Click str = " Update pengambilan set Nama_pmhn='" & txtnama.Text & "',Lokasi_pmhn='" & txtpmhn.Text & "', No_HP='" & txthp.Text & "',Tanggal='" & dttgl.Value & "',Penerima='" & txtpenerima.Text &
"',pengambilan='" & lblambil.Text & "' where Order_Nomor='" & txtorder.Text & "'" cmd = New OleDbCommand(str, kon) cmd.ExecuteNonQuery() bersih() tampil() End Sub Private Sub btnsimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsimpan.Click hari = DateDiff(DateInterval.Day, CDate(dtlama.Text), CDate(dttgl.Text)) If Format(hari) = 0 Then ElseIf Format(hari) < 0 Then MsgBox("tanggal salah") Exit Sub ElseIf Format(hari) > "0" Then End If str = " select * from pembatalan where Order_Nomor='" & txtorder.Text & "'" cmd = New OleDbCommand(str, kon) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then MsgBox("GAGAL! registrasi Atas Nama " & rd.Item(1) & " hasil liputan sudah DIAMBIL!!!!") ElseIf txtpenerima.Text = "" Then MsgBox("isi data penerima") Else str = " insert into pengambilan values ('" & txtorder.Text & "','" & txtnama.Text & "','" & txtpmhn.Text & "','" & txthp.Text & "','" & dttgl.Value & "','" & txtpenerima.Text & "','" & lblambil.Text & "')" cmd = New OleDbCommand(str, kon) cmd.ExecuteNonQuery() str = " delete * from temp where Order_Nomor='" & txtorder.Text & "'" cmd = New OleDbCommand(str, kon) cmd.ExecuteNonQuery() bersih() End If tampil() End Sub Private Sub txtorder_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtorder.KeyPress If e.KeyChar = Chr(13) Then
str = " select * from pembatalan where Order_Nomor='" & txtorder.Text & "'" cmd = New OleDbCommand(str, kon) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then MsgBox("Registrasi Sudah Di BATALKAN!!!!") ElseIf Not rd.HasRows Then str = " select * from registrasi where Order_Nomor='" & txtorder.Text & "'" cmd = New OleDbCommand(str, kon) rd = cmd.ExecuteReader rd.Read() If rd.HasRows Then txtnama.Text = rd.Item("Nama_pmhn") txtpmhn.Text = rd.Item("Lokasi_pmhn") txthp.Text = rd.Item("No_HP") dtlama.Value = rd.Item("tanggal") txtpenerima.Focus() Else MsgBox("Data Tidak Ada") End If End If End If End Sub End Class
Cetak Formulir Public Class cetak_laporan Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click crv.ReportSource = Nothing crv.RefreshReport() crv.SelectionFormula = "{registrasi.Order_Nomor}='" & txtorder.Text & "'" crv.ReportSource = "formulir.rpt" crv.RefreshReport() End Sub End Class Cetak Laporan Public Class laporan
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click crv.RefreshReport() crv.ReportSource = "pembatalan.rpt" crv.RefreshReport() End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click crv.RefreshReport() crv.ReportSource = "pengambilan.rpt" crv.RefreshReport() End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click crv.RefreshReport() crv.ReportSource = "detail jadwal.rpt" crv.RefreshReport() End Sub Private Sub laporan_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub End Class