在IBM i (OS/400)上输出CSV文件

该示例演示了如何在IBM i（OS/400）上使用RPG或CL程序输出CSV文件。CSV文件是一种特殊的文本文件，可以通过一些应用程序例如Excel打开。

dcl-f myfile disk usage(*output) aftcrt(*yes) prefix('myfolder/myfile_');
    // 定义输出文件，使用disk存储，aftcrt表示每次调用程序时，文件是否应被覆盖。如果设置为*no，则文件将保留在第一次运行后的状态。

    dcl-ds row likeds(myfile) inz;

    row.field1 = 'Value1';
    row.field2 = 'Value2';
    // 将数据赋给数据结构

    write row;
    // 将数据写入输出文件

    close myfile;
    // 关闭文件

免责申明：文章和图片全部来源于公开网络，如有侵权，请通知删除 server@dude6.com