TImportContext (tech)
De Wiki1000
(Différences entre les versions)
m (Remplacement du texte — « http://frp.sage.fr/wiki1000/medias/images/stock/versionlatest-32x32.png » par « http://frp.sage.fr/wiki1000/medias/images/stock/version700-32x32.png ») |
(→Propriétés) |
||
Ligne 28 : | Ligne 28 : | ||
|- | |- | ||
|[[InsertedCount (TImportContext)|InsertedCount]] | |[[InsertedCount (TImportContext)|InsertedCount]] | ||
− | |Nombre d' | + | |Nombre d'objets insérés |
|- | |- | ||
|[[UpdatedCount (TImportContext)|UpdatedCount]] | |[[UpdatedCount (TImportContext)|UpdatedCount]] | ||
− | |Nombre d' | + | |Nombre d'objets mis à jour |
|- | |- | ||
|[[FailedCount (TImportContext)|FailedCount]] | |[[FailedCount (TImportContext)|FailedCount]] | ||
− | |Nombre d' | + | |Nombre d'objets en erreur |
|- | |- | ||
|[[IgnoredCount (TImportContext)|IgnoredCount]] | |[[IgnoredCount (TImportContext)|IgnoredCount]] | ||
− | |Nombre d' | + | |Nombre d'objets ignorés |
|- | |- | ||
|[[AdditionalValues (TImportContext)|AdditionnalValues]] | |[[AdditionalValues (TImportContext)|AdditionnalValues]] |
Version du 4 novembre 2017 à 09:24
TImportContext est un objet technique permettant de manipuler l'import de données par un descriptif d'importation (.dip).
Propriétés
ImportMode | Mode et options d'importation |
ImportModeAsString | Mode et options d'importation (format chaîne) |
ShareMode | Mode de partage |
RootPath | Chemin des contenus binaires |
RenameFolder | Chemin utilisé pour renommer le fichier source |
RejectedFile | Définit le fichier de rejet |
StopOnExcept | S'arrêter à la première erreur. |
InsertedCount | Nombre d'objets insérés |
UpdatedCount | Nombre d'objets mis à jour |
FailedCount | Nombre d'objets en erreur |
IgnoredCount | Nombre d'objets ignorés |
AdditionnalValues | Valeurs additionnelles pouvant être importer dans la classe cible |
BinaryData | Données à importée. |
Opérations
Execute | Exécution de l'import |
Exemple :
//Procedure TestImportContext; var instB:WFClasseB; inst:TImportContext; ls:TStringList; begin withP Transaction do begin instB := WFClasseB.Create; instB.unCode := 'B'+FormatDateTime('c',Now); instB.Caption := 'Session:'+instB.unCode; end; UserContext.BeginCapture; try inst := TImportContext.Create; inst.ShareMode.Value := ISM_DEFAULT; inst.ImportMode := miInsert+miUpdate+miDisableEvents; inst.AdditionalValues.Values['uneChaine'] := 'uneChaineValue'; inst.AdditionalValues.Values['unEntier'] := 1; inst.AdditionalValues.Values['unEtat:AsVariant'] := WFCAState_Etat1; inst.AdditionalValues.Values['oidWFClasseBRef'] := instB.InstanceOID; // Result := inst.Execute('testimport-wfclassea.dip','c:\temp\exports\wfclassea.txt'); ls := TStringList.Create; UserContext.GetMessages(ls); ShowMessage(ls.Text); ShowMessage(Format('%d objets importés',[inst.InsertedCount])); finally UserContext.EndCapture; end; end;
Voir aussi: