$(美元)编辑(IBM 扩展)
用途
美元编辑描述符禁止顺序或格式化流 WRITE 语句的记录结束。
语法
$
规则
通常,当到达格式规范的末尾时,当前记录的数据传输停止并且文件被定位以便下一个输入/输出操作处理新记录。 但是,如果格式规范中出现美元符号,则会抑制自动结束记录操作。 随后的输入/输出语句可以继续写入同一记录。
示例
美元符号编辑的一个常见用途是提示响应并从同一行读取答案。
WRITE(*,FMT='($,A)')'Enter your age '
READ(*,FMT='(BN,I3)')IAGE
WRITE(*,FMT=1000)
1000 FORMAT('Enter your height: ',$)
READ(*,FMT='(F6.2)')HEIGHT