TUGAS LOGIKA dan ALGORITMA 2 (DELETE DATA)

4. PROCEDURE DELETE DATA

Merupakan procedure untuk menghapus data,di mulai dengan menghubungkan var FSISWA dengan file SISWA.PDB. Lalu masukkan NIS dari data yang ingin di hapus. setelah data yang di cari ditemukan muncul pertanyaan 'APAKAH DATA INI MAU DI HAPUS (Y/N)?' bila jwb='Y' maka akan mulai proses penghapusan dengan meletakan pointer penunjuk record pada posisi yang di inginkan melalui perintah SEEK, Lalu mulai memotong file dengan perintah TRUNCATE(FSISWA),maka dta telah terhapus. apabila data yang di cari tidak ditemukan maka munculkan pesan 'DATA DENGAN NIS TERSEBUT TIDAK ADA'. Ada juga perintah pengulangan untuk mengulang Procedure Delete data.