Inserting Website Links in ABAP
* * ABAP with web links * * Creates a list that has a couple of active URL links embedded. * By single-clicking on these links a web browser will popup and display * the corresponding web page. * * Written by : SAP Basis, ABAP Programming and Other IMG Stuff * http://www.sap-img.com * REPORT ZURL NO STANDARD PAGE HEADING. DATA: BEGIN OF URL_TABLE OCCURS 10, L(25), END OF URL_TABLE. URL_TABLE-L = 'http://www.lycos.com'.APPEND URL_TABLE. URL_TABLE-L = 'http://www.hotbot.com'.APPEND URL_TABLE. URL_TABLE-L = 'http://www.sap.com'.APPEND URL_TABLE. LOOP AT URL_TABLE. SKIP. FORMAT INTENSIFIED OFF. WRITE: / 'Single click on '. FORMAT HOTSPOT ON.FORMAT INTENSIFIED ON. WRITE: URL_TABLE. HIDE URL_TABLE. FORMAT HOTSPOT OFF.FORMAT INTENSIFIED OFF. WRITE: 'to go to', URL_TABLE. ENDLOOP. CLEAR URL_TABLE. AT LINE-SELECTION. IF NOT URL_TABLE IS INITIAL. CALL FUNCTION 'WS_EXECUTE' EXPORTING program = 'C:\Program Files\Internet Explorer\IEXPLORE.EXE' commandline = URL_TABLE INFORM = '' EXCEPTIONS PROG_NOT_FOUND = 1. IF SY-SUBRC <> 0. WRITE:/ 'Cannot find program to open Internet'. ENDIF. ENDIF. *-- End of ProgramRunning ABAP/4 Report on the web Run or Display ABAP Report over the web
All the site contents are Copyright © www.sap-img.com
and the content authors. All rights reserved.
|