Solved: reg dialog programming

Former Member · ‎2007 Jul 17

Hi genius,

I want to create a list in dialog programming, any one can help me .

Regards,

Thanuskodi.

Former Member · ‎2007 Jul 17

DEMO_DYNPROS_AND_LISTS

Refer this program

Regards,

A.Singh

Former Member · ‎2007 Jul 17

Hi thanuskodi,

1. For doing this in dialog programming,

2. one of the ways is :

3. Use write statements,

and then finally give

LEAVE TO LIST-PROCESSING.

regards,

amit m.

former_member491305 · ‎2007 Jul 17

Hi,

Use leave to list-processing statement to shift from dialog mode to list mode.

Former Member · ‎2007 Jul 17

DEMO_DYNPROS_AND_LISTS

Refer this program

Regards,

A.Singh

Former Member · ‎2007 Jul 17

HI

TRANSACTION CODES

MENU PAINTER : SE 41.

SCREEN PAINTER : SE 51 .

BOTH : SE 80 .

 ONLY EXISTING PROGRAMS CAN BE VIEWED IN SE 41 , SO USE SE 38 .

CONCEPT :

STEPS :

1. GIVE TRANSACTION CODE SE 38 , CREATE A REPORT NAMED

" ZVRPRDIALOGTEST2 " . SAVE , CHECK , ACTIVATE IT .

2. THEN GIVE CODE SE 51. GIVE SAME PROGRAM NAME AS SE38 .

GIVE SCREEN NUMBER , PRESS CREATE .

3. GIVE SHORT DESCRIPTION . THEN CLICK ELEMENT LIST .

4. THE SCREEN COMES , TYPE " OKCODE " .

5. CLICK FLOW LOGIC , THE SCREEN COMES .

6. one screen will come.

7. SAVE . CHECK , ACTIVATE .

8. CLICK LAYOUT . SCREN PAINTER SCREEN COMES .

9. PRESS " F6 " . TYPE TABLE NAME , PRESS ENTER . THE SCREEN COMES .

10 . TO SELECT THE DESIRED FIELDS , CLICK THE " TO SELECT " AREA IN

EACH ROW , PRESS ENTER .

11 . AFTER CLICKING , PRESS ENTER .

12. THE FINAL SELECTION WIL COME

13 . GIVE THE NESSARY BUTTONS IN THE SCREEN PAINTER .

14 . DOUBLE CLICK IN EACH BUTTON GIVE LABLE , FUNCTION CODE .

15 . THE FINAL SCREEN WIL COME

16 . SAVE . CHECK .ACTIVATE. TO CHECK SCREEN PRESS F8.

17 . TO WRITE CODING : PRESS FLOW LOGIG .

18 . THE SCREEN COMES .

19 . DOUBLE CLICK FIRST EVENT ( MODULE STATUS _ 3000 ).

20 . PBO MODULE WINDOW COMES , PRESS TICK MARK .

21 . EDITOR COMES . SAVE .

TYPING PROGRAM IN THE EDITOR

Steps :

THE EDITOR WILL BE AS SHOWN ABOVE , NOW TYPE THE FOLLOWING CODE .

NOTE :

BEFORE TYPING CODE : TAKE COMMENTS FROM , THEN TYPE LIKE :

 SET PF_STATUS ' PRSTATUS '
SET TITLEBAR 'PRTITLE' .


THE COMPLETE REPORT

*&---------------------------------------------------------------------*
*& Module STATUS_3000 OUTPUT
*&---------------------------------------------------------------------* 
* text
*----------------------------------------------------------------------*
TABLES : ZVTIKFS.
DATA BEGIN OF INT_TAB OCCURS 0.
INCLUDE STRUCTURE ZVTIKFS.
DATA END OF INT_TAB.
DATA OKCODE LIKE SY-UCOMM. 
DATA INDEX TYPE I VALUE 1.
*---------------------------------------------------------------------*
* MODULE STATUS_3000 OUTPUT *
*---------------------------------------------------------------------*
* ........ * 
*---------------------------------------------------------------------*
MODULE STATUS_3000 OUTPUT.
SET PF-STATUS 'PRSTATUS'. "COMMENTS TOOK 
SET TITLEBAR 'PRTITLE1'. " COMMENTS TOOK
SELECT * FROM ZVTIKFS INTO TABLE INT_TAB. 
READ TABLE INT_TAB INDEX INDEX.
ZVTIKFS-NAME = INT_TAB-NAME.
ZVTIKFS-ADDRESS = INT_TAB-ADDRESS.
ZVTIKFS-PHONE = INT_TAB-PHONE.
ZVTIKFS-AREA = INT_TAB-AREA.
ENDMODULE. " STATUS_3000 OUTPUT
*&---------------------------------------------------------------------* 
*& Module USER_COMMAND_3000 INPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE USER_COMMAND_3000 INPUT. 
CASE OKCODE.
WHEN 'INS'.
INSERT ZVTIKFS.
WHEN 'DEL'.
DELETE ZVTIKFS.
WHEN 'PRE'.
INDEX = INDEX - 1.
IF INDEX < 1.
INDEX = 1.
ENDIF.
WHEN 'NEX'.
INDEX = INDEX + 1. 
IF INDEX > SY-DBCNT.
INDEX = SY-DBCNT.
ENDIF.
WHEN 'EXI'.
LEAVE PROGRAM.
ENDCASE.
ENDMODULE. " USER_COMMAND_3000 INPUT
 
NEXT :
SAVE , CHECK , ACTIVATE .

TO COME TO DESIGN MENU

STEPS :

1 . TRANSACTION CODE : SE 80 . OBJECT NAVIGATOR WINDOW COMES .

NOTE : IF YOUR REOORT DOSENOT COME DO THE FOLLOWING PROCESS :

Vey useful link:

http://sap.mis.cmich.edu/sap-abap/abap09/index.htm

Other links:

http://help.sap.com/saphelp_nw2004s/helpdata/en/fc/eb2d40358411d1829f0000e829fbfe/content.htm

http://help.sap.com/saphelp_nw04/helpdata/en/10/e7dbde82ba11d295a40000e8353423/content.htm

For Screens

http://help.sap.com/saphelp_47x200/helpdata/en/e4/2adbef449911d1949c0000e8353423/content.htm

Screen elements