CHARACTER ttynam*24

name = ttynam( lunit )

lunit

INTEGER*4

输入 

逻辑单元 

返回值 

character*n

输出 

如果返回非空白字符串：name 为 lunit 中设备的路径名。大小 n 必须足够大，以便能容纳最长的路径名。

如果返回空白字符串（全部为空白）：lunit 与目录 /dev 中的终端设备没有关联。