如何使用Uniface向文件添加值并让后续值以逗号分隔追加？

最简实现方案 #

使用Uniface内置的PUT指令配合追加模式，结合文件存在判断处理逗号分隔逻辑，是最直接的实现方式。

代码示例 #

假设待写入的值存储在变量 v_target_value 中，目标文件路径为 d:\logs\values.txt，代码如下：

; 检查目标文件是否已存在
FILEINFO "d:\logs\values.txt", "EXISTS", v_file_exists

; 文件已存在时，先写入逗号作为分隔符
if (v_file_exists = 1)
  PUT "d:\logs\values.txt", APPEND = ","
endif

; 将目标值追加到文件
PUT "d:\logs\values.txt", APPEND = v_target_value

关键细节 #

• PUT指令的APPEND参数：启用追加模式，新内容会被添加到文件末尾，不会覆盖原有数据。
• FILEINFO判断文件存在性：确保首次写入值时不会在开头出现多余的逗号，保证格式正确性。
• 若需批量处理值，可将上述逻辑封装为通用过程，传入值和文件路径参数即可重复调用。

简化（非严谨）版本 #

如果业务场景允许文件开头存在逗号（不影响后续解析），可以省略文件存在判断，直接每次追加,值，最后手动清理开头逗号：

PUT "d:\logs\values.txt", APPEND = "," || v_target_value

内容的提问来源于stack exchange，提问作者Mi2830