FP_DIV_MOD_BCD

Division des données BCD avec reste

Cette instruction FP divise les données BCD spécifiées par s1 par la valeur de s2 lorsque le déclencheur EN est TRUE. Le résultat est enregistré dans d1_Div et le reste est enregistré dans d2_Mod.

Paramètres

Entrée

s1 (WORD, DWORD): Dividende
s2 (WORD, DWORD): Diviseur

Sortie

d1_Div (WORD, DWORD): Quotient de nombres entiers
d2_Mod (WORD, DWORD): Reste

Drapeaux d’erreur

sys_bIsOperationErrorHold (passe à TRUE et reste TRUE)

Si la zone spécifiée à l’aide du modificateur d’adresse est en dehors des limites autorisées.
Si 0 est indiqué pour s2.
Si des données autres que BCD sont spécifiées

sys_bIsOperationErrorNonHold (passe à TRUE pendant un cycle)

Si la zone spécifiée à l’aide du modificateur d’adresse est en dehors des limites autorisées.
Si 0 est indiqué pour s2.
Si des données autres que BCD sont spécifiées

Thèmes apparentés

Données BCD

Instructions F correspondantes : F52_BDIV, F53_DBDIV

Exemple

En-tête du POU

Toutes les variables d’entrée et de sortie utilisées pour programmer cette fonction ont été déclarées dans l’en-tête du POU. Le même en-tête de POU est utilisé pour tous les langages de programmation.

	VAR
		bStart: BOOL:=FALSE;
			(*activates the fuction*)
		dwDividend: DWORD:=16#442201;
			(*dividend*)
		dwDivisor: DWORD:=16#2;
			(*divisor*)
		dwResult: DWORD:=0;
			(*result after a 0->1 leading
edge from start: 16#221100*)
		dwRemainder: DWORD:=0;
			(*remainder: 16#1*)
	END_VAR

Corps en LD

La fonction est exécutée lorsque la variable bStart est définie sur TRUE.

BODY
    WORKSPACE
        NETWORK_LIST_TYPE := NWTYPELD ;
        ACTIVE_NETWORK := 0 ;
    END_WORKSPACE
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 7 ;
        NETWORK_BODY
B(B_CONTACT,,bStart,4,2,6,4,);
B(B_VAROUT,,dwDividend,9,4,11,6,);
B(B_VARIN,,dwDivisor,6,4,8,6,);
B(B_VAROUT,,dwResult,18,3,20,5,);
B(B_F,FP_DIV_MOD_BCD!,,8,1,18,6,,?DEN?D@'s1'?Ds2?AENO?Cd1_Div?Cd2_Mod);
B(B_VAROUT,,dwRemainder,18,4,20,6,);
B(B_VARIN,,dwDividend,6,3,8,5,);
L(1,3,4,3);
L(6,3,8,3);
L(1,0,1,7);
        END_NETWORK_BODY
    END_NET_WORK
END_BODY

Corps en ST

IF (bStart) then
    FP_DIV_MOD_BCD(s1 := dwDividend, 
                   s2 := dwDivisor, 
                   d1_Div => dwResult, 
                   d2_Mod => dwRemainder);
END_IF;