Find (fix) column number in report list

Question

Dear ABAPers,
Currently I develop a report that can show detail level. I use standard list to display the report.
In this report I have 3 main fields (FIN Doc No, PO No, and OLA No) in one line that if they are double clicked they will go to another different page.
The challege is to find out which one on the list that is double clicked, is it FIN No, PO No, or OLA No.
I use sy-cucol to find the column number but I just notice that sy-cucol will count the column from the beginning of screen shown, not from the very beginning of report. So sy-cucol is number of column relative to SAP left screen side. What I need is number of column fixed from the very beginning of report.
For example:
I write field to list as follow
WRITE:  /2 T_OUT-BELNR,
           160 T_OUT-EBELN,
           182 T_OUT-KONNR.
And the screen listener as follow
  IF sy-lsind = 1.
    IF sy-cucol > 2 AND sy-cucol < 13.
              "user double click on FIN Doc No
              "routine for FIN Doc No
    ELSEIF sy-cucol > 159 AND sy-cucol < 182.
              "user double click on PO No
              "routine for PO No
    ELSEIF sy-cucol > 181 AND sy-cucol < 200.
              "user double click on OLA No
              "routine for OLA No
    ENDIF.
  ENDIF.
However this code doesn't work because when I scroll the screen to right sy-cucol is recalculate from 0 in the very left side of screen. So it means that sy-cucol will differenciate when I scroll the report to the right - left.
Does any body have solution for it? Are there any other system field that can replace sy-cucol?
Thanks
Regards
Hadi

Answer 1

Hi,
Use the statement GET CURSOR FIELD XX to determine the column in the list.
Sample code.
TABLES mara.
DATA it_mara TYPE TABLE OF mara.
DATA  wa_mara TYPE mara.
DATA gv_field TYPE char30.
SELECT-OPTIONS: s_matnr FOR mara-matnr.
START-OF-SELECTION.
SELECT *
   FROM mara
   INTO TABLE it_mara
   WHERE matnr IN S_matnr.
IF sy-subrc = 0.
   LOOP AT it_mara INTO wa_mara.
     WRITE:/ wa_mara-mandt, wa_mara-matnr,wa_mara-mtart.
     HIDE: wa_mara-mandt, wa_mara-matnr.
   ENDLOOP.
ENDIF.
AT LINE-SELECTION.
  CASE sy-lsind.
    WHEN 1.
      GET CURSOR FIELD gv_field.
      WRITE 'TEST1'.
  ENDCASE.
Regards,
Vasanth