Dqtc06's Weblog

23 December 2008

REVISI AKHIR TUGAS ADT YANG BERJUDUL TUGAS ANALISA DAN DESAIN TERSTRUKTUR

Filed under: Analisis Desain Terstruktur — dqtc06 @ 8:16 pm

TUGAS ANALISA DAN DESAIN TERSTRUKTUR

Semester Ganjil Tahun Ajaran 2008/2009

Kelas B

“Sistem Pemesanan Tiket Kereta Api”

logo_gif1

Oleh

David Agustinus      5106100021

n1073265243_30056079_7316

Anugrah Pratama   5106100105

kkkk1

Decky Kurniawan  510100131

dq3

Dosen

Fajar Baskoro, S.Kom .MT

JURUSAN TEKNIK INFORMATIKA

FAKULTAS TEKNOLOGI INFORMASI

INSTITUT TEKNOLOGI SEPULUH NOPEMBER SURABAYA

2008

Sistem Pemesanan Tiket Kereta Api

General

Pada zaman sekarang ini Kereta api merupakan salah satu alternatif transportasi yang sangat digemari masyarakat. Hampir setiap hari ada masyarakat yang bepergian menggunakan kereta api. Tetapi hal ini tidak ditunjang dengan kenyamanan-kenyamanan yang diberikan oleh pihak PT KAI. Tidak dapat dipungkiri hampir selalu ada kereta api yang selalu terlambat, entah itu kedatangan ataupun keberangkatan. Untuk kelas kereta api kelas ekonomi keterlambatan bisa lebih dari satu jam, teapi untuk kelas bisnis atau eksekutif mungkin hanya kurang dari satu jam. Hal ini mungkin sepele, tetapi ini sangat berdampak pada kenyamanan penumpang. Selain kereta api sendiri, stasiun juga memberikan peranan penting dalam kenyamanan penumpang. Stasiun kereta api merupakan suatu tempat yang memberikan pelayanan kepada masyarakat dalam bidang transportasi. Pada stasiun kereta api terdiri banyak sekali orang yang terlibat di dalamnya. Mulai dari penumpang, pegawai pemesanan tiket, dan staf-staf yang lain. Sebagai contoh untuk pembelian tiket PT KAI menyediakan pembelian secara manual dan juga secara online. tetapi sering juga terjadi tiket habis pada hari h keberangkatan. Hal ini sangat merugikan masyarakat/calon penumpang. Maka dari itu untuk melayani kebutuhan pelanggan akan kemudahan membeli tiket kereta api, PT. Kereta Api Indonesia (Persero) saat ini telah mengimplementasikan suatu sistem reservasi serta pembelian tiket Kereta api secara online dengan bekerja sama dengan pihak perbankan (saat ini Bank Mandiri). Untuk memberikan pelayanan yang maksimal diperlukan suatu system pemesan tiket yang lebih modern dan sesuai dengan teknologi terkini. Untuk memesan tiket kereta api di stasiun bisa memanfaatkan berbagai cara, yaitu manual (datang langsung ke stasiun) dan secara online (melalui internet atau online). Berikut ini langkah-langkah pemesanan secara online :

SISTEM PELAYANAN

  1. Pemesanan tiket via Call Center KA dapat dilakukan dalam waktu 24 jam sehari dan 7 hari dalam seminggu, artinya konsumen dapat melakukan reservasi kapan saja dengan melakukan dial ke nomor 13897 (13TYP) menggunakan telepon selular .

  2. Call Center secara sistem dapat melayani pemesanan tiket mulai H – 30 (tiga puluh) sampai dengan H – 1 (satu) sebelum keberangkatan KA.

  3. Pemesanan per transaksi yang dilakukan oleh Calon Penumpang untuk 1 (satu) tiket maksimal 4 (empat) tempat duduk untuk KA yang sama dalam satu waktu (Nomer KA dan tanggal keberangkatan sama).

  4. Penukaran tiket melalui fasilitas layanan perbankan ini hanya dapat dilayani di loket Stasiun atau Pusat Pelayanan Reservasi tiket KA (tidak dapat dilayani melalui Agen).

