topic Re: Problem with PF-STATUS in Application Development and Automation Discussions

Problem with PF-STATUS

Former Member — Tue, 16 Oct 2007 11:04:55 GMT

Hello everyone,

I have a problem with pf-status. I have already declared a PF-STATUS and passed the name of the subroutine which sets the PF-STATUS of the report to the function module for ALV. However, when I execute the report, my buttons in my customized pf-status do not show up.

Any ideas?

Thanks,

Jim

Re: Problem with PF-STATUS

Former Member — Tue, 16 Oct 2007 11:20:11 GMT

Hi,

Refer to the following link:

http://www.sapdev.co.uk/reporting/alv/alvgrid_pfstatus.htm

Hope this helps.

Reward if helpful.

Regards,

Sipra

Re: Problem with PF-STATUS

Former Member — Tue, 16 Oct 2007 11:22:31 GMT

is your ALV getting displayed through same report as that of PF-STATUS Declaration report?

Is it OO ALV?

Re: Problem with PF-STATUS

Former Member — Tue, 16 Oct 2007 11:23:05 GMT

hi,

check whether u had actually activated that ur pf-staus for not. and try n find out by debugging whether ur pf is passsing to sub routine or not.

if helpful reward some points.

with regards,

Suresh Aluri.

Re: Problem with PF-STATUS

Former Member — Tue, 16 Oct 2007 11:25:41 GMT

see this program ir may help you

The follow program demonstrates how to capture which rows of the ALV grid the user has selected.

Changes required from a basic ALV grid include adding a new field to ALV grid data table(it_ekko-sel) and

adding an entry to the layout control table (gd_layout-box_fieldname = 'SEL'). Please note you need to use

the SHIFT and CONTROL keys to select multiple rows!

&----

*& Report ZDEMO_ALVGRID_SELROW *

*& *

&----

*& *

*& Example of a simple ALV Grid Report *

*& ................................... *

*& *

*& The basic ALV grid, Enhanced to display capture each row a user has *

*& selected *

&----

REPORT zdemo_alvgrid_selrow .

TABLES: ekko.

type-pools: slis. "ALV Declarations

*Data Declaration

*----

TYPES: BEGIN OF t_ekko,

SEl, "stores which row user has selected

ebeln TYPE ekpo-ebeln,

ebelp TYPE ekpo-ebelp,

statu TYPE ekpo-statu,

aedat TYPE ekpo-aedat,

matnr TYPE ekpo-matnr,

menge TYPE ekpo-menge,

meins TYPE ekpo-meins,

netpr TYPE ekpo-netpr,

peinh TYPE ekpo-peinh,

END OF t_ekko.

DATA: it_ekko TYPE STANDARD TABLE OF t_ekko INITIAL SIZE 0,

wa_ekko TYPE t_ekko.

*ALV data declarations

data: fieldcatalog type slis_t_fieldcat_alv with header line,

gd_tab_group type slis_t_sp_group_alv,

gd_layout type slis_layout_alv,

gd_repid like sy-repid.

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

*Start-of-selection.

START-OF-SELECTION.

perform data_retrieval.

perform build_fieldcatalog.

perform build_layout.

perform display_alv_report.

&----

*& Form BUILD_FIELDCATALOG

&----

Build Fieldcatalog for ALV Report

----

form build_fieldcatalog.

There are a number of ways to create a fieldcat.
For the purpose of this example i will build the fieldcatalog manualy
by populating the internal table fields individually and then
appending the rows. This method can be the most time consuming but can
also allow you more control of the final product.

Beware though, you need to ensure that all fields required are
populated. When using some of functionality available via ALV, such as
total. You may need to provide more information than if you were
simply displaying the result
I.e. Field type may be required in-order for
the 'TOTAL' function to work.

fieldcatalog-fieldname = 'EBELN'.

fieldcatalog-seltext_m = 'Purchase Order'.

fieldcatalog-col_pos = 0.

fieldcatalog-outputlen = 10.

fieldcatalog-emphasize = 'X'.

fieldcatalog-key = 'X'.

fieldcatalog-do_sum = 'X'.
fieldcatalog-no_zero = 'X'.

append fieldcatalog to fieldcatalog.

clear fieldcatalog.

fieldcatalog-fieldname = 'EBELP'.

fieldcatalog-seltext_m = 'PO Item'.

fieldcatalog-col_pos = 1.

append fieldcatalog to fieldcatalog.

clear fieldcatalog.

fieldcatalog-fieldname = 'STATU'.

fieldcatalog-seltext_m = 'Status'.

fieldcatalog-col_pos = 2.

append fieldcatalog to fieldcatalog.

clear fieldcatalog.

fieldcatalog-fieldname = 'AEDAT'.

fieldcatalog-seltext_m = 'Item change date'.

fieldcatalog-col_pos = 3.

append fieldcatalog to fieldcatalog.

clear fieldcatalog.

fieldcatalog-fieldname = 'MATNR'.

fieldcatalog-seltext_m = 'Material Number'.

fieldcatalog-col_pos = 4.

append fieldcatalog to fieldcatalog.

clear fieldcatalog.

fieldcatalog-fieldname = 'MENGE'.

fieldcatalog-seltext_m = 'PO quantity'.

fieldcatalog-col_pos = 5.

append fieldcatalog to fieldcatalog.

clear fieldcatalog.

fieldcatalog-fieldname = 'MEINS'.

fieldcatalog-seltext_m = 'Order Unit'.

fieldcatalog-col_pos = 6.

append fieldcatalog to fieldcatalog.

