Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

regarding staus

Former Member
0 Likes
893

hai,

pls send the demo program for status icons i.e accepted,rejected and processing.

with regards,

R.Dhineshraj.

1 ACCEPTED SOLUTION
Read only

Former Member

hai,

pls send the demo program for status icons i.e accepted,rejected and processing.

with regards,

R.Dhineshraj.

7 REPLIES 7
Read only

Former Member
0 Likes
864

look at program : DEMO_DYNPRO_STATUS_ICONS

Read only

Former Member
0 Likes
864

hiii

use DEMO_DYNPRO_STATUS_ICONS program

regards

twinkal

Read only

Former Member
Read only

Former Member
0 Likes
864

Hi Dinesh,

Try the following;

REPORT demo_dynpro_status_icons.
 
DATA value TYPE i VALUE 1.
 
DATA: status_icon TYPE icons-text,
      icon_name(20) TYPE c,
      icon_text(10) TYPE c.
 
CALL SCREEN 100.
 
MODULE set_icon OUTPUT.
 
  SET PF-STATUS 'SCREEN_100'.
 
  CASE value.
    WHEN 1.
      icon_name = 'ICON_GREEN_LIGHT'.
      icon_text =  text-003.
    WHEN 2.
      icon_name = 'ICON_YELLOW_LIGHT'.
      icon_text =  text-002.
    WHEN 3.
      icon_name = 'ICON_RED_LIGHT'.
      icon_text =  text-001.
  ENDCASE.
 
  CALL FUNCTION 'ICON_CREATE'
       EXPORTING
            name                  = icon_name
            text                  = icon_text
            info                  = 'Status'
            add_stdinf            = 'X'
       IMPORTING
            result                = status_icon
       EXCEPTIONS
            icon_not_found        = 1
            outputfield_too_short = 2
            OTHERS                = 3.
 
  CASE sy-subrc.
    WHEN 1.
      MESSAGE e888(sabapdocu) WITH text-004.
    WHEN 2.
      MESSAGE e888(sabapdocu) WITH text-005.
    WHEN 3.
      MESSAGE e888(sabapdocu) WITH text-006.
  ENDCASE.
 
ENDMODULE.
 
MODULE cancel INPUT.
  LEAVE PROGRAM.
ENDMODULE.
 
MODULE change.
  CASE value.
    WHEN 1.
      value = 2.
    WHEN 2.
      value = 3.
    WHEN 3.
      value = 1.
  ENDCASE.
ENDMODULE.

Regards,

Chandra Sekhar

Read only

Former Member
0 Likes
864

hi get the icons from the table ICON

Read only

Former Member
0 Likes
864

Hi,

You can also try the following demo program in IDES

ZIDES_SHOW_ICONS

Adarsh

Read only

Former Member
0 Likes
864

Hi,

You can set status for particular screen in the following way:

1: Go at the PBO module of the screen by double click at the screen no suppose 100. and write any name for the status within single quotes here this name is S100.

module status_0100 output.

set pf-status 'S100'.

set titlebar 'SPA'

endmodule. " STATUS_0100 OUTPUT

after clicking on this u will get an screen opened there u can define menu bar icon application bar etc... according to ur need..

whatever u define there u need to activate and then u need to do coding in the PAI event using OK_code like sy-ucomm.

Here is the small example:---

module exit input.

case ok_code.

when 'EXIT' or 'CANC' or 'BACK'.

clear ok_code.

leave to screen 0.

endcase.

endmodule. " EXIT INPUT

ya one more thing dont forget to define ok_code in element list of that screen...

I hope u will get some help..

Thanks & Regards

Ashu Singh