PROSEDUR PEMESANAN

1. Konsumen melakukan reservasi tiket KA dengan melakukan panggilan ke Call Center KA (dial 13897) menggunakan telepon selular.

2.  Petugas yang melayani akan menanyakan informasi kepada konsumen mengenai :

a) Nama dan alamat Calon Penumpang (sesuai KTP/SIM/Kartu Identitas)

b) Nama dan Kelas KA yang dipesan

c) Tanggal dan Jam Keberangkatan KA

d) Stasiun asal dan tujuan penumpang

e) Jumlah penumpang

3.  Setelah petugas Call Center berhasil melakukan proses reservasi, kemudian dilanjutkan dengan mengirimkan SMS ke pemesan yang berisi informasi tiket KA yang dipesan disertai kode pemesanan dan jumlah transaksi yang harus dibayarkan ke Bank.

4.   Konsumen membayar transaksi pemesanan tiket ke electronic channel Bank Mandiri sebesar nilai transaksi tersebut sesuai kode pemesanan.

5.  Apabila transaksi telah berhasil dibayarkan ke Bank secara otomatis data tersebut akan terkirim ke PT. KAI dan tiket KA dapat dicetak. Apabila tiket KA belum dibayar, maka secara sistem tidak dapat dicetak.

PROSEDUR PENGAMBILAN TIKET

Setelah konsumen membayar transaksi pemesanan tiket KA lewat fasilitas Bank, selanjutnya dapat mengambil tiket KA di loket stasiun dengan menyerahkan:

1) Struk ATM, apabila pembayaran via ATM Mandiri, atau

2) Kode pemesanan (untuk internet banking, SMS banking dan phone banking).

Kesemuanya disertai dengan fotocopy KTP/ Kartu Identitas yang berlaku atau mengisi formulir identitas sesuai dengan yang berangkat. Dengan diserahkannya bukti pembayaran dari Bank Mandiri berupa struk ATM atau kode pemesanan disertai fotocopy Kartu Identitas, petugas loket berdasarkan kode pemesanan memastikan apakah transaksi sudah dibayar dan nama penumpang yang akan berangkat sesuai dengan nama yang ada difotocopy kartu identitas. Petugas loket melakukan pencetakan tiket sesuai kode pemesanan.

PROSEDUR PEMBATALAN

Khusus untuk prosedur pembatalan dan penundaan/perubahan waktu perjalanan bagi calon Penumpang kereta api dilakukan sesuai dengan aturan yang berlaku. Pembatalan tiket (batal pembeli & batal tunda) hanya bisa dilakukan melalui komputer ticketing, dan hanya dapat dilakukan di tempat-tempat sbb :

1) Di Pusat Pelayanan Reservasi

2) Di Stasiun yang melayani tiket komputer

Pembatalan meliputi batal tunda sampai dengan H -1 dan batal pembeli sampai dengan 3 jam sebelum keberangkatan KA dengan mengenakan denda sesuai dengan aturan yang berlaku.

Pembatalan karena force majeure akan ditangani oleh PT. KAI dengan mengikuti ketentuan yang berlaku. Kondisi force majeure ini diinformasikan kepada calon penumpang melalui Call Center.

BIAYA LAYANAN

Untuk dapat menikmati fasilitas pemesanan tiket KA via Call Center ini, pelanggan harus menjadi pemegang rekening Bank Mandiri. Setiap kali transaksi menggunakan layanan ini, konsumen akan dikenai biaya layanan sebesar Rp. 7.500,- pada saat membayar via electronic channel Bank Mandiri dan pulsa premium saat melakukan reservasi via Call Center.

Staff

Staff yang berhubungan secara langsung sangat banyak sekali. Mulai dari kepala stasiun, pegawai loket tiket, petugas informasi, customer service (pemesanan tiket online) serta penjaga pemeriksa tiket masuk/peron. Setiap pegawai/staff mempunyai tugas dan fungsi masing-masing.

  • Kepala Stasiun

Merupakan seseorang pegawai yang bertugas sebagai pimpinan stasiun. Semua staf yang ada di badan kepengurusan stasiun harus bertanggung jawab pada pimpinan. Apabila terjadi masalah pada penumpang, kereta api, pengantar, penjemput maka yang bertanggung jawab adalah kepala stasiun.

  • Pegawai loket tiket

Merupakan seseorang yang bertugas untuk menerima pembelian tiket oleh calon penumpang dalam pembelian secara manual. Jika calon penumpang ingin memperoleh tiket pada saat itu juga, maka bagian pencetak tiket akan mencetak tiket yang diinginkan oleh calon penumpang tersebut.

  • Petugas Informasi

Merupakan seorang pegawai yang meyediakan informasi bagi calon penumpang atau dengan kata lain merupakan tempat bertanya bagi calon penumpang untuk hal-hal yang tidak mereka ketahui.

  • Pegawai tiket online

Merupakan seseorang yang bertugas untuk pemesanan tiket secara online. petugas ini mempunyai tugas untuk mencatat /menanyakan informasi kepada konsumen mengenai Nama dan alamat Calon Penumpang (sesuai KTP/SIM/Kartu Identitas) , Nama dan Kelas KA yang dipesan , Tanggal dan Jam Keberangkatan KA, Stasiun asal dan tujuan penumpang, Jumlah penumpang.

  • Pegawai pemeriksa tiket/peron

Merupakan seseorang yang bertugas untuk mengawasi para penumpang yang masuk dan pengantar yang harus mempunyai peron.


Problem Background

  1. Multiple ID penumpang.(R)

  2. Pemesanan tiket tidak bisa dilakukan 1 bulan sebelum keberangkatan kereta.(R)

  3. Penanganan calo tiket.(P)

  4. Penumpang kehabisan tiket pada hari H keberangkatan.(P)

  5. Pada kelas ekonomi penumpang sering melampaui batas kapasitas kereta api. (P)

  6. Adanya pemesan iseng.(P)

  7. Harga tiket yang berubah secara signifikan pada hari-hari tertentu.(P)

  8. Tiket yang dipesan tidak bisa diambil melalui agen. (R)

  9. Apabila terjadi gangguan atau kerusakan pada sistem ticketing, Call Center tidak dapat melayani reservasi tiket KA.(P)

  10. Satu kali transaksi tidak bisa memesan lebih dari 4 tiket.(R)

  11. Jika Bank atau operator telepon seluler yang bersangkutan mengalami gangguan lebih dari 3 jam, karena waktu pembayaran ke Bank adalah maksimal 3 jam (R)

  12. Kehilangan tiket menjelang keberangkatan kereta (P)

  13. Para pengantar banyak yang masuk tanpa membeli peron. (P)

  14. Pembatalan tiket kereta api hanya dapat dilakukan di tempat-tempat tertentu, tidak bisa secara online juga (R)

  15. Pengembalian uang tiket bila terjadi pembatalan (R)

Problem/Requirement Catalogue

011

0203040510610708091011121314115

Tabel Problem dan Requirement


rekap-problem

External Entity

  • PenumpangPenumpang merupakan satu orang atau lebih yang menggunakan jasa kereta api.
  • PengantarMerupakan orang yang mengantar para penumpang masuk kedalam stasiun, para pengantar ini diwajibkan untuk membeli peron.
  • BankBagian yang mengurusi pembayaran tiket. Bagian ini terutama mengatasi pembayaran tiket yang dipesan melalui online.

Tabel Hubungan Antara Sistem dan Eksternal Entitas

