Danke,
ich habe das Problem gelöst.
Es lag beim Open.
so gehts:
flags = O_CREAT+O_TRUNC+O_WRONLY + O_CCSID + o_textdata + o_text_creat;
mode = m_rdwr ;
fd = open(%trimr(path) :flags :mode:cp_windows:0 );