User defined Function Required for EDI 850 file fields.

Question

Hi Guys,
I have an requirement where i need to check two fields in incoming EDI 850 file, based on those fields data should be populated to target side fields IDOC(ORDERS05).
here is the requirement
If Field.01 = "001" and field.02 exist then
   Set TDID = "31"
If  Field.01 = "001" and  field.02 exist then
   Set TSSPRAS = "A"
If  field.01  = "001" and  field.02 exist then
   Set TDLINE = Concat("XXXXXXX" +  field.02 (mm/dd/yy))
If  field.01 = "002" and  field.02 exist then
   Set TDLINE = Concat("XXXXXXX: " +   field.02 (mm/dd/yy))
If  field.01  = "010" and  field.02 exist then
   Set TDLINE = Concat("XXXXXXX: " +   field.02 (mm/dd/yy))
If  field.01 = "015" and  field.02 exist then
   Set TDLINE = Concat("XXXXXXX: " +   field.02 (mm/dd/yy))
If  field.01 = "037" and  field.02 exist then
   Set TDLINE = Concat("XXXXXXX: " +   field.02 (mm/dd/yy))
If  field.01 = "038" and  field.02 exist then
   Set TDLINE = Concat("XXXXXXX: " +  field.02 (mm/dd/yy))
If  field.01 = "063" and field.02 exist then
   Set TDLINE = Concat("XXXXXXX: " +   field.02 (mm/dd/yy))
If  field.01 = "064" and  field.02 exist then
   Set TDLINE = Concat("XXXXXXX: " +   field.02 (mm/dd/yy))
Here Field01 and Field 02 are sender side fields.we need to check this two fields . I Know this can be created with graphical mapping but as per requirement i need to write UDF bcoz with graphical mapping this would be more complex.
so can any one please provide me UDF for this.
Regards,
Sandeep.

Answer 1

Hi,
you can do it with standard functions.
If_1 source -> length -> greater -> constant 2
then_1 if_2 substring source 0, 2 -> equals TN
then_2 -> constant ""
else_2 -> source
else_1 source
Regards
Patrick