external-entity

Context Diagram


context-diagram

Document Flow Diagram

dfd

LEVEL 1 Physical DFD

level_1_physical_dfd_a1

level_1_physical_dfd_b

LEVEL 1 Logical View DFD

level_1_logical_view_a

level_1_logical_view_b1

LEVEL 2 Physical DFD Membeli Tiket

membeli_tiket_1

LEVEL 2 Physical DFD Pemesan Tiket Online

pesan_tiket_online_1

LEVEL 2 Physical DFD Membeli Peron

membeli_peron_1

LEVEL 2 Logical View DFD Membeli Tiket

membeli_tiket2

LEVEL 2 Logical View DFD Pemesan Tiket Online

pesan_tiket_online

LEVEL 2 Physical DFD Membeli Peron

membeli_peron

Functional decomposition

functional-decomposition

functional_1functional_2functional_3

  • Langkah 1 :

Menandai Kalimat : Penumpang, Kereta Api, Pegawai, Tiket, Tanda Pembayaran, Bukti Pemesanan, Peron, Agen, Bank.

  • Langkah 2 : Menentukan Entitas
    1. Penumpang
    2. Kereta Api
    3. Pegawai
    4. Tiket
    5. Tanda Pembayaran
    6. Bukti Pemesanan
    7. Peron
    8. Agen
    9. Bank
  • Langkah 3 : Menentukan Atribut Entitas
    1. Penumpang
      • ID_Penumpang : 12.5641.090388.0002
      • Nama Penumpang : David Agustinus
      • Alamat : Jombang
      • Nama KA : Sancaka
      • Kelas KA : Eksekutif
      • Tanggal Keberangkatan KA : 31 – Oktober – 2008
      • Jam Keberangkatan KA : 08.00
      • Stasiun Asal : Surabaya Gubeng
      • Stasiun Tujuan : Jogja
      • Jumlah Penumpang : 2
    2. Kereta Api
      • ID_Kereta : KA 0001
      • Nama KA : Sancaka
      • Kelas KA : Eksekutif
      • Kapasitas : 300
    3. Pegawai
      • ID_Pegawai : PEG001
      • Nama Pegawai : Decky Kurniawan
      • Bagian : Ticketing
      • Alamat : Jl Perumdos ITS 1
      • Jam Kerja : 08.00-12.00
    4. Tiket
      • ID_Tiket : TCK001
      • Harga : Rp. 120.000
      • ID_Kereta : KA 0001
      • No_Kursi : 1A
      • Jam Keberangkatan : 08.00
      • Jam Kedatangan : 07.45
      • Stasiun Asal : Surabaya Gubeng
      • Stasiun Tujuan : Jogyakarta
    5. Tanda Pembayaran
      • Kode_Pembayaran : PB001
      • Kode_Pemesanan : PS001
    6. Bukti Pembayaran
      • Kode_Pemesanan : KP001
      • ID_Tiket : TCK001
      • ID_Kereta : KA 0001
      • Jumlah Penumpang : 2
      • Jumlah Pembayaran : Rp 240.000
    7. Peron
      • No_Peron : PE0001
      • Uang : Rp. 500,00
    8. Agen
      • Kode_Agen : AG0001
      • Kode_Pemesanan : KP001
      • Kode_Pembayaran : PB001
    9. Bank
      • Kode_Bank : BK0001
      • Kode_Pemesanan : KP0001
      • Kode_Pembayaran : PB0001
  • Langkah 4
    1. Penumpang : ID_Penumpang(Primary Key)
    2. Kereta Api : ID_Kereta(Primary Key)
    3. Pegawai : ID_Pegawai(Primary Key)
    4. Tiket : ID_Tiket(Primary Key)
    5. Tanda Pembayaran : ID_Pembayaran(Primary Key)
    6. Bukti Pemesanan : Kode_Pemesanan(Primary Key)
    7. Peron : No_Peron(Primary Key)
    8. Agen : Kode_Agen(Primary Key)
    9. Bank : Kode_Bank(Primary Key)
  • Langkah 5

