[60244] in SAPr3-news

home help back first fref pref prev next nref lref last post

Re: Aus Liste/ALV-Grid per Doppelklick eine URL im externen Browser

daemon@ATHENA.MIT.EDU (St. Kother)
Tue Nov 20 04:29:51 2007

To: sapr3-news@mit.edu
Date: Tue, 20 Nov 2007 10:29:38 +0100
From: "St. Kother" <steffen.kother@gmx.net>
Message-ID: <5qfno3FvkhhuU1@mid.individual.net>
Reply-To: steffen.kother@gmx.net

Hallo Christian,

Christian Wallner schrieb:
> 
> "Ich kann eure Probleme mit auf 4.6C als auch auf ERP2005
> nachvollziehen."
> Sorry da hat mein Deutsch gerade ausgesetzt ;-)
> Wollte sagen dass ich die Probleme mit Leerzeichen im Filenamen auf
> meinen Systemen (4.6C und ERP2005) nicht nachvollziehen kann.

Ist das eine Einstellung im Systemumfeld? Was ich eingentlich mit meinen 
Links vor habe ist folgendes:

Im Materialstamm unter Zusatzangaben werden im Register "Interner 
Vermerk" die Verknüpfungen bzw. Links abgelegt. In etwa so:

link:\\Server\Ordner\Weiterer Ordner\Datei zum Gebrauch.Typ
link:\\Server\Ordner\Weiterer_Ordner\Datei_zum_Gebrauch.Typ
link:http://adres.se

Evtl. wollen wir die Angebotsfunktionalität zur Produktionsplanung bzw. 
Disposition missbrauchen. Leider lassen sich aus der Angebotsliste VA25 
nur die Angebote aufrufen...

Die Mitarbeiter in Dispo und Produktion benötigen aber auch auf das 
jeweilige Material bezogene Informationen und wollen diese gern auch aus 
der Liste heraus erreichen. Ergo will ich eine alternative Angebotsliste 
stricken, die sowohl in das Angebot verlinkt als auch auf eben die 
hinter der Materialnummer hinterlegte(n) Verknüpfung(en). Nur ein Link - 
direkter Sprung, mehr Links - Auswahlliste.

Leider nervt mich noch die Pfadangabe...

Hier mal mein Code, um die Links zu lesen und dann an zu springen:

REPORT ZVA25.

data: url_string type string,
       url_class  like url_string,
       index      type i.

data: it_line type table of tline,
       wa_line type          tline.

data: f_link type i value 0.

data: begin of itab_link occurs 0,
         link_id type i,
         link    type string,
       end of itab_link.

data: wa_link like itab_link.

call function 'READ_TEXT'
   exporting
     id       = 'IVER'
     language = 'D'
     name     = 'GV002'
     object   = 'MATERIAL'
   tables
     lines    = it_line.

loop at it_line into wa_line.
   if not wa_line-tdline is initial.

     if wa_line-tdline(5) = 'link:'.

       if not url_class is initial.
         move index to itab_link-link_id.
         move url_class  to itab_link-link.
         collect itab_link.
       endif.

       url_string = ''.
       url_class  = ''.
       index = index + 1.

       replace 'link:' with '' into wa_line-tdline.
       condense wa_line-tdline.
     endif.

     url_string = wa_line-tdline.

     concatenate url_class url_string into url_class.
   endif.
endloop.

move index to itab_link-link_id.
move url_class  to itab_link-link.
collect itab_link.

loop at itab_link into wa_link.
   write: / wa_link-link_id, wa_link-link.
   hide wa_link-link_id.
endloop.

at line-selection.
   case syst-lsind.
     when 1.
       read table itab_link with key link_id = wa_link-link_id.
       url_class = itab_link-link.

       if not url_class is initial.
         call method cl_gui_frontend_services=>execute
           exporting
             document = url_class
           exceptions
             others = 99.

         if syst-subrc <> 0.
           write: / 'Konnte dem Link nicht folgen!'.
         endif.

       endif.
     when others.
       exit.
   endcase.

Btw: Wenn einer eine bessere Lösung hat, wie ich die Link-Tabelle füllen 
kann - immer her damit.

-- 
MfG, Steffen

home help back first fref pref prev next nref lref last post