如何使用 SQLTYPE(CLOB_File) 替换流文件中的整行文本？

问题描述

我正在尝试替换如下所示的配置文件中的一行文本：

P   235 1 example.com

我想替换的那一行是“example.com”。我可以使用以下代码执行此操作：

frmF_Name = %trim(path) + '.bak';
frmF_NL = %len(%trim(frmF_Name));
frmF_FO = SQFRD;

toF_Name = %trim(path);
toF_NL = %len(%trim(toF_Name));
toF_FO = SQFOVR;

exec sql Set :toF = replace(:frmF,'example.com',:url);

但是，我想通过配置文件条目（'P 235 1 '）而不是 URL 来查找和替换，因为 URL 不是静态的。为了让您了解我正在尝试做什么，可以使用以下 QSHELL 语句来实现：

  sed "/P   235 1/s/.*/P   235 1 newURL.com/"           
  /mydir/file.txt > /mydir/file.txt.bak  

但是我不能在这种情况下使用 sed，因为文件超过 32k（大约 92k）。

以下代码将按条目搜索：

frmF_Name = %trim(path) + '.bak';
frmF_NL = %len(%trim(frmF_Name));
frmF_FO = SQFRD;

toF_Name = %trim(path);
toF_NL = %len(%trim(toF_Name));
toF_FO = SQFOVR;

exec sql Set :toF = replace(:frmF,'P   235 1 ',:url);

但文件在编辑后最终看起来像这样：

P   235 1 newurl.com                                                          example.com 

它通过按条目搜索来替换它，但将前一个条目推送到变量长度的末尾。那么，如何使用 sql_CLOB 替换整个流文件行？

感谢您的时间。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）