==> oldgogo.bbs@cis.nctu.edu.tw (老頭子) 在 fortran 版提到:
: 各位高手您好:
:         小弟在看程式時,程式宣告的部分有:
:         record /actl_pro / actlbuf
:         而在程式裡也一直用到 actlbuf
:         我找了許多 fortran 的書,都沒看到此一用法,
:         請問這是那一種記錄的宣告方式呢?
:         它的 syntax 又是如何的用呢:
:         謝謝您的解答!! :)

如果你用的是 Microsoft Fortran 或 Visual Fortran 則

record 一定搭配 structure , 找不到的話就是放在 include 檔中
從 include 或 use 中找連接的檔案

用法詳細可查線上說明

ex.
structure /student/
   character*8       Name              姓名
   character*10      Number            學號
   Integer           Chinese           國文
   Integer           English           英文
   Integer           Math              數學
   Real              Average           平均
end structure

record /student/ Class3A(41), Class3B(47)

Class3A(1).Name='Devil'
Class3A(1).Number='1234567890'
Class3A(1).Chinese=15
Class3A(1).English=1
Class3A(1).Math=30
Class3A(1).Average=(Class3A(1).Chinese+Class3A(1).English+Class3A(1).Math)/3

....

舉例來說: 3年A班有41個學生, 3年B班有47個學生, 3A班的座號1 學生 Devil資料如上
...

Fortran 90 語法用
Type Student
   character*8       Name              姓名
   character*10      Number            學號
   Integer           Chinese           國文
   Integer           English           英文
   Integer           Math              數學
   Real              Average           平均
End Type Student

Type(Student) :: Class3A(41)
Type(Student) :: Class3B(47)

Class3A(1)%Name='Devil'
Class3A(1)%Number='1234567890'
Class3A(1)%Chinese=15
Class3A(1)%English=1
Class3A(1)%Math=30
Class3A(1)%Average=(Class3A(1)%Chinese+Class3A(1)%English+Class3A(1)%Math)/3
...

如果是 Microsoft Fortran 系列可以相容 Record ...

ps. Structure 或 Type 中也可以用陣列