SAP Note 12736 - Creating storage locations for special stock autom.

Symptom:

Key word: Automatic creation of storage location segments
When goods are received for storage location-dependent special stock (for example, sales order stock), no material-storage location segment (MARD) is created.
(This is however not the case when vendor consignment stock is posted to special stock, as this special stock is posted in MARD).

Key word: Automatic creation of batch segments.
When goods are received for storage location-dependent special stock (for example, sales order stock) no material storage location batch segment (MCHB) is created.

Key word: picking location
Picking location search is not successful for deliveries from special stock sales order stock (make-to-order production). However, a storage location is necessary before goods can be issued.

Additional key words

VL412

Cause and prerequisites

When special stock of this kind is posted to, no posting is made in MARD. The creation of a MARD segment is neither necessary nor desirable from a performance or inventory point of view. No material/plant/storage location segment (MARD) is required for the management of sales order special stock. This is why a MARD segment is not automatically created when goods are received.

The same applies to materials that have to be managed in batches, in addition, to the material/plant/storage location/batch segment (MCHB).

Also for deliveries from the special stock sales order stock, the picking location search incorrectly proposes only storage locations with MARD segment.
Only this type of storage location can be manually added to the delivery later.

Solution
This note will not be included in a Hot Package. Check whether you require the correction described in your system. When you apply a Hot Package, the system may overwrite parts of this correction. Therefore, when applying a Hot Package, make sure that you retain this correction (SPAM/SPAU) unchanged in your system.


If required, a MARD segment can be created with 'Create material'.
If required, a MCHB segment can be created with 'Create batch'.
If SD is involved and the storage location is not created manually, the following change can be made in module FV50PF0L for manual entry of the storage location in the delivery:
In FORM routine
*---------------------------------------------------------------------* * FORM LIPS-LGORT_PRUEFEN * *---------------------------------------------------------------------* * Storage location is checked against table 001l * * A check is also made whether the material can be stored * * at this location * *---------------------------------------------------------------------* FORM LIPS-LGORT_PRUEFEN USING US_ERROR.
.....
after
* Ende der prüfung bei Lieferavisen
IF LIKP-VBTYP EQ VBTYP_LIAV.
EXIT.
ENDIF.
* Ende der prüfung bei Lieferavisen
or in front of the following statements: (Rel. 2.1)
* Prüfen, ob Material in diesem Lager liegen kann
IF LIPS-MATNR NE SPACE AND
LIPS-LGORT NE SPACE.
PERFORM MAEPV_SELECT USING LIPS-MATNR
LIPS-WERKS
LIPS-LGORT
CHARX
CHARX
SY-SUBRC.
IF SY-SUBRC = 0.
LIPS-LGPBE = MAEPV-LGPBE.
ENDIF.
ELSE.
CLEAR MTCOM.
CLEAR MAEPV.
ENDIF.

insert the following:

* Ende der Prüfung bei Kundeneinzelfertigung
IF LIPS-SOBKZ CA 'EWVQ'.
EXIT.
ENDIF.
.....


For the automatic picking location search, the following can be changed in module FV50XFLP:
In FORM routine
*---------------------------------------------------------------------* * FORM LIPS-LGORT_ERMITTELN * *---------------------------------------------------------------------* * determination of the picking location according to the * * strategy in table VLK * *---------------------------------------------------------------------*
FORM LIPS-LGORT_ERMITTELN.
....
after
IF LIPS-LGORT IS INITIAL. <= new in 3.0
CASE TVLK-REGLG.
WHEN 'MALA'.
PERFORM LIPS-LGORT_ERMITTELN_MALA.
WHEN OTHERS.
PERFORM USEREXIT_LGORT_DETERMINATION(SAPMV50A).
ENDCASE.
insert the following:

* Ende der Prüfung bei Kundeneinzelfertigung
IF LIPS-SOBKZ CA 'EWVQ'.
EXIT.
ENDIF.

.....


INCLUDE: FV50PF0M
...
....
ENDIF.
EXIT.
ENDIF.

* Lagerort nicht vorhanden
IF MTCOR-RMARD NE SPACE. " <====DELETE
IF MTCOR-RMARD NE SPACE AND NOT LIPS-SOBKZ CA 'EWVQ'. " <====INSERT
CLEAR MTCOM.
IF US_ERROR NE SPACE.
SET CURSOR FIELD 'LIPS-LGORT' LINE SY-STEPL.
MESSAGE E412 WITH US_MATNR
US_WERKS
US_LGORT.
ELSE.
US_SUBRC = 4.
ENDIF.
ENDIF.
...
....


Then generate programs SAPFV50P and SAPLV50S.