Penumpang                        –>  Bukti Pemesanan

Bukti Pemesanan             –> Ticket

Penumpang                        –> Tiket

Kereta Api                           –> Tiket

Penumpang                        –> Tanda Pembayaran

Tiket                                       –> Tanda Pembayaran

Pegawai                                –> Tiket

Pegawai                                –> Peron

Agen                                      –> Penumpang

Agen                                      –> Pegawai

Bank                                       –> Pegawai

Bank                                       –> Penumpang

Bukti Pemesanan              –> Tanda Pembayaran

  • Langkah 6
  • Penumpang             –> Bukti pemesanan           one to one
    Bukti Pemesanan  –> Tiket                             one to many
    Penumpang             –> Tiket                             one to one
    Kereta Api               –> Tiket                             one to many
    Penumpang             –> Tanda Pembayaran         one to one

    Tiket                           –>Tanda Pembayaran          many to one

    Pegawai                     –> Tiket                             one to many

    Pegawai                     –> Peron                            one to many

    Agen                           –>Penumpang                     many to many

    Agen                          –> Pegawai                         many to one

    Bank                           –> Pegawai                        many to one

    Bank                           –>Penumpang                    many to many

    Bukti Pemesanan  –> Tanda Pembayaran        one to one

  • Langkah 7langkah71
  • Langkah 8langkah81

Elementery Process Description

I. Pembelian tiket secara langsung

1

2

3

II. Pembelian tiket secara online

162131III. Membeli peron

172232

BUSINESS PROCESS SYSTEM

Identifikasi Alternatif Sistem

- Daftar Alternatif Sistem

1. Menggunakan tool Open source

a. Pemesanan tiket kereta ini bisa menggunakan  menggunakan aplikasi open office dalam menyimpan dan mengelola data penumpang .

Kompetitor : Telah banyak stasiun yang menggunakan sistem database yang telah sangat memudahkan bagi calon penumpang.

b. Perpustakaan akan menggunakan sistem database berbasis desktop seperti accsess yang dikeluarkan oleh microsoft.

Kompetitor : Telah adasistem pemesanan tiket yang dikelola  secara online.

2. Menggunakan tool berlisensi

a. Pemesanan tiket kereta ini bisa menggunakan  menggunakan aplikasi open office dalam menyimpan dan mengelola data penumpang .

Kompetitor : Telah banyak stasiun yang menggunakan sistem database yang telah sangat memudahkan bagi calon penumpang.

b. Perpustakaan akan menggunakan sistem database berbasis desktop seperti accsess yang dikeluarkan oleh microsoft.

Kompetitor : Telah adasistem pemesanan tiket yang dikelola  secara online.

Menentukan pilihan/solusi sistem melalui analisis biaya dan manfaat

- Alternatif 1.a (menggunakan aplikasi microsoft acsess dalam mengelola data)

Manfaat : Memudahkan pemesanantiket apabila dibandingkan dengan stasiun yang belum terkomputerisasi.

Biaya : Biaya yang diperlukan hanya sebatas pembeliaan software microsoft office, dan termasuk di dalamnya pembiayaan bagi programmer makro pada acsess (jika diperlukan)

- Alternatif 2.a (menggunakan aplikasi my sql  dalam mengelola data)

Manfaat : Memudahkan pencarian apabila dibandingkan dengan perpustakaan yang belum terkomputerisasi.

Biaya : Biaya yang diperlukan tidak ada atau free, karena aplikasi ini bias didonwload bebas di internet contoh my sql.

