TUGAS ALGORITMA & LOGIKA II

Entry data

? Hubungkan file data barang dan data sementara
? Buka file barang, jika IOResult tidak sama dengan o maka ‘jawab’
? Jika jawab tidak sama dengan y maka keluar, sealin itu
? Kosongkan file yang sudah ada, ttutup file dan rekam file yang sudah ada di buffer memory ke file external
? Buka file yang sudah ada
? Buat file baru yang sudah ada di file sementara
? Jka KDBC tidak sama dengan spc(7) maka tampilkan pesan “TUNGGU LAGI PROSES”
? Tutup file barang dan rekam,
? Tutup file sementara, replace file sementara dengan file barang dan keluar
? Hubungkan fileada dengan data barang.dbp
? Buka file yang sudah ada, lakukan pengulangan pada file ada
? Tutup fileada dan rekam
? Setelah slesai tampilkan pesan “masih mau menambah data Y/T ?”
? Jika dijawab y maka keluar

List Data

? Hubungkan file barang dengan data barang, buka file yang sudah ada
? Buka file barang, jika IOResult tidak sama dengan o maka ‘jawab’
? Jika jawab tidak sama dengan y maka keluar, sealin itu
? Kosongkan file yang sudah ada, ttutup file dan rekam file yang sudah ada di buffer memory ke file external
? Swada = o, lakukan pengulangan pada file barang
? Jika swada sama dengan o maka keluarkan pesan “data dengan kode tersebut tidak ada”
? Setelah selesai, keluarkan pesan konfirmasi “ masih mau menambah data yang lain “
? Jika jawab tidak sama dengan y maka keluar

Update data

? Hubungkan file barang dengan data barang, buka file yang sudah ada
? Buka file barang, jika IOResult tidak sama dengan o maka ‘jawab’
? Jika jawab tidak sama dengan y maka keluar, sealin itu
? Kosongkan file yang sudah ada, ttutup file dan rekam file yang sudah ada di buffer memory ke file external
? Swada = o, hubungkan file sementara dengan file barang.new
? Buat file baru di file sementara
? Lakukan pegulangan pada file barang
? Tampilkan pesan ‘’YAKIN AKAN DIRUBAH”, jika dijawab y maka tampilkan
? “Ketikan nama barang”, “Ketikan satuan barang”, “ketikan jumlah satuan barang”, “KEtikan harga satuan barang”, dan selesai.
? Jika swada sama dengan o maka keluarkan pesan “data dengan kode tersebut tidak ada”
? Setelah selesai, keluarkan pesan konfirmasi “ masih mau merubah data yang lain “
? Jika jawab tidak sama dengan y maka keluar

Delete data

? Hubungkan file barang dengan data barang, buka file yang sudah ada
? Buka file barang, jika IOResult tidak sama dengan o maka ‘jawab’
? Jika jawab tidak sama dengan y maka keluar, sealin itu
? Kosongkan file yang sudah ada, ttutup file dan rekam file yang sudah ada di buffer memory ke file external
? Jika KDBC = SPC(7) maka tutup file dan rekam file lalu keluar
? Swada = o, hubungkan file sementara dengan data barang.new
? Buat file baru di file sementara
? Lakuakn pengulangan pada file barang
? Keluarkan pesan “Yakin data akan dihapus”
? Jika jawab sama dengan y maka hapus baranng tersebut
? Jika swada sama dengan o maka keluarkan pesan “data dengan kode tersebut tidak ada”
? Setelah selesai, keluarkan pesan konfirmasi “ masih mau menghapus data yang lain ?“
? Jika jawab tidak sama dengan y maka keluar

ITS ME AND MY SWEETYQ

Anything ... Bebas ...: Tugas ke-1 Logika dan Algoritma

pak dani,ni sama ERWIN MULYONO S1 TEKNIK INFORMATIKA.saya sudah membuat blogger yang bapak suruh,smoga di beri penilaian yang baik.