a b/branches/timvh/library/FB_XmlControl/ReadFile/svnobj 

  1
  
Gx_lN!0…jüo]3xÎÉíºÚ‰System.StringL{f8a58466-d7f6-439f-bbb8-d4600e41d099}ImplementationL{3b83b776-fb25-43b8-99f2-3c507c9143fc}TextDocumentL{f3878285-8e4f-490b-bb1b-9acbb7eb04db}TextLinesL{a5de0b0b-1cb5-4913-ac21-9d70293ec00d}    Id





  
  

  2
  
longTagText
R(* should have valid pointer to buffer *)F// check if buffer is correctly setfIF Buffer.pStrBuf = 0 OR Buffer.BufferSize = 0 THENX    ReadFile := E_XmlError.ErrorNoBufferSet;    RETURN;END_IF// open fileÀ_result := File.Open(Filename := sFileName, FileAccessMode := SysFile.ACCESS_MODE.AM_READ_PLUS);&IF _result = 0 THENZ    // read from start or set offset in file.:    IF udiNextOffset = 0 THEN0        ToStartBuffer();    ELSE0        iSearchPos := 0;Ê        // Everytime the next offset is added to the total offset to read the file in multiple steps.f        iFileOffset := iFileOffset + udiNextOffset;Z        File.SetPos(TO___XWORD(iFileOffset));   END_IF¸    _result := File.Read(pString := Buffer.pStrBuf, Buffer.BufferSize, BytesRead => BytesRead); R    IF _result <> 0 OR BytesRead = 0 THEN!`        ReadFile := E_XmlError.ErrorReadingFile;"R    Buffer.Length := TO_UDINT(BytesRead);#" (* close file *)$ File.Close();%ELSE&X    ReadFile := E_XmlError.ErrorReadingFile;'Interface(L{a9ed5b7e-75c5-4651-af16-d2c27e98cb94})FMETHOD PUBLIC ReadFile : E_XMLError*VAR_INPUT+8    sFileName : STRING(255);,@    udiNextOffset : UDINT := 0; -END_VAR.VAR_OUTPUT/0    BytesRead : __XWORD;0VAR1\    _result : SysFile.SysTypes.RTS_IEC_RESULT;ÐÐÐEÐÐ    





  
  

  3
  
­ÚÐ-
ÐÐ  





  
  

  4
  
­8ÚÐ-ÐÐ  





  
  

  5
  
­ÚÐ-ÐÐ  





  
  

  6
  
­ÚÐ-ÐÐ  





  
  

  7
  
­   ÚÐ-ÐÐ    





  
  

  8
  
­





  
  

  9
  
ÚÐ-ÐÐ    





  
  

  10
  
­ÚÐ-ÐÐ  





  
  

  11
  
­ÚÐ-ÐÐ  





  
  

  12
  
­1ÚÐ-ÐÐ  





  
  

  13
  
­ÚÐ-ÐÐ  





  
  

  14
  
­6ÚÐ-ÐÐ  





  
  

  15
  
­7ÚÐ-ÐÐ  





  
  

  16
  
­)ÚÐ-ÐÐ  





  
  

  17
  
­/ÚÐ-ÐÐ  





  
  

  18
  
­9ÚÐ-ÐÐ  





  
  

  19
  
­*ÚÐ-ÐÐ  





  
  

  20
  
­+ÚÐ-ÐÐ  





  
  

  21
  
­'ÚÐ-ÐÐ  





  
  

  22
  
­,ÚÐ-ÐÐ  





  
  

  23
  
­-ÚÐ- ÐÐ  





  
  

  24
  
­.ÚÐ-!ÐÐ  





  
  

  25
  
­ÚÐ-ÐÐ  





  
  

  26
  
­ÚÐ-"ÐÐ  





  
  

  27
  
­ÚÐ-#ÐÐ  





  
  

  28
  
­ÚÐ-$ÐÐ  





  
  

  29
  
­ÚÐ-%ÐÐ  





  
  

  30
  
­ÚÐ-&ÐÐ  





  
  

  31
  
­ÚÐ-Ð'(ÐEÐÐ    





  
  

  32
  
­ÚÐ-)ÐÐ  





  
  

  33
  
­ÚÐ-*ÐÐ  





  
  

  34
  
­ÚÐ-+ÐÐ  





  
  

  35
  
­ ÚÐ-,ÐÐ  





  
  

  36
  
­!ÚÐ--ÐÐ  





  
  

  37
  
­"ÚÐ-.ÐÐ  





  
  

  38
  
­$ÚÐ-/ÐÐ  





  
  

  39
  
­ÚÐ--ÐÐ  





  
  

  40
  
­ÚÐ-0ÐÐ  





  
  

  41
  
­ÚÐ-1ÐÐ  





  
  

  42
  
­ÚÐ--