User Command

Getting started ... Alles für einen gelungenen Start.
8 Beiträge • Seite 1 von 1
8 Beiträge Seite 1 von 1

User Command

Beitrag von LittleT (ForumUser / 48 / 0 / 0 ) »
Hallo alle zusammen,

leider habe ich in der Suche nichts gefunden was auf meinen Fall passt.
Folgendes Problem. Ich schreibe ein Programm das zwei Buttons hat. Jedoch reagiert mein Programm nicht auf die Buttons. Ich hab schon fast alles ausprobiert. Anbei noch der Quelltext.

Code: Alles auswählen.

************************************************************************
**         BILDSCHIRMBILD
************************************************************************

SELECTION-SCREEN BEGIN OF BLOCK auswahl
                  WITH FRAME TITLE text-001.

SELECT-OPTIONS zauart FOR aufk-auart.
PARAMETERS: ztrans TYPE c AS CHECKBOX.
SELECT-OPTIONS: zgstrp FOR afko-gstrp.
SELECT-OPTIONS: zgltrp FOR afko-gltrp.
SELECT-OPTIONS: zfevor FOR afko-fevor.
SELECT-OPTIONS: zingpr FOR afih-ingpr.

SELECTION-SCREEN END OF BLOCK auswahl.

************************************************************************
**        INITIALIZATION
************************************************************************
INITIALIZATION.
  PERFORM set_gui_status.


************************************************************************
**         AT USER-COMMAND
************************************************************************
START-OF-SELECTION.
  WRITE: 'test'.

END-OF-SELECTION.

AT USER-COMMAND.
  WRITE: sy-ucomm.

AT SELECTION-SCREEN OUTPUT.
  PERFORM test.




*---------------------------------------------------------------------*
*       FORM sy_ucomm_ermitteln                                       *
*---------------------------------------------------------------------*
*       ........                                                      *
*---------------------------------------------------------------------*
FORM test.

  CASE sy-pfkey.
    WHEN 'DOCS'.
*    CS Aufträge
      WRITE: 'DOCS'.
    WHEN 'DOPP'.
*    PP Aufträge
      WRITE: 'DOPP'.
    WHEN 'BACK'.
      LEAVE PROGRAM.
  ENDCASE.

ENDFORM.



*---------------------------------------------------------------------*
*       FORM set_gui_status                                           *
*---------------------------------------------------------------------*
*       ........                                                      *
*---------------------------------------------------------------------*
FORM set_gui_status.

  SET PF-STATUS '0100'.
  SET TITLEBAR 'DRUCKT0100'.

ENDFORM.
Was mache ich da falsch?

Gruß
LittleT
Es ist nicht schlimm nichts zu wissen, nichts dagegen zu unternehmen ist schlimm.

gesponsert
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten


Beitrag von jela (ForumUser / 3 / 0 / 0 ) »
Hallo,
versuche mal :
at user-command.
CASE sy-ucomm.
WHEN 'DOCS'.
* CS Aufträge
WRITE: 'DOCS'.
WHEN 'DOPP'.
* PP Aufträge
WRITE: 'DOPP'.
WHEN 'BACK'.
LEAVE PROGRAM.
ENDCASE.

sy-pfkey gibt nur den Namen des aktuellen gui-status zurück.

Gruß
Jela

Beitrag von LittleT (ForumUser / 48 / 0 / 0 ) »
Hallo,

danke für die schnelle Antwort. Auch der Hinweis führte mich nicht zum Erfolg.
In der Dokumentation steht auch immer sy-ucomm.
Aber ich kann nichtmal durchdebugen weil das Programm gar nicht startet. Im Gui Status habe ich aber den Feldern das BACK und DOPP und DOCS zugeordnet.

Was könnte es noch sein?

Gruß
LittleT
Es ist nicht schlimm nichts zu wissen, nichts dagegen zu unternehmen ist schlimm.

Beitrag von MarkusW (Specialist / 406 / 5 / 0 ) »
LittleT hat geschrieben:Was könnte es noch sein?

Gruß
LittleT
So wie ich das sehe, hast du kein eigenes Dynpro...sondern nur das Selektionsbild (standard die Nummer 1000)

Bei deinem Programm.

zum einen gehören die 'AT ...' Bereiche VOR 'Start-of-Selection', aber das nur mal so am rande ;)

Kann es sein, dass dein Programm nur "test" ausgibt und dann fertig ist???

Dein Unterprogramm 'test' wird bei ausgeben des Selectionsbildes durchlaufen, zu dem Zeitpunkt gibt es kein sy-ucomm, also ich mein natürlich kein Inhalt in dem systemfeld ;)

weshalb du allerdings ein extra status setzt ist mir noch schleierhaft...das wird beim Selektionsbildschirm (1000) standardmässig vom system erstellt.
Oder meintest du mit deinen buttons die buttonleiste? und hast die im status gesetzt?

Was soll denn überhaupt passieren und wie sieht dein selektionsbild aus?

Gruß
Markus

Beitrag von Krueger ( / / 0 / 3 ) »
Es gibt mindestens drei Möglichkeiten, eigene Drucktasten in den 1000er-Report-Bildschirm zu bekommen:


Code: Alles auswählen.


Evtl. VORarbeiten:

Tables:  sscrfields.

DATA functxt TYPE smp_dyntxt.


