When working with the transactions CR02 (change work center) or CR01
(create work center) it is not possible to delete an activity
on the 'Cost Center Assignment' screen. Releases prior to 2.2A
Program error
This problem has been solved in release 2.2A. The correction looks
as follows.
Program SAPFC68A - Include FC68AFP0 - 2 forms have been changed
================================================================
1)SUBROUTINE P1001_CRCO_APPEND
------------------------------
Release 2.2A is shown below
*---------------------------------------------------------------------*
* SUBROUTINE P1001_CRCO_APPEND
*---------------------------------------------------------------------*
* Verknüpfung Kostenstelle in TCRCO einfügen
*---------------------------------------------------------------------*
FORM P1001_CRCO_APPEND.
* IF TCRCO-UKZ = SPACE. <--- has been blanked out as shown
APPEND TCRCO.
* ELSE. <--- has been blanked out as shown
CLEAR TCRCO-UKZ.
* ENDIF. <--- has been blanked out as shown
ENDFORM.
2)SUBROUTINE PXXXX_TO_WORKCENTER
--------------------------------
Correctons have to be done in 6 postions
a)Postion 1
--Releases prior to 2.2A (i.e. those with error)
Example from release 2.2 looks as follows
004530 PERFORM P1001_CRCO_APPEND.
004540 IF PAD011-LAR02 IS INITIAL.
004550 TCRCO-UKZ = UKZ_D.
004560 ELSE.
004570 TCRCO-LANUM = 2. -------->(remove)
004580 TCRCO-LSTAR = PAD011-LAR02.
004590 TCRCO-LSTAR_REF = PAD011-LAR02_REF.
--Release 2.2A (corrected release)
004530 PERFORM P1001_CRCO_APPEND.
004540 TCRCO-LANUM = 2. <---------(insert)
004550 IF PAD011-LAR02 IS INITIAL.
004560 TCRCO-UKZ = UKZ_D.
004570 ELSE.
004580 TCRCO-LSTAR = PAD011-LAR02.
004590 TCRCO-LSTAR_REF = PAD011-LAR02_REF.
Note: The only difference here is where the instruction
"TCRCO-LANUM = ... " is placed. In the corrected form this has
been placed before the 'ELSE' instruction, after having been
from after the 'ELSE'.
Postions 2 to 6
---------------
Exactly like position 1, namely the instruction "TCRCO-LANUM = ......"
has to be shifted to before the 'ELSE' instuction.
The positions 2 to 6 pertain to the following instructions in the
code following on from position 1.
TCRCO-LANUM = 3.
TCRCO-LANUM = 4.
TCRCO-LANUM = 5.
TCRCO-LANUM = 6.
TCRCO-LANUM = 7.
Note the code in these positions is basically a repitition of that
at position 1 and hence easy to locate.
Key word: Activity
No comments:
Post a Comment