ネットワーク

47. RPG や CLP で TCP/IP 通信するには?

RPGの開発者であれば RPG や CLP で TCP/ IP 通信の開発が必要になる場合もある。TCP/IP 通信を iSeries400 で行うためには Windows と同じように、やはり Socket API を使用する。

ところが Socket API は C言語からしか使用できない。IBM は 「通信 TCP/IP の手引き」の中でASCAL で Socket API を呼んでこれを QPXXCAL API で RPGから利用する例を示しているが PASCAL はもはや使用されていない。やはり C言語で サービス・プログラム(*SRVPGM) を作成して、それを ILE RPG でバインドすることになる。

Chicago のユーザーであれば PANELWKR/TCPMOD という TCP/IP 通信用のサービス・プログラムが提供されている。DSPSRVPGM PANELWKR/TCPMOD でプロシージャーを調べて利用することができる。詳細なサンプル・ソースは㈱オフィスクアトロまで問い合わせて入手してください。