L 2= EN_TRIM(TEN) 3 = EN_TRIM(ST1)
7.5.2 Lệnh ghi dữ liệu ra file (WRITE)
Cú pháp câu lệnh nh− sau.
WRITE ( [UNIT=] unit
[, {[ FMT=] fmt | [ NML=] nml}] [, ADVANCE=advance] [, ERR=err] [, IOSTAT=iostat] [, REC=rec] ) iolist
Trong đó, dấu gạch đứng có ý nghĩa phân cách các tham số trong một nhóm mà chỉ có thể một trong chúng đ−ợc phép xuất hiện.
Nếu bỏ qua UNIT= thì unit phải là tham số đầu tiên và fmt hoặc nml phải là tham số thứ hai (FMT= hoặc NML= có thể đ−ợc bỏ qua). Ng−ợc lại, các tham số có thể xuất hiện theo thứ tự bất kỳ. Trong hai tham số fmt và nml chỉ đ−ợc phép xuất hiện một.
unit: Là tên thiết bị lơgic. Khi ghi ra file ngồi unit là một biểu thức nguyên gắn
với định danh UNIT. Khi ghi ra file trong unit phải là xâu ký tự, biến ký tự, mảng hoặc phần tử mảng ký tự,... Nếu unit ch−a liên kết với một file cụ thể thì lệnh mở file ẩn (implicit) đ−ợc thực hiện. Ví dụ nh− câu lệnh sau:
OPEN (unit, FILE = ' ', STATUS = 'OLD',& ACCESS = 'SEQUENTIAL', FORM = form)
trong đó form là 'FORMATTED' đối với lệnh đọc/ghi có định dạng hoặc 'UNFORMATTED' đối với lệnh đọc/ghi không định dạng.
fmt: Chỉ thị định dạng, có thể là nhãn câu lệnh FORMAT; biến, hàm hoặc hằng ký
tự, trong đó kiểu định dạng đ−ợc chỉ ra trong các cặp dấu nháy đơn ( ' ) hoặc nháy kép ( " ); biến nguyên ASSIGN; hoặc dấu sao (*).
nml: Chỉ ra tên của NAMELIST. Nếu tham số này đ−ợc chọn thì các tham số iolist
advance: Có dạng ký tự (Character*(*)), chỉ ra cách ghi ra file là tiến
(advancing) hay không. Nếu advance='YES' (ngầm định) sẽ tạo ra đánh dấu vị trí ở cuối bản ghi; nếu advance='NO' sẽ ghi một phần của bản ghi (tức ch−a tạo ra kết thúc bản ghi).
err: Nhãn của câu lệnh thực hiện trong ch−ơng trình sẽ đ−ợc chuyển điều khiển
đến khi gặp lỗi. Nếu bỏ qua tham số này, hiệu ứng lỗi vào/ra sẽ đ−ợc xác định bởi tham số iostat.
iostat: Là tham số kết xuất, ngầm định là một số nguyên (INTEGER(4)), bằng 0
nếu khơng có lỗi, hoặc bằng một số xác định mã lỗi.
rec: Tham số vào, ngầm định là một số nguyên d−ơng (INTEGER(4)), chỉ số thứ tự
bản ghi trong file sẽ đ−ợc ghi vào file truy cập trực tiếp. Khi sử dụng tham số rec thì các tham số end và nml cần phải bỏ qua. Con trỏ file phải đ−ợc định vị tại bản ghi rec tr−ớc khi dữ liệu đ−ợc ghi. Giá trị ngầm định của rec là số thứ tự bản ghi hiện thời.
iolist: Danh sách các biến sẽ đ−ợc ghi, liệt kê cách nhau bởi dấu phẩy (,).