bonjour,

j'ai le code suivant en delphi :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
  If MasterContext.ClassManager.TranCount=0 then
   begin
         TranFlag:=TRUE;
         MasterContext.ClassManager.BeginTran(0);
   end
   else
        TranFlag:=False;
 
    Try
 
        importsession:=MasterContext.ClassManager.CreateObjectList('TSessionImport');
        importsession.AddWhere('','UpdDate',TRUE,unassigned);
        importsession.GetInstance(importsession.count-1,masession);
 
        If TranFlag then
        MasterContext.ClassManager.commit;
        Except
         If TranFlag then
         MasterContext.ClassManager.Rollback;
        Raise;
        end;
       .......
       .......

j'aurais deux questions sur cette portion de code.
il faut dire que la procédure n'est pas entière donc il se peut que tous les if et les try ne soient pas fermés.

1) est ce que le premier try fait partie du else au dessus ou il y a un end implicite pour le if ?
é) que signifie exactement le Raise ?


Merci à vous.