*******************************
INITIALIZATION.
** 1. Möglichkeit
*  CALL FUNCTION 'RS_SET_SELSCREEN_STATUS'
*       EXPORTING
*            p_status  = 'irgendeinstatus'
*            p_program = 'aus einem anderen Programm'
*       TABLES
*            p_exclude = i_rsexfcode.

*** 2. Möglichkeit
***SET PF-STATUS 'EIGENE_STATUS'.

*** 3.Möglichkeit:
  functxt-icon_id   = ICON_SIMULATE.
  functxt-quickinfo = 'Anzeigen TEST'.
  functxt-icon_text = 'IrgendeinText'.
  sscrfields-functxt_01 = functxt.

  functxt-icon_id   = icon_search.
  functxt-quickinfo = 'Stringsuche...'.
  functxt-icon_text = 'Scanen...'.
  sscrfields-functxt_02 = functxt.

****************************************

***  AUF DEM SELEKTIONS-BILDSCHIRM
........
........
SELECTION-SCREEN: FUNCTION KEY 1,
                                   FUNCTION KEY 2.

*****************************************

At selection-Screen.

 CASE sscrfields-ucomm.
    WHEN 'FC01'.   
    When 'FC02'.
when others
endcase.



Beitrag von LittleT (ForumUser / 48 / 0 / 0 ) »
Hallo alle zusammen,

es funktioniert jetzt halbwegs. Ich habe also diesen Bildschirm und wenn oben im Gui Status habe ich 2 Buttons drinnen. Und je nachdem welcher gedrückt wird soll eine andere Routine durchlaufen werden.
Jetzt funktioniert es dass ich mit BACK oder F3 wieder zurück komme. In sy-ucomm ist auch mein wert drinnen den ich vorher definiert habe. Nur wenn ich dann eine write anweisung mache wird nichts ausgegeben. Muss ich das dann anders machen?

Code: Alles auswählen.

CASE sy-ucomm.
    WHEN 'DOCS'.
*     CS Aufträge
      WRITE:
 'Da müsste ich jetzt in die Docs sein',
'ich komme auch hier rein beim debugen bin ich da',
'aber auf den Bildschirm schreibt er mir nichts :-)',
'wisst ihr woran das liegt?'.
    WHEN 'DOPP'.
*     PP Aufträge
      WRITE: 'DOPP'.
    WHEN 'BACK' or 'CANCEL' or 'EXIT'.
      LEAVE PROGRAM.
  ENDCASE.
Beim Debugen habe ich gesehen, dass er in die DOCS verarbeitung hineingeht, aber anzeigen tut er mir nichts! :-(
Es ist nicht schlimm nichts zu wissen, nichts dagegen zu unternehmen ist schlimm.

Beitrag von black_adept (Top Expert / 4092 / 127 / 940 ) »
LittleT,

Wo befindest du dich , wenn du auf einen der Buttons drückst?

Auf einem Selektionsbild oder auf einer (ausgegebenen) Liste?
live long and prosper
Stefan Schmöcker

email: stefan@schmoecker.de

Beitrag von LittleT (ForumUser / 48 / 0 / 0 ) »
Hallo,

zweiteres, noch auf einem Selektionsbild. Wenn ich einen Button drücke, dann springe ich in das At Selection-screen Ereignis.

Gruß
LittleT
Es ist nicht schlimm nichts zu wissen, nichts dagegen zu unternehmen ist schlimm.

Seite 1 von 1

Vergleichbare Themen

5
Antw.
9635
Views
At Exit-Command
von pepito84 » 04.03.2009 20:31 • Verfasst in Dialogprogrammierung
5
Antw.
4226
Views
user command
von dennsen » 12.06.2007 14:22 • Verfasst in ABAP® Core
2
Antw.
2182
Views
Pflichtfelder und AT EXIT-COMMAND
von kkauerau » 21.02.2018 14:06 • Verfasst in ABAP® für Anfänger
4
Antw.
1682
Views
Button user-command
von hmaxi96 » 25.01.2016 09:59 • Verfasst in ABAP® für Anfänger
10
Antw.
5329
Views
Reuse ALV User command
von Niels » 26.08.2015 15:59 • Verfasst in ABAP® Core

Aktuelle Forenbeiträge

Trennen Strasse und Hausnummer
vor 25 Minuten von ralf.wenzel 16 / 10767
Dialog-Container mit Toolbar/Status
vor 32 Minuten von black_adept gelöst 25 / 3900
User Exit EXIT_RQCPRM10_001
vor 21 Stunden von a-dead-trousers 2 / 355
Daten an Tabelle binden
Gestern von Lukas Sanders 2 / 1408

Newsletter Anmeldung

Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.
Die letzte Ausgabe findest du hier.
Details zum Versandverfahren und zu Ihren Widerrufsmöglichkeiten findest du in unserer Datenschutzerklärung.

Aktuelle Forenbeiträge

Trennen Strasse und Hausnummer
vor 25 Minuten von ralf.wenzel 16 / 10767
Dialog-Container mit Toolbar/Status
vor 32 Minuten von black_adept gelöst 25 / 3900
User Exit EXIT_RQCPRM10_001
vor 21 Stunden von a-dead-trousers 2 / 355
Daten an Tabelle binden
Gestern von Lukas Sanders 2 / 1408

Unbeantwortete Forenbeiträge

aRFC im OO-Kontext
vor 4 Wochen von ralf.wenzel 1 / 2937
Hilfe bei SWEC/SWE2
September 2024 von retsch 1 / 9531