passing values to idoc data of type edidd40 using ABAP

Hi All,

I am using orders05 (purchasing) idoc for creating purchase order inbound in ABAP program. I need to read a file and fill values to idoc_data of type edidd40

and idoc control record (of type edidc) and call function module idoc_inbound asynchronous. In this, how can I fill the values to idoc_data (edidd40). If anyone has some sample program to fill idoc_data (of type edidd40), it will be helpful.

Thanks