1.2.11

SAP Note 21120 - Drill-down reporting: header / footer / title page

Symptom:

1.) The field contents is truncated in the report header or report footer. The error occurs only if the last text item has a conversion exit. This error is corrected in Release 2.2E.
2.) When choosing fields from global selections (arising from the form), an incorrect field indicator is used (i.e., the one belonging to the characteristic of the report definition). This error is corrected in Release 2.2F.
3.) During global selection (arising from the form), the until- characteristic value is not used. This error is corrected in Release 22F.
4.) When printing the report the variable 'Page number' does not go up. This error is corrected in Release 3.0F.
5.) When you print the report, the variables on the title page are not replaced. This error was corrected in Release 3.0F.
6.) If headers and footers exist, the variables in the footer may not be replaced. This error was corrected in Release 3.0F.

Cause and prerequisites

1. ) CLEAR on TEXT_SYMBOLS is missing. All field contents are displayed with the conversion exit of the last text item.
2.) The wrong text is transferred for global selections.
3.) FORM_TAB_HIGH is not transferred.
4.) PAGE is not set.
5.) Initialization is incorrect.
6.) Initialization is incorrect.

Solution
1.) Program correction in function module
RKE_VARIABLES_EXTRACT(LKXLIU01):
=====================================================================
FUNCTION RKE_VARIABLES_EXTRACT.
*"-------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*" IMPORTING
*" I_RKB1D LIKE RKB1D STRUCTURE RKB1D
*" I_RKB1F LIKE RKB1F STRUCTURE RKB1F
*" I_RKB1X LIKE RKB1X STRUCTURE RKB1X
*" SEL_DATE DEFAULT '00000000'
*" SEL_TIME DEFAULT '000000'
*" TABLES
*" FDEP_TAB STRUCTURE CDIDEP
*" FIELDTAB STRUCTURE CDIFIE
*" FORM_TAB STRUCTURE CFBFO01
*" SEIG STRUCTURE CFBSE01
*" TEXTE_TAB STRUCTURE RKB1W
*" TEXT_SYMBOLS STRUCTURE RWTXSYM
*" VAR_TAB STRUCTURE CFBVP01
*" ZWERT STRUCTURE CFBZW01
*"-------------------------------------------------------------------


REFRESH TEXT_SYMBOLS.
CLEAR TEXT_SYMBOLS. "<--INSERT P22K005918
CALL FUNCTION 'COMMON_TEXT_SYMBOLS_GET'
EXPORTING
APPLICATION = I_RKB1D-APPL
....
....
ENDFUNCTION.

2.) Program correction in Routine INDIVIDUAL_TEXT_SYMBOLS(LKXLIF01), ca. line 4630 (marked with "P22K007690")
3.) The same, ca. line 4330 =====================================================================

