Fonction décision sur prélèvement
Soit le code mode de surveillance XXX,
la fonction doit se nommer XXX_Decision
Exemple ci-dessous pour un mode de surveillance RECEP01 :
public function char RECEP01_Decision (LotQte,EchanNb,DefNb,&DecisionTyp)
; calcule la décision sur prélèvement pour le mode de surveillance personnalisé RECEP01
1LotQteN; Taille du lot
1EchanNbN; Taille echantillonnage
1 DefNb N; Nombre défectueux
1 DecisionTypN;Décision sur caractéristique
beginf
if DefNb > 0
DecisionTyp = C_DECISIONCAR_REFUSE
else
DecisionTyp = C_DECISIONCAR_ACCEPTE
endif
freturn ('O')
endf