Curseur de suppression (tech)

De Wiki1000
(Différences entre les versions)
m
m
Ligne 15 : Ligne 15 :
 
<source lang='delphi'>vDeleteList.Add : TDeleteObjects; </source>
 
<source lang='delphi'>vDeleteList.Add : TDeleteObjects; </source>
  
Les paramètres sont :
+
Les propriétés sont :
 
{|class="wikitable"
 
{|class="wikitable"
 
|-
 
|-
 
|aClassName
 
|aClassName
 
|string
 
|string
|Ce paramètre indique la classe métier sur laquelle est réalisée la suppression.
+
|Cette propriété indique la classe métier sur laquelle est réalisée la suppression.
 
|-
 
|-
 
|ArgCount
 
|ArgCount
 
|integer
 
|integer
|Ce paramètre indique le nombre de paramètres du curseur de suppression
+
|Cette propriété indique le nombre de paramètres du curseur de suppression
 
|-
 
|-
 
|Args[n]
 
|Args[n]
Ligne 32 : Ligne 32 :
 
|Filter
 
|Filter
 
|string
 
|string
|Ce paramètre contient le filtre Where pour le curseur de suppression.
+
|Cette propriété contient le filtre Where pour le curseur de suppression.
 
|}
 
|}
  

Version du 1 décembre 2016 à 16:18

Sommaire

Introduction

Les curseurs d’importation sont des curseurs particuliers permettant à un processus de contrôler une session d’importation.

Déclaration d'une variable Curseur d'importation

Les curseurs d'importation doivent être déclaré :

Var vDeleteObjects : TDeleteObjects;

Création d'un curseur de suppression

Le TDeleteList expose une fonction pour créer un Curseur de suppression.

Pour créer un curseur de suppression dans la base de données par défaut, il faut passer par la liste que l'on a précédemment créée :

vDeleteList.Add : TDeleteObjects;

Les propriétés sont :

aClassName string Cette propriété indique la classe métier sur laquelle est réalisée la suppression.
ArgCount integer Cette propriété indique le nombre de paramètres du curseur de suppression
Args[n] variant Ce tableau optionnel de paramètre(s) dont l'indice commence à 1 fournit le(s) paramètre(s) nécessaire pour le filtre de la requête de suppression.
Filter string Cette propriété contient le filtre Where pour le curseur de suppression.

Méthodes

CLEAR
procedure Clear;
Vide le curseur de suppression.
EXECUTE
procedure Execute;
Exécute la requête sur ce curseur.

//Exemple avec un seul curseur de suppression var

 vDeleteList    : TDeleteList;
 vDeleteObjects : TDeleteObjects;

begin

 vDeleteList := ClassManager.CreateDeleteList;
 
 vDeleteObjects := vDeleteList.Add;
 vDeleteObjects.aClassName := 'TVentilationGroupeEspace';
 vDeleteObjects.ArgCount := 1;
 vDeleteObjects.Args[1] := oidEspaceAnalytique;
 vDeleteObjects.Filter := '(modeleVentilation.oidEspaceAnalytique=%1)';
 
 vDeleteList.Execute;

End; </source>

Voir aussi :


Code métierDéveloppement DSM

Outils personnels