ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/fbintf/testsuite/Test1.pas
(Generate patch)

Comparing ibx/trunk/fbintf/testsuite/Test1.pas (file contents):
Revision 401 by tony, Mon Jan 10 10:13:17 2022 UTC vs.
Revision 402 by tony, Mon Aug 1 10:07:24 2022 UTC

# Line 176 | Line 176 | begin
176      Exit;
177    end;
178    WriteDBInfo(Attachment.GetDBInformation([isc_info_db_id,isc_info_ods_version,isc_info_ods_minor_version]));
179 +  writeln(OutFile,'Attachment ID = ',Attachment.GetAttachmentID);
180    WriteAttachmentInfo(Attachment);
181  
182    {Querying Database}
# Line 197 | Line 198 | begin
198        Exit;
199      end;
200      WriteDBInfo(Attachment.GetDBInformation([isc_info_db_id,isc_info_ods_version,isc_info_ods_minor_version]));
201 +    writeln(OutFile,'Attachment ID = ',Attachment.GetAttachmentID);
202      WriteAttachmentInfo(Attachment);
203  
204      {Querying Database}

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines