[58084] in SAPr3-news
Subscreen in Tabstrip
daemon@ATHENA.MIT.EDU (Jens280181@web.de)
Tue Sep 12 05:05:54 2006
To: sapr3-news@mit.edu
Date: 12 Sep 2006 02:05:41 -0700
From: Jens280181@web.de
Message-ID: <1158051941.435676.229570@b28g2000cwb.googlegroups.com>
hallo zusammen.
ich bin so langsam aber sicher am verzweifeln! ;-(
ich hab mir ein dynpro 100 mit tabstrip (3 reiter) angelegt.
--> reiter1 =3D ETIK1
--> reiter2 =3D ETIK2
--> reiter3 =3D ETIK3
im ersten reiter "ETIK1" befindet sich ein subscreen 110.
in diesem subscreen gebe ich =FCber materialnummer- oder ean-selektion
den kurztext mit.
im subscreen-fenster befindet sich ein button zum weiterbl=E4ttern.
durch anklicken des buttons m=F6chte ich einen zweiten, neuen
subscreen-bereich im dynpro 110 ansehen.
wenn ich das ganze auch f=FCr die anderen beiden reiter abbilden
m=F6chte, bekomme ich entweder kurzdumps oder es wird nicht das
angezeigt was ich sehen m=F6chte?!
hier mal etwas coding:
PROCESS BEFORE OUTPUT.
MODULE status_0100.
MODULE fill_dynnr.
CALL SUBSCREEN sub1 INCLUDING sy-cprog dynnr.
CALL SUBSCREEN sub2 INCLUDING sy-cprog '0120'.
CALL SUBSCREEN sub3 INCLUDING sy-cprog '0130'.
MODULE clear_ok_code.
PROCESS AFTER INPUT.
CALL SUBSCREEN sub1.
CALL SUBSCREEN sub2.
CALL SUBSCREEN sub3.
MODULE user_command_0100.
MODULE clear_ok_code.
*----------------------------------------------------------------------*
***INCLUDE Z_ETIKETTEN_UEBERSICHT_FILLO01 .
*----------------------------------------------------------------------*
*&---------------------------------------------------------------------*
*& Module fill_dynnr OUTPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE fill_dynnr OUTPUT.
CASE etiketten_uebersicht-activetab.
WHEN 'ETIK1' OR 'BACK1'.
dynnr =3D '0110'.
WHEN 'ETIK2' OR 'BACK2'.
dynnr =3D '0120'.
WHEN 'ETIK3'.
dynnr =3D '0130'.
WHEN 'GO1'.
dynnr =3D '0111'.
WHEN 'GO2'.
dynnr =3D '0121'.
WHEN OTHERS.
etiketten_uebersicht-activetab =3D 'ETIK1'.
dynnr =3D '0110'.
ENDCASE.
ENDMODULE. " fill_dynnr OUTPUT
MODULE exit AT EXIT-COMMAND.
ich hoffe mir kann jemand weiterhelfen...danke schonmal.
gru=DF jens
