Traitement SUBVEF : Formulaire TVA
VEF_FUNCTION_SPE : prise en compte de nouvelles fonctions génériques
Le point d’entrée VEF_FUNCTION_SPE permet de prendre en compte de nouvelles fonctions génériques DCLVATGENx préalablement copiées à partir de la fonction générique standard DCLVATGEN. Il est appelé lors du contrôle d’une fonction pour déterminer si elle est autorisée ou non d’être gérée dans un formulaire TVA, et lors de la sélection d’une fonction dans Formulaire TVA.
Contexte et mode de fonctionnement
Contexte d'appel
L’objectif de ce point d’entrée est de pouvoir gérer plusieurs cases et formulaires de TVA génériques dans la même législation, après duplication des éléments du DCLVATGEN standard.
Le point d’entrée VEF_FUNCTION_SPE est appelé lors du contrôle d’une fonction pour déterminer si elle est autorisée ou non d’être gérée dans un formulaire TVA. Il est également appelé lors de la sélection d’une fonction dans Formulaire TVA.
Variable disponible
La variable suivante est disponible :
A_VEF_FCT_SPE variable alphanumérique dimensionnée à 9. Elle permet de renseigner les codes des nouvelles fonctions génériques, de l’indice 1 à 9.
Prérequis obligatoires pour l'utilisation du point d'entrée
Vous pouvez ajouter un maximum de 9 fonctions génériques supplémentaires au VAT Framework.
Pour ce faire, vous devez au préalable procéder à la duplication des éléments suivants du DCLVATGEN standard en ajoutant une séquence sur un caractère (ici x) à la fin du code de l’élément :
- Fonction X3 DCLVATGEN à dupliquer sans modification sous le nom DCLVATGENx
- Ecran X3 DCLVATGEN à dupliquer sans modification sous le nom DCLVATGENx
- Fenêtre X3 DCLVATGEN à dupliquer sous le nom DCLVATGENx en la liant à l’écran DCLVATGENx
- Action X3 DCLVATGEN à dupliquer sous le nom DCLVATGENx en la liant à la fenêtre DCLVATGENx
Une fois ces prérequis effectués, vous pouvez ajouter les nouvelles fonctions génériques en utilisant le point d’entrée comme dans l’exemple suivant.
Exemple d'utilisation du point d'entrée
$ACTION
Case ACTION
When "VEF_FUNCTION_SPE" : Gosub VEF_FUNCTION_SPE
When Default : Return
Endcase
Return
$VEF_FUNCTION_SPE
A_VEF_FCT_SPE(1) = "DCLVATGEN1"
A_VEF_FCT_SPE(2) = "DCLVATGEN2"
Return