$(美元)编辑(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