- Alternatif 1.b (Menggunakan sistem database berbasis oracle

Manfaat : Dengan menggunakan sistem database, maka akan diperoleh keuntungan dalam penggunaan database yang mencakup kecepatan , efisiensi space (data tidak redundant), data akurat, lengkap, dan aman.

Biaya : database designer, programmer, biaya installasi tools dan software yang terkait di dalamnya.

- Alternatif 2.b (Menggunakan sistem database berbasis desktop (java)).

Manfaat : tetapi membutuhkan koneksi database yang lain. tools ini hanya mengatasi aplikasi desktopnya saja.

Biaya : database designer, programmer java.

Lingkungan Sistem (asumsi) :

Sistem pemesanan tiket ini berada di dalam stasiun di mana penggunanya merupakan seluruh golongan yang sebagian besar belum mengetahui teknologi terkini.

Seleksi Alternatif solusi :

1. Menggunakan sistem berbasis web.

2. Menggunakan sistem berbasis web yang terpusat pada stasiun pusat.

INPUT dan OUTPUT

Form Input

Form utama ticketing online

form_utama_ticketing_online

Form input pemesanan tiket online

form_input_pemesanan_tiket_1

Form input pembatalan tiket online

form_input_pembatalan_tiket

Form input pembayaran tiket online

form_input_pembayaran_tiket

Form input pengambilan tiket online

form_input_pengambilan_tike

Form input pembelian tiket

form_input_pembelian_tiketForm Output

Output Pemesanan tiket online

output_pemesanan_tiket_onli

Output Pembatalan tiket online

output_pembatalan_tiket_onl1

Output pembayaran tiket online

output_pembayaran_tiket_onl

Output Tiket

output_tiket

Tabel Fisik

  • Tabel Kereta Api

kereta-api

  • Tabel Penumpang

penumpang

  • Tabel Stasiun

stasiun

  • Tabel Tanda Pembayaran

tanda-pembayaran2

Kode Program

  • Pembatalan Tiket

Option Compare Database

Private Sub DELETE_Click()

On Error GoTo Err_DELETE_Click

DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70

DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

Exit_DELETE_Click:

Exit Sub

Err_DELETE_Click:

MsgBox Err.Description

Resume Exit_DELETE_Click

End Sub

Private Sub Combo6_AfterUpdate()

‘ Find the record that matches the control.

Dim rs As Object

Set rs = Me.Recordset.Clone

rs.FindFirst “[Kode Pemesanan] = ” & Str(Nz(Me![Combo6], 0))

If Not rs.EOF Then Me.Bookmark = rs.Bookmark

End Sub

Private Sub Command8_Click()

On Error GoTo Err_Command8_Click

DoCmd.Close

Exit_Command8_Click:

Exit Sub

Err_Command8_Click:

MsgBox Err.Description

Resume Exit_Command8_Click

End Sub

  • Tambah Penumpang

Option Compare Database

Private Sub Command22_Click()

On Error GoTo Err_Command22_Click

DoCmd.GoToRecord , , acNewRec

Exit_Command22_Click:

Exit Sub

Err_Command22_Click:

MsgBox Err.Description

Resume Exit_Command22_Click

End Sub

Private Sub DELETE_Click()

On Error GoTo Err_DELETE_Click

DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70

DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

Exit_DELETE_Click:

Exit Sub

Err_DELETE_Click:

MsgBox Err.Description

Resume Exit_DELETE_Click

End Sub

Private Sub add_Click()

On Error GoTo Err_add_Click

DoCmd.GoToRecord , , acNewRec

Exit_add_Click:

Exit Sub

Err_add_Click:

MsgBox Err.Description

Resume Exit_add_Click

End Sub

Private Sub Command25_Click()

On Error GoTo Err_Command25_Click

DoCmd.GoToRecord , , acFirst

Exit_Command25_Click:

Exit Sub

Err_Command25_Click:

MsgBox Err.Description

Resume Exit_Command25_Click

End Sub

Private Sub Command26_Click()

On Error GoTo Err_Command26_Click

DoCmd.GoToRecord , , acLast

Exit_Command26_Click:

Exit Sub

Err_Command26_Click:

MsgBox Err.Description

Resume Exit_Command26_Click

End Sub

Private Sub Combo28_AfterUpdate()

‘ Find the record that matches the control.

Dim rs As Object

Set rs = Me.Recordset.Clone

rs.FindFirst “[Kode Pemesanan] = ” & Str(Nz(Me![Combo28], 0))

If Not rs.EOF Then Me.Bookmark = rs.Bookmark

End Sub

Private Sub Nama_KA_AfterUpdate()

Me![Kelas KA] = Nama_KA.Column(1)

End Sub

Private Sub Command63_Click()

On Error GoTo Err_Command63_Click

DoCmd.Close

Exit_Command63_Click:

Exit Sub

Err_Command63_Click:

MsgBox Err.Description

Resume Exit_Command63_Click

End Sub

Private Sub Command66_Click()

On Error GoTo Err_Command66_Click

DoCmd.GoToRecord , , acPrevious

Exit_Command66_Click:

Exit Sub

Err_Command66_Click:

MsgBox Err.Description

Resume Exit_Command66_Click

End Sub

Private Sub Command67_Click()

On Error GoTo Err_Command67_Click

DoCmd.GoToRecord , , acNext

Exit_Command67_Click:

Exit Sub

Err_Command67_Click:

MsgBox Err.Description

Resume Exit_Command67_Click

End Sub

  • Tanda Pembayaran

Option Compare Database

Private Sub save_Click()

On Error GoTo Err_save_Click

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

Exit_save_Click:

Exit Sub

Err_save_Click:

MsgBox Err.Description

Resume Exit_save_Click

End Sub

Private Sub add_Click()

On Error GoTo Err_add_Click

DoCmd.GoToRecord , , acNewRec

Exit_add_Click:

Exit Sub

Err_add_Click:

MsgBox Err.Description

Resume Exit_add_Click

End Sub

Private Sub Command11_Click()

On Error GoTo Err_Command11_Click

DoCmd.Close

Exit_Command11_Click:

Exit Sub

Err_Command11_Click:

MsgBox Err.Description

Resume Exit_Command11_Click

End Sub

  • Tanda Pengambilan Tiket

Option Compare Database

Private Sub DELETE_Click()

On Error GoTo Err_DELETE_Click

DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70

DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

Exit_DELETE_Click:

Exit Sub

Err_DELETE_Click:

MsgBox Err.Description

Resume Exit_DELETE_Click

End Sub

Private Sub Combo4_AfterUpdate()

‘ Find the record that matches the control.

Dim rs As Object

Set rs = Me.Recordset.Clone

rs.FindFirst “[Kode Pembayaran] = ” & Str(Nz(Me![Combo4], 0))

If Not rs.EOF Then Me.Bookmark = rs.Bookmark

End Sub

Private Sub Command6_Click()

On Error GoTo Err_Command6_Click

DoCmd.Close

Exit_Command6_Click:

Exit Sub

Err_Command6_Click:

MsgBox Err.Description

Resume Exit_Command6_Click

End Sub

Integrasi Tabel dan Modul Program

  • Menu Utama

menu-utama

  • Pemesanan Tiket

pemesanan-tiket

  • Tanda Pembayaran

tanda-pembayaran

  • Pengambilan Tiket

tanda-pengambilan-tiket

  • Pembatalan Tiket

pembatalan-tiket

  • Output Tanda Pembayaran

output-tanda-pembayaran

  • Output Tambah Penumpang

output-tambah-penumpang

Kesimpulan :

Analysis dan rancangan bisa diimplementasikan

Hasil Implementasi :  http://www.ziddu.com/download/3195474/SystemPemesananTiket.rar.html

The Rubric Theme. Create a free website or blog at WordPress.com.

Follow

Get every new post delivered to your Inbox.