What I have so far is in IMPSOH --> $IMPORT

When "SOQ", "SOP" :

If !clalev([F:YSOQ]) Local File SORDERQ [F:YSOQ] : Endif

Look [YSOQ]SOQ5=[M:SOH4]YCALLID(nolign);[M:SOH4]YCHGID(nolign)

If !fstat
GERR=1 : GMESSAGE=[M:SOH4]YCHGID(nolign)-":"-mess(1,6217,1) : OK = 0
Endif

I'm think it is something to do with how I am referencing the line I'm reading. I haven't done much with reading lines in code yet and am a little unsure on how to use nolign. I've tried variations on the line numbers but am not having any luck.

Any pointers would be greatly appreciated.

Have just had a little bit of success with this, but need to perform more testing...

I put the below code against the 'Control' field action and when importing it seemed to work.

Subprog C_YCHGID(VALEUR)
Variable Char VALEUR()

If !clalev([F:YSOQ]) Local File SORDERQ [F:YSOQ] : Endif
Local Integer NOL : NOL=nolign-1
Local Integer OK
If VALEUR<>"" | VALEUR=[M:SOH4]YCHGID(NOL)
#Infbox "2 check valeur and YCHGID"
Look [YSOQ]SOQ5=[M:SOH4]YCALLID(NOL);VALEUR
If !fstat
OK = 0 : GERR=2:GMESSAGE=[M:SOH4]YCHGID(NOL)-":"-mess(1,6217,1)
If OK=0 : mkstat = 2 : End : Endif
Endif
Endif

End

I imported using a file with the firs record having a duplicate value and the second record having a new record and got the below return:

This reference already exists for this customer!

Field YCHGID : 155320 : One Bill Import Error - Duplicate Call Charge ID - Cannot create Sales Order (S01)

Field YCHGID(1) : 155321 : One Bill Import Error - Duplicate Call Charge ID - Cannot create Sales Order (S01)

-------------------- Record no. 2 (Line number 4)

This reference already exists for this customer!

Creation of S01 4001

1 Records created