I'm trying to get the PO Date onto the Purchase Order Receipts Grid (PO_HST_LINE)
 
I tried this UDF but am only getting 00/00/00 as the result, what part(s) is wrong?
 
Code:

func UDF1
define pohead.h type I size 6
openv 'bkappo' fnum pohead.h lock n
findv M fnum pohead.h key BKAP.PO.NUM val BKAP.PO.NUM
ret BKAP.PO.ORDDTE 

 
Thanks