POSISI FILE 'PASCAL'

7.6 POSISI FILE
Posisi file merupakan posisi kursor yang sedang menunjukkan ke data tertentu di dalam sebuah file. Setiap kali file dibuka dengan menggunakan procedure Reset dan Rewrite , maka secara otomatis posisi akan berada pada bagian awal file atau akan menunjukan ke data pertama .
Terdapat beberapa procedure dan function pada pascal yang berkaitan dengan posisi file, yaitu procedure SEEK, function FilePos,SeekEof,SeekEoLn, dan Eof.
7.6.1 PROSEDUR Seek
Prosedur ini digunakan untuk memindahkan posisi file ke posisi tertentu sesuai dengan yang kita inginkan. Untuk memahami prosedur Seek bekerja, asumsikan bahwa kita telah memiliki File dengan nama SEEK.DAT yang merupakan kumpulan data-data dengan tipe Byte.




OUTPUT PROGRAM.







Output :





Pemanggilan procedur BuatFile pada program diatas akan membuat file baru dengan nama POS.DAT yang berada di direktori COBA pada drive D dan mengisikan data-data bilangan (bertipe Byte) kedalamnya.
7.6.3 FUNGSI SeekEof
Fungsi ini akan mengabaikan satu atau semua karakter spasi yang terdapat pada bagian akhir file dan langsung mengembalikan nilai true. Namun harus tetap diperhatikan bahwa spasi yang tidak terdapat dibagian akhir file tentu tidak akan tetap dianggap sebagai data, dan pada keadaan seperti itu SeekEof masih bernilai false. Fungsi ini juga hanya dapat digunakan untuk file teks dan file juga harus dibuka dengan menggunakan prosedur Reset. Apabila menggunakan prosedur Rewrite atau Append dan memanggil fungsi SeekEof, maka akan menyebabkan kesalahan program.









output :






Data-data yang dibaca menggunakan fungsi SeekEof sebagai pengecek akhir file-nya, karakter di bagian akhir file tidak akan dibaca.
7.6.4 FUNGSI SeekEoLn
Cara kerja fungsi ini hamper sama dengan fungsi SeekEof, hanya saja SeekEoLn berlaku untuk setiap baris data yang terdapat di dalam file. Fungsi ini hanya dapat digunakan untuk file teks dan akan mengembalikan nilai True apabila posisi file sedang berada di akhir baris. Apabila terdapat karakter spasi di baris tertentu (di bagian awal, tengah maupub akhir), maka fungsi ini akan mengabaikan spasi tersebut.








output:



7.6.5 FUNGSI Eof
Fungsi ini digunakan untuk memeriksa posisi file apakah berada di posisi akhir atau tidak. Posisi akhir dari suatu file lebih dikenakl dengan sebutan EOF (End-Of-File). Fungsi ini akan mengembalikan nilai true apabila posisi berada pada data terakhir, selain itu nilai yang akan dikembalikan adalah false.
Untuk kasus file kosong, maka posisi awal file juga akan dianggap sebagai posisi akhir, sehingga dengan demikian nilai yang akan dikembalikan dari fungsi ini adalah true. Pada contoh program dibawah ini asumsikan bahwa kita telah membuat file bernama EOF.TXT dalam direktori yang sama denga;n program yang kita buat.







output:






Cara kerja program yaitu melakukan pembacaan data dari file EOF.TXT mulai dari posisi awal sampai posisi akhir. Pada akhir file,fungsi EOF akan bernilai true sehingga kondisi tidak terpenuhi dan proses pengulangan akan terhenti.