Set pf-status 'STAT'

Former Member — Fri, 05 Dec 2008 12:38:20 GMT

i am unable to get fuctionalty of set pf-status.

this is my code

&----

*& Report ZRET_RECOVRY_ENTRY_J008

&----

REPORT ZRET_RECOVRY_ENTRY_J008 no standard page heading line-size 256.

----

Tables Work Area -

----

tables :bsid,

BKPF,

KNA1,

ZTEMPLATE,

BSEG,

TGSBT.

----

Data Declaration -

----

data : begin of itab occurs 0,

BLDAT LIKE BKPF-BLDAT,

BUKRS LIKE BKPF-BUKRS,

WAERS LIKE BKPF-WAERS,

BUDAT LIKE BKPF-BUDAT,

BLART LIKE BKPF-BLART,

BUDAT1 LIKE BSID-BUDAT,

HKONT LIKE BSEG-HKONT,

GJAHR LIKE BKPF-GJAHR,

DMBTR LIKE BSEG-DMBTR,

VNTXT LIKE ZTEMPLATE-VNTXT,

GLTXT LIKE ZTEMPLATE-GLTXT,

XREF1 LIKE BSID-XREF1,

XREF2 LIKE BSID-XREF2,

XREF3 LIKE BSID-XREF3,

KUNNR LIKE BSID-KUNNR,

NAME1 LIKE KNA1-NAME1,

DMBTR1 LIKE BSID-DMBTR,

GSBER LIKE TGSBT-GSBER,

zuonr like bsid-zuonr,

end of itab.

DATA: f2code LIKE sy-ucomm.

DATA: tcode LIKE sy-tcode.

CONTROLS TCONTROL TYPE TABLEVIEW USING SCREEN '0100'.

CONSTANTS: pbukrs LIKE bkpf-bukrs VALUE '9000',

pwaers LIKE bkpf-waers VALUE 'INR',

ref_key LIKE bapiache01-obj_key VALUE '$'.

DATA: err_return LIKE TABLE OF bapiret2 WITH HEADER LINE.

DATA: b_header LIKE bapiache09,

b_customer LIKE TABLE OF bapiacar09 WITH HEADER LINE,

b_glaccts LIKE TABLE OF bapiacgl09 WITH HEADER LINE,

b_amount LIKE TABLE OF bapiaccr09 WITH HEADER LINE,

b_return LIKE TABLE OF bapiret2 WITH HEADER LINE,

b_vendor LIKE TABLE OF bapiacap09 WITH HEADER LINE.

DATA: l_type LIKE b_header-obj_type,

l_key LIKE b_header-obj_key,

l_sys LIKE b_header-obj_sys.

start-of-selection.

call screen 100.

&----

*& Module STATUS_0100 OUTPUT

&----

text

----

MODULE STATUS_0100 OUTPUT.

SET PF-STATUS 'RECR'.

SET TITLEBAR 'xxx'.

ENDMODULE. " STATUS_0100 OUTPUT

&----

*& Module USER_COMMAND_0100 INPUT

&----

text

----

MODULE USER_COMMAND_0100 INPUT.

CASE sy-ucomm.

WHEN 'BACK'.

SET SCREEN 0.

LEAVE SCREEN.

when 'SAVE'.

perform post.

endcase.

ENDMODULE. " USER_COMMAND_0100 INPUT

&----

*& Form post

&----

text

----

--> p1 text
<-- p2 text

----

FORM post .

ITAB-BLDAT = BKPF-BLDAT.

ITAB-BUKRS = BKPF-BUKRS.

ITAB-WAERS = BKPF-WAERS.

ITAB-BUDAT = BKPF-BUDAT.

ITAB-BLART = BKPF-BLART.

ITAB-BUDAT1 = BSID-BUDAT.

ITAB-HKONT = BSEG-HKONT.

ITAB-GJAHR = BKPF-GJAHR.

ITAB-DMBTR = BSEG-DMBTR.

ITAB-VNTXT = ZTEMPLATE-VNTXT.

ITAB-GLTXT = ZTEMPLATE-GLTXT.

ITAB-XREF1 = BSID-XREF1.

ITAB-XREF2 = BSID-XREF2.

ITAB-XREF3 = BSID-XREF3.

ITAB-KUNNR = BSID-KUNNR.

ITAB-NAME1 = KNA1-NAME1.

ITAB-DMBTR = BSID-DMBTR.

ITAB-GSBER = TGSBT-GSBER.

APPEND ITAB.

CLEAR ITAB.

loop at itab.

endLOOP.

ENDFORM. " post

&----

*& Module user_itab_refresh INPUT

&----

text

----

MODULE user_itab_refresh INPUT.

refresh itab.

ENDMODULE. " user_itab_refresh INPUT

&----

*& Module user_command_100 INPUT

&----

text

----

MODULE user_command_100 INPUT.

ENDMODULE. " user_command_100 INPUT

&----

*& Module exit INPUT

&----

text

----

MODULE exit INPUT.

SET SCREEN 0.

LEAVE SCREEN.

ENDMODULE. " exit INPUT

suggest me how to get.

Re: Set pf-status 'STAT'

Former Member — Fri, 05 Dec 2008 12:59:04 GMT

Hi,

Your code looks fine...Did u create the PF status RECR'?

Try to create the PF status...and check..

Regards

Shiva

Re: Set pf-status 'STAT'

Former Member — Fri, 05 Dec 2008 13:08:56 GMT

Yes ,

i have created.

Re: Set pf-status 'STAT'

Former Member — Fri, 05 Dec 2008 13:12:43 GMT

Hi,

Check ur PF status is activated or not.

Thanks,

Krishna

Re: Set pf-status 'STAT'

Former Member — Fri, 05 Dec 2008 13:14:00 GMT

activated

topic Re: Set pf-status 'STAT' in Application Development and Automation Discussions

Set pf-status 'STAT'

Re: Set pf-status 'STAT'

Re: Set pf-status 'STAT'

Re: Set pf-status 'STAT'

Re: Set pf-status 'STAT'