‎2007 Jan 30 2:31 PM
hi can anyone check this code and tell me how can i write the Get cursor statement ..the output of this program gives me a list of tracking numbers..all i need to do is when end user clicks on that tracking number it needs to go to UPS site and display the status of the package..
REPORT ZUPS2.
TABLES:ZMANIFEST,ZTRK_PAK,ZTRK_ACT.
DATA:BEGIN OF ITAB OCCURS 0,
ZZMANIFEST LIKE ZMANIFEST-ZZMANIFEST,
ZSHIPNUM LIKE ZMANIFEST-ZSHIPNUM,
ZORIGIN LIKE ZMANIFEST-ZORIGIN,
ZSTATUS LIKE ZMANIFEST-ZSTATUS,
ZZTRACKN LIKE ZMANIFEST-ZZTRACKN,
ZCARRID LIKE ZMANIFEST-ZCARRID,
ZMANITYPE LIKE ZMANIFEST-ZMANITYPE,
ZCARRCODE LIKE ZMANIFEST-ZCARRCODE,
ZFREIGHT LIKE ZMANIFEST-ZFREIGHT,
ZTOTPARCELS LIKE ZMANIFEST-ZTOTPARCELS,
ZMANIFESTDATE LIKE ZMANIFEST-ZMANIFESTDATE,
ZCARRIER LIKE ZMANIFEST-ZCARRIER,
END OF ITAB.
WRITE: / 'ManifestNumber' color 1,18 'Shipping Number' color 1
,40 'Origin' color 1,52 'Status' color 1,64 'Tracking Number' color 1,84
'Carrier Id' color 1,97 'Manifest Type' color 1,111 'CarrierCode' color
1,125 'Freight Type Id' color 1,142 'TotalParcels' color 1,157
'Manifest Date' color 1,174 'Carrier' color 1.
*
111 'Manifest Date'
*color 1,120 'Freight Type Id'color 1,130 'Total Number of Parcels'
*color
1,140 'Manifest Date' color 1,160 'Carrier' color 1.
SELECT * FROM ZMANIFEST
INTO CORRESPONDING FIELDS OF TABLE ITAB.
LOOP AT ITAB.
WRITE: / ITAB-ZZMANIFEST,20 ITAB-ZSHIPNUM,40 ITAB-ZORIGIN,52
ITAB-ZSTATUS,62 ITAB-ZZTRACKN hotspot,86 ITAB-ZCARRID,99 ITAB-ZMANITYPE,
114 ITAB-ZCARRCODE,130 ITAB-ZFREIGHT,143 ITAB-ZTOTPARCELS,160
ITAB-ZMANIFESTDATE,175 ITAB-ZCARRIER.
ENDLOOP.
AT LINE-SELECTION.
DATA:i_ups(200).
DATA:FNAM(100),FVAL(100).
CASE 'SY-UCOMM'.
WHEN 'ZZTRACKN'.
GET CURSOR FIELD FNAM VALUE FVAL.
i_ups = 'http://wwwapps.ups.com/WebTracking/track='.
CONCATENATE i_ups FVAL INTO i_ups.
CALL FUNCTION 'CALL_BROWSER'
EXPORTING
URL = i_ups
WINDOW_NAME = ' '
NEW_WINDOW = ' '
BROWSER_TYPE =
CONTEXTSTRING =
EXCEPTIONS
FRONTEND_NOT_SUPPORTED = 1
FRONTEND_ERROR = 2
PROG_NOT_FOUND = 3
NO_BATCH = 4
UNSPECIFIED_ERROR = 5
OTHERS = 6
.
ENDCASE.
‎2007 Jan 30 2:34 PM
hey check this
https://forums.sdn.sap.com/click.jspa?searchID=954395&messageID=2810363
AT LINE-SELECTION.
GET CURSOR FIELD CURSORFIELD.
WRITE: / CURSORFIELD, SY-SUBRC.
if found helpful, award points
‎2007 Jan 30 2:37 PM
i need to capture the cursor action get the field value to be concatenated to UPS url..for example if the tracking number is 1z12321432444..and when user clicks it
ups url opens as
‎2007 Jan 30 2:40 PM
GET CURSOR FIELD CURSORFIELD VALUE g
Effect
g contains the value of the field where the cursor stands, always in output format (character display).
this will get the value, u can check the URL
http://www.sts.tu-harburg.de/teaching/sap_r3/ABAP4/get_curs.htm
dont forget to award points
‎2007 Jan 30 2:38 PM
why have you written case .... endcase.
i don't think it is needed.
just check for sy-subrc after get cursor. it should work.
regds,
kiran
‎2007 Jan 30 2:39 PM
Hi,
There is no need of the below statment
<b>CASE 'SY-UCOMM'.
WHEN 'ZZTRACKN'.</b>
in the statment GET CURSOR FIELD FNAM VALUE FVAL, the Field name will be stored in FNAM and the value will be stored in FVAL.
and then pass thif FVAL to that and display it
Regards
SUdheer