Dynamisches Update des SAP-GUI
7 Beiträge
•
Seite 1 von 1
7 Beiträge
Seite 1 von 1
Hallo,
ich würde gerne wissen, ob es möglich ist, daß ein SAP-Bildschirm von einer eigenen Applikation dynamisch, z.B. durch einen Batch-Job im Hintergrund oder durch einen Aufruf von einem anderen SAP-Programm, zur Laufzeit "refreshed" werden kann.
Die Standardversion mit dem User-Command ist mir bekannt, also bitte keine Tips dahingehend geben.
Danke.
ich würde gerne wissen, ob es möglich ist, daß ein SAP-Bildschirm von einer eigenen Applikation dynamisch, z.B. durch einen Batch-Job im Hintergrund oder durch einen Aufruf von einem anderen SAP-Programm, zur Laufzeit "refreshed" werden kann.
Die Standardversion mit dem User-Command ist mir bekannt, also bitte keine Tips dahingehend geben.
Danke.
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Ja, geht (nicht im Batch)
Hier ein Beispiel:
Gruss
Daniel
Hier ein Beispiel:
Code: Alles auswählen.
REPORT zs_test.
data: begin of line,
x(132) type x,
end of line.
start-of-selection.
WRITE: / 'Es ist', sy-uzeit USING EDIT MASK '__:__:__'.
set cursor line 3.
CALL FUNCTION:
'CONTROL_INIT',
'CONTROL_SETFUNCTIONCODE' EXPORTING fcode = '=/00',
'CONTROL_FLUSH'.
AT LINE-SELECTION.
READ LINE 3 OF CURRENT PAGE.
IF sy-index EQ 7.
CLEAR sy-index.
ENDIF.
ADD 1 TO sy-index.
WRITE: sy-uzeit USING EDIT MASK '__:__:__' TO sy-lisel+7.
CASE sy-index.
WHEN 1. MODIFY CURRENT LINE line FORMAT COLOR 1.
WHEN 2. MODIFY CURRENT LINE line FORMAT COLOR 2.
WHEN 3. MODIFY CURRENT LINE line FORMAT COLOR 3.
WHEN 4. MODIFY CURRENT LINE line FORMAT COLOR 4.
WHEN 5. MODIFY CURRENT LINE line FORMAT COLOR 5.
WHEN 6. MODIFY CURRENT LINE line FORMAT COLOR 6.
WHEN 7. MODIFY CURRENT LINE line FORMAT COLOR 7.
ENDCASE.
WAIT UP TO 1 SECONDS.
CALL FUNCTION:
'CONTROL_INIT',
'CONTROL_SETFUNCTIONCODE' EXPORTING fcode = '=PICK',
'CONTROL_FLUSH'.
Daniel
Tach,
na dann will ich auch noch was beisteuern
. Das ganze nennt sich Intermode Communication. (Kommunikation zwischen Modi, d.h. bidirektionale Kommunikation)
Notwendige Klasse:
CL_IMC_FACTORY
Interfaces: IF_IMC_CHILD_MODE, IF_IMC_PARENT_MODE
Relevante Methoden: Create_mode, get_mode_by_name, get_parent_mode
Gruss, R2D2
na dann will ich auch noch was beisteuern
. Das ganze nennt sich Intermode Communication. (Kommunikation zwischen Modi, d.h. bidirektionale Kommunikation)Notwendige Klasse:
CL_IMC_FACTORY
Interfaces: IF_IMC_CHILD_MODE, IF_IMC_PARENT_MODE
Relevante Methoden: Create_mode, get_mode_by_name, get_parent_mode
Gruss, R2D2
Hallo,
Für rein zeitgesteuerten Bildschirm-Refresh kann ich das
Program RSXDB_24 mit dem INCLUDE AUTO_REFR als Muster empfehlen.
In einem Dialogprogramm baue ich alle 60 Sek. den Bildschirm wieder auf. (löst PAI aus) ich habe im Top-Include noch zwei Felder definieren müssen: * for autorefresh **************
DATA: ACTIVEX(1) VALUE 'X'.
DATA AUTOREF(20) VALUE 'aktiv'.
und dann das Include eingebaut.
in der Ablauflogik PBO :
MODULE AUTO_REFR_INIT.
IF ACTIVEX = 'X'.
IF TIMER_IS_INITIALIZED = 'N'.
REPID = SY-REPID.
CALL FUNCTION 'CONTROL_INIT'.
PERFORM INIT_TIMER_CONTROL.
TIMER_IS_INITIALIZED = 'Y'.
AUTOREF = 'inaktiv'.
ENDIF.
ENDIF.
MODULE AUTO_REFR.
AUTOREF = 'aktiv'.
SECS = 60.
MODULE AUTO_REFR_DRILL.
IF ACTIVEX = 'X'.
IF AUTOREF = 'aktiv' OR AUTOREF = 'AKTIV'.
PERFORM DRILL_TIMER.
ENDIF.
FCODE = OK_CODE.
CLEAR OK_CODE.
ENDIF.
Da ich keine Ahnung von ABAP-OBJECTS habe habe ich die genaue Funktionsweise nicht untersucht. Es funktioniert. (REL. 45B)
Für rein zeitgesteuerten Bildschirm-Refresh kann ich das
Program RSXDB_24 mit dem INCLUDE AUTO_REFR als Muster empfehlen.
In einem Dialogprogramm baue ich alle 60 Sek. den Bildschirm wieder auf. (löst PAI aus) ich habe im Top-Include noch zwei Felder definieren müssen: * for autorefresh **************
DATA: ACTIVEX(1) VALUE 'X'.
DATA AUTOREF(20) VALUE 'aktiv'.
und dann das Include eingebaut.
in der Ablauflogik PBO :
MODULE AUTO_REFR_INIT.
IF ACTIVEX = 'X'.
IF TIMER_IS_INITIALIZED = 'N'.
REPID = SY-REPID.
CALL FUNCTION 'CONTROL_INIT'.
PERFORM INIT_TIMER_CONTROL.
TIMER_IS_INITIALIZED = 'Y'.
AUTOREF = 'inaktiv'.
ENDIF.
ENDIF.
MODULE AUTO_REFR.
AUTOREF = 'aktiv'.
SECS = 60.
MODULE AUTO_REFR_DRILL.
IF ACTIVEX = 'X'.
IF AUTOREF = 'aktiv' OR AUTOREF = 'AKTIV'.
PERFORM DRILL_TIMER.
ENDIF.
FCODE = OK_CODE.
CLEAR OK_CODE.
ENDIF.
Da ich keine Ahnung von ABAP-OBJECTS habe habe ich die genaue Funktionsweise nicht untersucht. Es funktioniert. (REL. 45B)
Seite 1 von 1
Vergleichbare Themen
1
Antw.
Antw.
1415
Views
Views
2
Antw.
Antw.
1339
Views
Views
2
Antw.
Antw.
2518
Views
Views
2
Antw.
Antw.
1637
Views
Views
Frage die ABAP Experten
Über diesen Beitrag
Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch
Aktuelle Forenbeiträge
Nach Transport von Stellen über RHMOVE30 nur Planvariante "nie verwenden"
vor 15 Stunden von DeathAndPain 2 / 287
vor 15 Stunden von DeathAndPain 2 / 287
Newsletter Anmeldung
Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.Die letzte Ausgabe findest du hier.
Aktuelle Forenbeiträge
Nach Transport von Stellen über RHMOVE30 nur Planvariante "nie verwenden"
vor 15 Stunden von DeathAndPain 2 / 287
vor 15 Stunden von DeathAndPain 2 / 287