FORM INDIVIDUAL_TEXT_SYMBOLS TABLES ITS_TEXT_SYMBOLS STRUCTURE RWTXSYM
ITS_SEIG STRUCTURE CFBSE01
ITS_FORM_TAB STRUCTURE CFBFO01
ITS_VAR_TAB STRUCTURE CFBVP01
ITS_TEXTE_TAB STRUCTURE RKB1W
ITS_FDEP_TAB STRUCTURE CDIDEP
ITS_FIELDTAB STRUCTURE CDIFIE
USING ITS_RKB1D STRUCTURE RKB1D
ITS_RKB1F STRUCTURE RKB1F
ITS_RKB1X STRUCTURE RKB1X.
....
....
....
LOOP AT ITS_FORM_TAB WHERE EDIM EQ '5'.
*......................................Globale Selektionen..............
CLEAR: ITS_CKEYIDL, ITS_CKEYIDH.
CLEAR: ITS_TEXTL , ITS_TEXTH.
ITS_FNAM = ITS_FORM_TAB-FIELD.
CALL FUNCTION 'RKD_KEYID_CONCATENATE'
EXPORTING
APPLCLASS = ITS_RKB1D-APPL
FNAM = ITS_FNAM
I_RKB1F = ITS_RKB1F
I_RKB1X = ITS_RKB1X
KEYID = ITS_FORM_TAB-LOW
IMPORTING
C_KEYID = ITS_CKEYIDL
DPFIE = ITS_DPFIE
TABLES
FDEP_TAB = ITS_FDEP_TAB
FIELD_TAB = ITS_FIELDTAB
FORM_TAB = ITS_FORM_TAB
SEIG = ITS_SEIG.
CALL FUNCTION 'RKD_KEYID_CONCATENATE' "<--INS P22K007690
EXPORTING "<--INS P22K007690
APPLCLASS = ITS_RKB1D-APPL "<--INS P22K007690
FNAM = ITS_FNAM "<--INS P22K007690
I_RKB1F = ITS_RKB1F "<--INS P22K007690
I_RKB1X = ITS_RKB1X "<--INS P22K007690
KEYID = ITS_FORM_TAB-HIGH "<--INS P22K007690
IMPORTING "<--INS P22K007690
C_KEYID = ITS_CKEYIDH "<--INS P22K007690
DPFIE = ITS_DPFIE "<--INS P22K007690
TABLES "<--INS P22K007690
FDEP_TAB = ITS_FDEP_TAB "<--INS P22K007690
FIELD_TAB = ITS_FIELDTAB "<--INS P22K007690
FORM_TAB = ITS_FORM_TAB "<--INS P22K007690
SEIG = ITS_SEIG. "<--INS P22K007690
IF ITS_CKEYIDH EQ SPACE. "<--INS P22K007690
ITS_CKEYIDH = ITS_CKEYIDL. "<--INS P22K007690
ENDIF. "<--INS P22K007690

* CLEAR: ITS_TEXT_SYMBOLS, ITS_TEXTE_TAB. "K11K098454
CLEAR: ITS_TEXT_SYMBOLS, ITS_FIELDTAB. "K11K098454
ITS_FIELD_KEY-FIENM = ITS_FORM_TAB-FIELD. "K11K098454
* READ TABLE ITS_TEXTE_TAB INDEX ITS_FORM_TAB-TXTIN. "K11K098454
READ TABLE ITS_FIELDTAB WITH KEY ITS_FIELD_KEY BINARY "K11K098454
SEARCH. "K11K098454

ITS_TEXT_SYMBOLS-SYM_TYPE = 'F'.
* ITS_TEXT_SYMBOLS-SYM_TEXT = ITS_TEXTE_TAB-TXTMT. "K11K098454
ITS_TEXT_SYMBOLS-SYM_TEXT = ITS_FIELDTAB-TXT_M.
*......................................Feldbezeichner...................
PERFORM ADD_END USING ITS_FORM_TAB-FIELD '-FTXTF'
ITS_TEXT_SYMBOLS-SYM_NAME.
ITS_TEXT_SYMBOLS-OUTPUTLEN = 20.
* ITS_TEXT_SYMBOLS-SYM_VALUE = ITS_TEXTE_TAB-TXTMT. "<--DEL P22K007690
ITS_TEXT_SYMBOLS-SYM_VALUE = ITS_FIELDTAB-TXT_M. "<--INS P22K007690
APPEND ITS_TEXT_SYMBOLS.
PERFORM ADD_END USING ITS_FORM_TAB-FIELD '-TTXTF'
ITS_TEXT_SYMBOLS-SYM_NAME.
ITS_TEXT_SYMBOLS-OUTPUTLEN = 20.
* ITS_TEXT_SYMBOLS-SYM_VALUE = ITS_TEXTE_TAB-TXTMT. "<--DEL P22K007690
ITS_TEXT_SYMBOLS-SYM_VALUE = ITS_FIELDTAB-TXT_M. "<--INS P22K007690
APPEND ITS_TEXT_SYMBOLS.
PERFORM ADD_END USING ITS_FORM_TAB-FIELD '-TTXTF'
ITS_TEXT_SYMBOLS-SYM_NAME.
APPEND ITS_TEXT_SYMBOLS.
*......................................Ausprägung.......................
.......
.......
.......
ENDFORM.

Additional key words

drill-down report, printing;KE30, KCR0, EIS;Header;footer; title page

No comments:

Post a Comment