付録  CからILE−RPGを呼び出す
RPGプログラマーの為のC言語講座

CからILE−RPGを呼び出す場合の、サンプルコードです。

必要なのは、関数のプロトタイプ宣言です。

RPGを呼び出すPGM PROG4C

/*---------------------------------------------------------------*/
/* PROGRAM-ID  : PROG4C                                          */
/* REMARKS     : RPGを呼びたすPGM                             */
/* AUTHOR      : Y.Ide                                           */
/* DATE-WRITEN : 1999/8/15                                       */
/* VERSION     : 01.00 ORIGINAL                                  */
/*---------------------------------------------------------------*/
/* RPGを呼び出すプログラム                           */
/* ポインター渡しで全部のパラメーターを定義する                  */

#include

/*関数プロトタイプ宣言*/
void PROG4R(char *, int *);

int  main(int argc, char *argv[]){
  char *p1 = "1234567890";
  int  p2  = 123 ;

  printf("P1 = %s \n",p1);
  printf("P2 = %d \n",p2);

  PROG4R(p1,&p2);

  return 0 ;

}

Cから呼び出されるPGM PROG4R

     H DATEDIT(*YMD/)
     H*---------------------------------------------------------------*
     H* PROGRAM-ID    :    PROG4R                                     *
     H* REMARKS       :    Cから呼び出されるプログラム             *
     H* AUTHOR        :    Y.IDE                                      *
     H* DATE-WRITEN   :    1999/8/15                                  *
     H* VERSION       :    01.00 ORIGINAL                             *
     H*---------------------------------------------------------------*
     D P1              S             10
     D P2              S             10I 0
     D*
     C     *ENTRY        PLIST
     C                   PARM                    P1
     C                   PARM                    P2
     C*
     C     P1            DSPLY
     C     P2            DSPLY
     C*
     C                   SETON                                        LR
     C                   RETURN
     C*