Benutzername Formular

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

Benutzername Formular

Beitrag von christof (Specialist / 122 / 6 / 0 ) »
Hallo zusammen.
Ich habe folgendes Problem...
Ich möchte den Benutzername auf das Formular andrucken. Komischerweise druckt es das erste mal nicht an, erst beim zweiten mal.

Dies wäre mein Code-Beispiel? Habe ich hier etwas falsch gemacht?

Code: Alles auswählen.

FORM NAME.

    DATA:       w_name_text TYPE ad_namtext.


              SELECT SINGLE name_text
         INTO  w_name_text
         FROM  usr21
         INNER JOIN adrp
         ON    adrp~persnumber = usr21~persnumber
         WHERE usr21~bname = sy-uname.

ENDFORM.
Vielen Dank für eure Hilfe

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


Re: Benutzername Formular

Beitrag von Daniel123 (ForumUser / 8 / 1 / 1 ) »
Hallo Cristof,

du musst mir nochmal aufs Pferd helfen. Das Coding ist vermutlich aus einem Druckprogramm von einem SAP-Script Formular und du defnierst eine lokale Variable mit dem Namen 'w_name_text', welchen du dann auf dem Formular drucken möchtest? Welchen Inhalt hast du denn in der Variable, wenn du beim Ersten Aufruf bist? Wie verhält es sich damit, wenn du das Perform verlassen hast? Gibt es die gleiche Bezeichnung für eine Varaible nochmals im Rahmenprgramm?

Grüße Daniel

Re: Benutzername Formular

Beitrag von christof (Specialist / 122 / 6 / 0 ) »
Hallo

Hab ich mir schon gedacht, das ich ein bisschen zu wenig Informationen geschrieben habe.
Das Coding ist ein Ausschnitt von einem Programm das ich für den Druck von einem Formular benütze.
Im Formular möchte ich dann w_name_text drucken.
Mein Problem ist aber das es beim w_name_text beim ersten Druck nicht ausgibt, sondern erst beim zweiten.
Sobald ich die Transaktion verlasse und wieder neu einsteige habe ich wieder das gleiche Problem.

Hier mal der komplette Code

Code: Alles auswählen.

[/REPORT ZR_SERV_PROG1.


     DATA:  h_lgpbe type lgpbe.
           w_name_text TYPE ad_namtext.


INCLUDE RIPRID01.                      " General DATA and TABLE struct.


*------------------*
START-OF-SELECTION.
*------------------*
 PERFORM PRINT_PAPER.  "can be started via SUBMIT or PERFORM PRINT_PAPER
*$*$ ................ M A I N     F O R M .............................*
*... DATA STRUCTURE: ..................................................*
*...                                                                   *
*...    CAUFVD (AFIH AUFK AFKO plus other dialog fields: ORDER HEADER) *
*...     !                                                             *
*...     !-- AFVGD       (AFVC AFVV plus dialog fields) Order operatns *
*...     !   !                                                         *
*...     !   !-- The sub operations also stored AFVGD and are pre      *
*...     !   !   sorted. The SUMNR fields distinguishes Main operaitons*
*...     !   !   and sub operations                                    *
*...     !   !-- AFFHD             Prod Resources                      *
*...     !-- RESBD                 Materials                           *
*...     !-- RIPW0                 Object list dialog area             *
*......................................................................*

*----------------------------------------------------------------------*
*       FORM PRINT_PAPER                                               *
*----------------------------------------------------------------------*
*       Main driving Form behind the Printing of Papers                *
*       All information is imported from MEMORY                        *
*----------------------------------------------------------------------*
*  -->  FORM        Name of SAPSCRIPT form to use.                     *
*  -->  WWORKPAPER  Print options for SAPSCRIPT.                       *
*                   Structure command to define wworkpaper so the      *
*                   individual fields can be addressed.                *
*  -->  DATA STRUCTURES    See form DATA_IMPORT INCLUDE RIPRID01       *
*----------------------------------------------------------------------*
*$*$ -   P  R  I  N   T       P  A  P  E  R
FORM PRINT_PAPER.                      " This form name must be used !!!
*$*$ -  STARTED BY EXTERNAL PERFORM
  PERFORM ORDER_DATA_IMPORT.           " See INCLUDE RIPRIf02
  PERFORM MAIN_PRINT.      " Print the PAPER now


ENDFORM.


                           CAUFVD-AUFNR" order obj number as key
                           ' '.        " New form for each Order
  PERFORM LOCK_AND_SET                 " Enque and determine copy number
          USING C_HEADER_ORDER.        " open for Header level
  PERFORM SET_TITLE.
  PERFORM NAME.
  PERFORM TITLE_PAGE.
  PERFORM READ_ORDER_TEXT_TABLES.      " Read tables for CAUFVD
  PERFORM ORDER_HEADER_SHORT.  " Now print the order header see f02
  PERFORM PARTNER_DETAILS              " prints partner details
          TABLES ORDER_IHPAD_TAB.                           "
  PERFORM TECH_OBJECT_PARTNER          " partner address equi / F.Locat
          USING CAUFVD-EQUNR                                "
                CAUFVD-TPLNR.                                "
  PERFORM DMS_OBJECT_PRINT USING CAUFVD-EQUNR  "EPS drawing print
                                 CAUFVD-TPLNR.               "
  PERFORM OPERATIONS_WITH_MAT. " reservations are printed with Op.
  PERFORM END_OF_REPORT.               " Print end of report line
  PERFORM CLOSE_FORM.                  " Close the form.
  PERFORM UNLOCK_AND_LOG.              " Dequeue and Log print

ENDFORM.

*$*$   F O R M    R O U T I N E S -------------------------------------*
*...   Includes for General and Sepcific form routines
INCLUDE RIPRIF01.                      " General PRINT routines
INCLUDE RIPRIF02.                      " General PRINT routines ORDERS




FORM NAME.

   CLEAR w_name_text.


              SELECT SINGLE name_text
         INTO  w_name_text
         FROM  usr21
         INNER JOIN adrp
         ON    adrp~persnumber = usr21~persnumber
         WHERE usr21~bname = sy-uname.


ENDFORM.

code]

Re: Benutzername Formular

Beitrag von Unit605 (Expert / 975 / 37 / 93 ) »
christof hat geschrieben:Hallo zusammen.
Ich habe folgendes Problem...
Ich möchte den Benutzername auf das Formular andrucken. Komischerweise druckt es das erste mal nicht an, erst beim zweiten mal.

Dies wäre mein Code-Beispiel? Habe ich hier etwas falsch gemacht?

Code: Alles auswählen.

FORM NAME.

    DATA:       w_name_text TYPE ad_namtext.


              SELECT SINGLE name_text
         INTO  w_name_text
         FROM  usr21
         INNER JOIN adrp
         ON    adrp~persnumber = usr21~persnumber
         WHERE usr21~bname = sy-uname.

ENDFORM.
Vielen Dank für eure Hilfe
Fehlendes ERRORHANDLING hinter dem SELECT SINGLE!

Re: Benutzername Formular

Beitrag von christof (Specialist / 122 / 6 / 0 ) »
Sorry wenn ich nochmals nachfrage?
Aber was ist mit Errorhandling genau gemeint?
Google gibt mir da nicht gerade viel Rat dazu

Re: Benutzername Formular

Beitrag von a-dead-trousers (Top Expert / 4271 / 213 / 1140 ) »

Code: Alles auswählen.

if sy-subrc ne 0.
* Fehler: Keine Daten gefunden!
endif.
Theory is when you know something, but it doesn't work.
Practice is when something works, but you don't know why.
Programmers combine theory and practice: Nothing works and they don't know why.

ECC: 6.18
Basis: 7.50

Re: Benutzername Formular

Beitrag von Daniel123 (ForumUser / 8 / 1 / 1 ) »
a-dead-trousers hat geschrieben:

Code: Alles auswählen.

if sy-subrc ne 0.
* Fehler: Keine Daten gefunden!
endif.
Erweiter ddas Fehlerhandling noch um so etwas:

Code: Alles auswählen.

if sy-subrc ne 0.
w_name_text = 'Felix Fehler'.
endif.
Dann weißt du auch beim Ausdruck des Formulars, dass die Selektion schief gelaufen ist.

Re: Benutzername Formular

Beitrag von christof (Specialist / 122 / 6 / 0 ) »
Vielen Dank, nun habe ich den Fehler gefunden. War total an einem anderen Ort

Vielen Dank nochmals

Seite 1 von 1

Vergleichbare Themen

2
Antw.
1653
Views
Benutzername Formular
von christof » 27.02.2015 15:32 • Verfasst in ABAP® für Anfänger
2
Antw.
5020
Views
Benutzername-> gesamter Name
von abap-strizi » 08.08.2006 11:24 • Verfasst in ABAP® Core
3
Antw.
4710
Views
Benutzername im Benutzerstamm
von brunsdo » 09.02.2016 13:13 • Verfasst in ABAP® für Anfänger
13
Antw.
5970
Views
3
Antw.
2551
Views
Smartforms Formular nach SAPscript Formular aufrufen
von walda33 » 26.01.2014 10:14 • Verfasst in ABAP® für Anfänger

Aktuelle Forenbeiträge

Zwischensumme Adobe Forms
vor 3 Tagen von Lucyalison 1 / 64
Interne Tabelle
vor 5 Tagen von black_adept 2 / 133
MaLo-Checker in ABAP
vor einer Woche von A6272 6 / 254

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

Zwischensumme Adobe Forms
vor 3 Tagen von Lucyalison 1 / 64
Interne Tabelle
vor 5 Tagen von black_adept 2 / 133
MaLo-Checker in ABAP
vor einer Woche von A6272 6 / 254

Unbeantwortete Forenbeiträge

Zwischensumme Adobe Forms
vor 3 Tagen von Lucyalison 1 / 64
Group Items auf einer Filterbar
vor einer Woche von Bright4.5 1 / 107
tRFC Transaktionen SM58
vor 4 Wochen von A6272 1 / 140