Stimmt; das Feld CURLOC ist character.

Laut Info Center enthält es:

Cursor location (line and position). Updated on input operations that are not subfile operations that return data to the program. For example, hex 0102 means line 1, position 2. Line 10, position 33 would be hex 0A21.
Du mußt also diesen Inhalt von Hex auf Numeric umrechnen.

So ähnlich wie z.B.:

Code:
D CHROW           DS                 
D  NUMROW                 1      2B 0
D CHPOS           DS                 
D  NUMPOS                 1      2B 0

C                   EVAL      NUMROW = 0                            
C                   EVAL      NUMPOS = 0                            
C                   EVAL      %subst(CHROW:2:1) = %subst(CURLOC:1:1)
C                   EVAL      %subst(CHPOS:2:1) = %subst(CURLOC:2:1)
Dann müßte der Inhalt von NUMROW und NUMPOS den numerischen Wert der Cursorposition enthalten.
Ich habe dies aber jetzt nicht ausprobiert.