Using WRITE() C API in rpgle as400