新規投稿 記事一覧 ホーム
●ご利用方法,ご利用に際しての規約はこちらをお読みください。
こちらからの投稿は、先頭に表示されているコメントへの返信になります。
RE:API使わなくてもできますよ どん さん [ 10月28日(火) 15時4分 ]

    お世話になっております。
    ご教授いただいた内容でご確認させていただきたいのですが

    > FAUDFTP    UF   E             DISK    EXTFILE('MYLIB/QTXTSRC')
    > F                               EXTMBR('AUDFTP')    
    > F                               RENAME(QTXTSRC:AUDFTPR)
    →MYLIB/QTXTSRC(AUDFTP)は転送記述のTEXTソースで、
    OBJを指定しているものではない。
    という理解で宜しいでしょうか?

    以下の様なレコードを持っていて、このRPGで修正するという事でしょうか?
    XXXXXXXX XXXXXXXX                          
    CD XXXX                                 
    CD XXXX/XXXX                      
    LTYPE C 932                            
    PUT    QTEMP/TESTPF   TESTPF.CSV     
    QUIT                               

    宜しくお願い致します。        

    RE:API使わなくてもできますよ 伊集院博 さん [ 10月28日(火) 16時39分 ]

      OKです。認識は間違っていないと思います。

      > FAUDFTP    UF   E             DISK    EXTFILE('MYLIB/QTXTSRC')
      > F                               EXTMBR('AUDFTP') 
      > F                               RENAME(QTXTSRC:AUDFTPR)
      上記は、TEXTソースで存在しているメンバー(ソース)を読込み、更新します。
      このRPGの上位にCLを用意して
      OVRDBF FILE(AUDFTP) TOFILE(MYLIB/QTXTSRC) MBR(AUDFTP)
      とするのと同じ意味です。
      ちなみに、ソースメンバーもAS/400の世界ではOBJ(オブジェクト)になります。

      解決:御礼 どん さん [ 10月31日(金) 13時56分 ]

        伊集院博 さん
        ご教授いただいた内容で解決できました。

        IKD さん
        APIにつきましても、今後学んで行きたいと思います。

        ありがとうございました。

お名前
パスワード
e-mailアドレス
タイトル
ホームページ
アドレス