hi thank you
i followed your suggestion i did this program
i am sending the code too
but in that by clicking only i am getting the secondary list as pop up window
i need without clicking
by putting the cursor near customer number
without any action
i need a list of sales orders of that customers
i am sending the code too..
&----
*& Report ZINTER *
*& *
&----
*& *
*& *
&----
REPORT ZINTER .
DATA : BEGIN OF ITKNA1 OCCURS 0,
KUNNR LIKE KNA1-KUNNR,
NAME1 LIKE KNA1-NAME1,
LAND1 LIKE KNA1-LAND1,
ORT01 LIKE KNA1-ORT01,
END OF ITKNA1,
BEGIN OF ITVBAK OCCURS 0,
KUNNR LIKE KNA1-KUNNR,
VBELN LIKE VBAK-VBELN,
ERDAT LIKE VBAK-ERDAT,
ERNAM LIKE VBAK-ERNAM,
NETWR LIKE VBAK-NETWR,
END OF ITVBAK.
SELECT-OPTIONS : SKUNNR FOR ITKNA1-KUNNR DEFAULT 1000 TO 1010.
SELECT KUNNR NAME1 LAND1 ORT01
FROM KNA1 INTO TABLE ITKNA1
WHERE KUNNR IN SKUNNR.
LOOP AT ITKNA1.
WRITE :/ ITKNA1-KUNNR HOTSPOT,
ITKNA1-NAME1,
ITKNA1-LAND1,
ITKNA1-ORT01.
HIDE ITKNA1-KUNNR.
ENDLOOP.
AT LINE-SELECTION.
CASE SY-LSIND.
WHEN 1.
SELECT KUNNR VBELN ERDAT ERNAM NETWR
FROM VBAK INTO TABLE ITVBAK
WHERE KUNNR = ITKNA1-KUNNR.
WINDOW STARTING AT 10 10
ENDING AT 40 20.
LOOP AT ITVBAK.
WRITE :/ ITVBAK-KUNNR,
ITVBAK-VBELN,
ITVBAK-ERDAT,
ITVBAK-ERNAM,
ITVBAK-NETWR.
ENDLOOP.
ENDCASE.
waiting for your reply
thanks & regards
kals.