API RF CTRSERLOT

If the research should be done for the stock object’s product. (input parameter ‘meme-produit’ = ‘O’).

Look for input stock object’s product code (codpro).

(Read stock object data (LOBJSTK) with input parameters (sigtie, idobj, typtie =”DEP”).)

Looking for slot addresses corresponding to the following conditions.

(Read the slot addresses(EMP), which are not inventoried (flginv=’0’) and with the input parameter (‘sigtie’).

Add some conditions depending on the input parameters.

If the stock object is found.

The slot addresses should correspond to the stock object’s product.

Add the lobjstk table in the search.

Join the slot address table (EMP) with the stock object table (lobjstk) on company code (emp.codsoc = lobjstk.codsoc), third-party ID (emp.sigdep = lobjstk.sigtie) and the slot address (emp.codemp = lobjstk.adremp).

Search for stock objects (LOBJSTK) with a product code equal to the input object’s product code (codpro = lobjstk.codpro) and with an ‘available’ status (statut = ‘0’).

Otherwise.

The slot address should be not occupied.

(Not presented product code (emp.codpro = ' '), real occupation equal to zero (emp.occreel = 0), entry in progress occupation equal to zero (emp.occece = 0), full flag equal to zero (flgplein = '0')).

If the input ‘picking’ parameter is equal to ‘O’ (picking="O").

The slot address’s logistic store should be of picking type (emp.typmag = ‘3’).

Otherwise.

The slot address’s logistic store should be of reserve type (emp.typmag = ‘1’).

If the input store parameter is not empty (magasin != ‘’).

The slot address’s store code should be equal to the input store parameter (emp.lcodmag = magasin).

If the input level parameter is not empty (niveau != ‘’).

The slot address level address should correspond to the input level parameter (emp.adrniv = niveau).

The ‘possible allocation on the stock’ for the corresponding store should be different from ‘Deconsolidation’ (lmag.alcstk <> ’E’).

Read the first slot address object.

If the slot address object is not found.

The API returns the error code 0.

Find the first six not blocked slot addresses:

For each slot address object found.

Looking for blocking code data (lcbq) corresponding to blocking code of the current slot address object.

(Read the slot address’s blocking code object with the input parameters (sigtie) and (typtie = ‘DEP’ , codblc = emp.codblq))

If the slot address’s blocking code is found and the entry is forbidden for that code (entint != '0').

Read the next emplacement objects.

Otherwise:

The slot address is considered as found.

(Copy the slot address (codemp) to the output parameter.)

Read the next slot address object.