In the search for local currency amounts, items may not be found when the number of decimal places is different in the local currency and the document currency.
Program error
SolutionCorrected in Release: 21K, 22E, 30A.
Advance correction:
/NSE38, RFPOSFD0, FIND DEZIMALENTABELLE_AUFBAUEN
FORM DEZIMALENTABELLE_AUFBAUEN.
...
LOOP AT SLBTAB. <-- insert
READ TABLE DEZTAB WITH KEY SLBTAB-WAERS. <-- insert
CHECK SY-SUBRC NE 0. <-- insert
POSTAB-WAERS = SLBTAB-WAERS. <-- insert
PERFORM DEZTAB_FUELLEN. <-- insert
ENDLOOP. <-- insert
LOOP AT CURTAB. <-- insert only 2.2
READ TABLE DEZTAB WITH KEY CURTAB-HWAE2. <-- insert only 2.2
IF SY-SUBRC NE 0. <-- insert only 2.2
POSTAB-WAERS = CURTAB-HWAE2. <-- insert only 2.2
PERFORM DEZTAB_FUELLEN. <-- insert only 2.2
ENDIF. <-- insert only 2.2
READ TABLE DEZTAB WITH KEY CURTAB-HWAE3. <-- insert only 2.2
IF SY-SUBRC NE 0. <-- insert only 2.2
POSTAB-WAERS = CURTAB-HWAE3. <-- insert only 2.2
PERFORM DEZTAB_FUELLEN. <-- insert only 2.2
ENDIF. <-- insert only 2.2
ENDLOOP.
ENDFORM.
/NSE38, RFPOSFS0, FIND VERGLEICHEN
IF SELTAB-KTEXT = 'DMSHB' <-- insert
OR SELTAB-KTEXT = 'BWWRT' <-- insert
OR SELTAB-KTEXT = 'SKNTO'. <-- insert
READ TABLE SLBTAB WITH KEY POSTAB-BUKRS. <-- insert
READ TABLE DEZTAB WITH KEY SLBTAB-WAERS. <-- insert
ENDIF. <-- insert
IF SELTAB-KTEXT = 'BWWR2' <-- insert only 2.2
OR SELTAB-KTEXT = 'DMBE2'. <-- insert only 2.2
READ TABLE CURTAB WITH KEY POSTAB-BUKRS. <-- insert only 2.2
READ TABLE DEZTAB WITH KEY CURTAB-HWAE2. <-- insert only 2.2
ENDIF. <-- insert only 2.2
IF SELTAB-KTEXT = 'BWWR3' <-- insert only 2.2
OR SELTAB-KTEXT = 'DMBE3'. <-- insert only 2.2
READ TABLE CURTAB WITH KEY POSTAB-BUKRS. <-- insert only 2.2
READ TABLE DEZTAB WITH KEY CURTAB-HWAE3. <-- insert only 2.2
ENDIF. <-- insert only 2.2
CASE N.
WHEN EINS.
...
/NSE38, RFPOSFP0, FIND POSTAB_ANPASSEN_SUCHE_GROSS
IF SELTAB-KTEXT = 'DMSHB' <-- insert
OR SELTAB-KTEXT = 'BWWRT' <-- insert
OR SELTAB-KTEXT = 'SKNTO'. <-- insert
READ TABLE SLBTAB WITH KEY POSTAB-BUKRS. <-- insert
READ TABLE DEZTAB WITH KEY SLBTAB-WAERS. <-- insert
ENDIF. <-- insert
IF SELTAB-KTEXT = 'BWWR2' <-- insert only 2.2
OR SELTAB-KTEXT = 'DMBE2'. <-- insert only 2.2
READ TABLE CURTAB WITH KEY POSTAB-BUKRS. <-- insert only 2.2
READ TABLE DEZTAB WITH KEY CURTAB-HWAE2. <-- insert only 2.2
ENDIF. <-- insert only 2.2
IF SELTAB-KTEXT = 'BWWR3' <-- insert only 2.2
OR SELTAB-KTEXT = 'DMBE3'. <-- insert only 2.2
READ TABLE CURTAB WITH KEY POSTAB-BUKRS. <-- insert only 2.2
READ TABLE DEZTAB WITH KEY CURTAB-HWAE3. <-- insert only 2.2
ENDIF. <-- insert only 2.2
CASE N.
WHEN EINS.
...
Key words: RFEPOS00 FBL1 FBL2 FBL3 FBL4 FBL5 FBL6
No comments:
Post a Comment