APROB1 : Appel d’une fonction Oracle de filtre des composants

APROB1 : Appel d’une fonction Oracle de filtre des composants(Paramètre actif depuis la version ACE 1.6.2)

Standard

Par défaut, dans le calcul des besoins APROB1, on n’applique une opération de stock sur les composants dont l’indicateur indbes est à « O ».

Ce paramètre permet de remplacer ce filtre par l’appel à une fonction Oracle.

Fonctions concernées : APROB1

Nom de la fonction Oracle de filtre.

Utilisation en mode N1= 1

Paramètres en entrée de la fonction

-- Contexte
 p_codsoc IN NUMBER, -- Code société du contexte
 p_codpev IN VARCHAR2, -- Cible (codpev)
 p_uticod IN VARCHAR2, -- Utilisateur courant
 -- Référence prn
 p_socprn PRN.CODSOC%TYPE, -- Code société du prn
 p_codcmp PRN.CODCMP%TYPE, -- Composant
 p_codpro PRN.CODPRO%TYPE, -- Composé
 p_niveau IN NUMBER, -- Niveau de profondeur dans la nomenclature
 p_nomenc PRN.NOMENC%TYPE, -- Type de nomenclature
 p_codseq PRN.CODSEQ%TYPE, -- Code séquence dans la nomenclature
 p_indbes PRN.INDBES%TYPE, -- Indicateur besoin dans la nomenclature
 -- Opération de stock qui va être appliquée
 p_opestk IN VARCHAR2,
 -- Référence evp
 p_socevp EVP.CODSOC%TYPE,
 p_achvte EVP.ACHVTE%TYPE,
 p_typeve EVP.TYPEVE%TYPE,
 p_numeve EVP.NUMEVE%TYPE,
 p_numpos EVP.NUMPOS%TYPE

Paramètres en sortie

En sortie, la fonction retourne 1 s’il faut appliquer les opérations de stock sur le composant, 0 sinon.

Exemple de fonction Oracle

create or
        replacefunction
        FCT_APROB1(  --
        Contexte  p_codsoc IN
        NUMBER,  p_codpev IN
        VARCHAR2,  p_uticod IN
        VARCHAR2,  --
        Référence prn  p_socprn
        PRN.CODSOC%TYPE,  p_codcmp
        PRN.CODCMP%TYPE,  p_codpro
        PRN.CODPRO%TYPE,  p_niveau IN
        NUMBER,  p_nomenc
        PRN.NOMENC%TYPE,  p_codseq
        PRN.CODSEQ%TYPE,  p_indbes
        PRN.INDBES%TYPE,  -- Opération
        de stock qui va être appliquée  p_opestk IN
        VARCHAR2,  --
        Référence evp  p_socevp
        EVP.CODSOC%TYPE,  p_achvte
        EVP.ACHVTE%TYPE,  p_typeve
        EVP.TYPEVE%TYPE,  p_numeve
        EVP.NUMEVE%TYPE,  p_numpos
        EVP.NUMPOS%TYPE   )  return
        integer is--------------------------------------------------------------------------------- Fonction
        stockée permettant de déterminer par composant s'il faut appliquer-- les opérations
        de stock dans le calcul de besoin APROB1-- Retour attendu :
        0 : ne pas appliquer l'opération de stock sur ce composant--                  1 : appliquer l'opération de stock sur ce
        composant-------------------------------------------------------------------------------begin        if
        (p_codseq > '010') then             return 0;       end
        if;   return
      1; end
        FCT_APROB1;