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

#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 ;

}

     H DATEDIT(*YMD/)
     H*---------------------------------------------------------------*
     H* PROGRAM-ID    :    PROG4R                                     *
     H* REMARKS       :    Ｃから呼び出されるプログラム　　           *
     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*