clear fieldcatalog.

fieldcatalog-fieldname = 'NETPR'.

fieldcatalog-seltext_m = 'Net Price'.

fieldcatalog-col_pos = 7.

fieldcatalog-outputlen = 15.

fieldcatalog-do_sum = 'X'. "Display column total

fieldcatalog-datatype = 'CURR'.

append fieldcatalog to fieldcatalog.

clear fieldcatalog.

fieldcatalog-fieldname = 'PEINH'.

fieldcatalog-seltext_m = 'Price Unit'.

fieldcatalog-col_pos = 8.

append fieldcatalog to fieldcatalog.

clear fieldcatalog.

endform. " BUILD_FIELDCATALOG

&----

*& Form BUILD_LAYOUT

&----

Build layout for ALV grid report

----

form build_layout.

gd_layout-box_fieldname = 'SEL'.

"set field name to store row selection

gd_layout-edit = 'X'. "makes whole ALV table editable

gd_layout-zebra = 'X'.

endform. " BUILD_LAYOUT

&----

*& Form DISPLAY_ALV_REPORT

&----

Display report using ALV grid

----

form display_alv_report.

gd_repid = sy-repid.

call function 'REUSE_ALV_GRID_DISPLAY'

exporting

i_callback_program = gd_repid

i_callback_top_of_page = 'TOP-OF-PAGE' "see FORM

i_callback_user_command = 'USER_COMMAND'

i_grid_title = outtext

is_layout = gd_layout

it_fieldcat = fieldcatalog[]

it_special_groups = gd_tabgroup
IT_EVENTS = GT_XEVENTS

i_save = 'X'

is_variant = z_template

tables

t_outtab = it_ekko

exceptions

program_error = 1

others = 2.

if sy-subrc <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

endif.

endform. " DISPLAY_ALV_REPORT

&----

*& Form DATA_RETRIEVAL

&----

Retrieve data form EKPO table and populate itab it_ekko

----

form data_retrieval.

select ebeln ebelp statu aedat matnr menge meins netpr peinh

up to 10 rows

from ekpo

into corresponding fields of table it_ekko.

endform. " DATA_RETRIEVAL

----

FORM USER_COMMAND *

----

--> R_UCOMM *
--> RS_SELFIELD *

----

FORM user_command USING r_ucomm LIKE sy-ucomm

rs_selfield TYPE slis_selfield.

Check function code

CASE r_ucomm.

WHEN '&IC1'.

Check field clicked on within ALVgrid report

IF rs_selfield-fieldname = 'EBELN'.

Read data table, using index of row user clicked on

READ TABLE it_ekko INTO wa_ekko INDEX rs_selfield-tabindex.

Set parameter ID for transaction screen field

SET PARAMETER ID 'BES' FIELD wa_ekko-ebeln.

Sxecute transaction ME23N, and skip initial data entry screen

CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.

ENDIF.

WHEN '&DATA_SAVE'. "user presses SAVE

loop at it_ekko into wa_ekko.

if wa_ekko-sel EQ 'X'.

Process records that have been selected

endif.

endloop.

ENDCASE.

ENDFORM.

<b>Reward if usefull</b>

Re: Problem with PF-STATUS

Former Member — Tue, 16 Oct 2007 12:26:34 GMT

HI All,

Thanks to those who have replied. But i still cannot see th buttons of my pf-status. I checked in SE41 and the PF-STATUS is activated.

Please help.

Jim

Re: Problem with PF-STATUS

Former Member — Tue, 16 Oct 2007 12:35:28 GMT

will it be possible for u 2 paste ur code here

Re: Problem with PF-STATUS

Former Member — Tue, 16 Oct 2007 12:51:48 GMT

Hi Jim,

By clicking pf-status you will enter into se41. There save and activate. It will display. If u have any issues please send the code.

Regards

Srinu

Re: Problem with PF-STATUS

Former Member — Wed, 17 Oct 2007 02:27:30 GMT

Hello Everyone,

Here's the code:

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

i_callback_program = p_w_repid

i_callback_user_command = 'USER_COMMAND'

i_callback_pf_status_set = 'SET_PF_STATUS'

i_structure_name = c_structure

i_grid_title = p_w_title

is_layout = i_display

it_fieldcat = i_catalog

i_save = 'A'

is_variant = i_variant

it_events = i_events

TABLES

t_outtab = <table>

EXCEPTIONS

program_error = 1

OTHERS = 2.

FORM set_pf_status USING p_extab TYPE slis_t_extab .

SET PF-STATUS 'ZPCSTATUS'.

ENDFORM. "SET_PF_STATUS

If I go to SE41, and Go to User Interface, Check, Consistency, it says that there is a Menu List not created. But if I go in Change Mode, I was able to see the Menu List that I create.

Any input?

Thanks,

Jim

Re: Problem with PF-STATUS

gopi_narendra — Wed, 17 Oct 2007 02:33:54 GMT

I am sorry Eric, i overlooked into it

Message was edited by:

Gopi Narendra

Re: Problem with PF-STATUS

Former Member — Wed, 17 Oct 2007 02:51:43 GMT

Hi Gopi,

Thank you for your reply. However, according to this link, it should be the name of the subroutine.

http://www.sapdev.co.uk/reporting/alv/alvgrid_pfstatus.htm

Thanks,

Jim

Re: Problem with PF-STATUS

Former Member — Wed, 17 Oct 2007 03:05:39 GMT

How did you create your custom pf-status?

You need to copy standard SAP pf status and modify the same. I am sure you must have done this but just wanted to check with you.

ashish