파일 쓰기/열기...

파일쓰기/열기를 할때 자꾸 예전 코드를 뒤적거려서 여기에 적어 둡니다.
= 파일 쓰기 =

!ofilename = 'c:\temp\test.dat'
!!file = Object FILE('$!ofilename') $* 파일 OBJECT를 생성합니다.
!!file.Open('overwrite')        $* 겹쳐 쓰기로 파일을 엽니다.

!!file.WriteRecord('TEST')

!!file.Close()         $* 파일을 닫습니다.
!!file.Delete()        $* 파일 OBJECT를 삭제합니다.

= 파일 읽기 =

!ofilename = 'c:\temp\test.dat'
!!file = Object FILE('$!ofilename') $* 파일 OBJECT를 생성합니다.
!!file.Open('read')        $* 읽기 모드로 파일을 엽니다.

!recs = object Array()

do
	!aLine = !!file.ReadRecord() $* 파일에서 한 줄을 읽습니다.

    if !aLine.set() EQ FALSE then
    	break $* 파일 끝으로 보고 파일 읽기를 멈춥니다.
    endif

    !recs.Append(!aLine)

enddo

!!file.Close()         $* 파일을 닫습니다.
!!file.Delete()        $* 파일 OBJECT를 삭제합니다.

$* do something

!recs.clear()
!recs.delete()