Since V3R2, ILE-RPG supports function prototyping and the use of pointers which made it possible to use/call almost any function written in any language. Since to these set of functions, which required languages like C in the past, also belong the Sockets functions no C/400 is required anymore. The following examples should make it clear how to use the prototyping, and how to call the socket functions;

DOpenSock         PR            10I 0 ExtProc('socket')
D  prSockFam                    10I 0 Value
D  prAddrTyp                    10I 0 Value
D  prProtocol                     10I 0 Value

DSock_Descr       S             10I 0
DAddr_Fam         S             10I 0
DAddr_Type        S             10I 0
DProtocol         S             10I 0

C                   Eval      Sock_Descr = OpenSock(Addr_Fam:
C                                                   Addr_Type:
C                                                   Protocol)

The other prototypes (which are in C, but can be translated to ILE-RPG) can be found in the Sockets Programming manual. Remember to use 5U, 5I, 10U, 10I as replacement for unsigned/signed, short/long integers, or an * for pointers. I hope this gets you started... and BTW, translation from ASCII/EBCDIC can be done with QDCXLATE (however iconv() works as well, but is a bit more complex to use).

---

Please, Please don't pull our legs...Please say its so ....I want to know too... I've read the same manuals and they say we need C/400. If you could give us a short source sample.

---

The necessary information (function prototypes) can be found in the manual "OS/400 Sockets programming". Recently I programmed several Sockets applications from and to AS/400 and PC's using Delphi without any problem. All this is done from ILE-RPG, and there's really no need to use C.

---