[r384]: / trunk / Library / POUs / FB_StreamBuffer / Copy / svnobj  Maximize  Restore  History

Download this file

41 lines (41 with data), 3.5 kB 

Gx_l™
!0…jьoЁ	2D2ѕЙПдЎЭ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
longTagText
Loop := 0;BPointerToByteToCopy := ADR(Copy);rPointerToBuffer := _PointerToStringBuffer + StartPos - 1;АWHILE(Loop < SIZEOF(Copy)) AND (StartPos - 1 + Loop < _Length) AND (StartPos + Loop < EndPos) DOZ    PointerToByteToCopy^ := PointerToBuffer^;*    Loop := Loop + 1;X    PointerToByteToCopy := ADR(Copy) + Loop;†    PointerToBuffer := _PointerToStringBuffer + StartPos + Loop -1;END_WHILE;6IF Loop = SIZEOF(Copy) THENT    XmlError := E_XmlError.ErrorStringLen;PELSIF StartPos - 1 + Loop = _Length THENZ    XmlError := E_XmlError.ErrorMaxBufferLen;ELSE<    XmlError := E_XmlError.OK;END_IF;4PointerToByteToCopy^ := 0;"CopyLen :=  Loop; Interface!L{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}"(*#Z    Copies a string from the character buffer$*)%2METHOD Copy : T_MaxString&VAR_INPUT'*    StartPos : UDINT;(&    EndPos : UDINT;)END_VAR*VAR_OUTPUT+(    CopyLen : UDINT;,4    XmlError : E_XmlError;-VAR."    Loop : UDINT;/T    PointerToByteToCopy : POINTER TO BYTE;0L    PointerToBuffer : POINTER TO BYTE;1&    CurPos : UDINT;РРРEРР	
­4ЪР-
РР	
­5ЪР-РР	
­6ЪР-РР	
­7ЪР-РР	
­8ЪР-РР	
­9ЪР-РР	
­:ЪР-РР	
­;ЪР-РР	
­<ЪР-РР	
­=ЪР-РР	
­>ЪР-РР	
­?ЪР-РР	
­@ЪР-РР	
­AЪР-РР	
­BЪР-РР	
­CЪР-РР	
­DЪР-РР	
­EЪР-РР	
­FЪР-РР	
­GЪР-РР	
­ЪР-Р !РEРР	
­ЪР-"РР	
­ЪР-#РР	
­ЪР-$РР	
­ЪР-%РР	
­'ЪР-&РР	
­(ЪР-'РР	
­)ЪР-(РР	
­*ЪР-)РР	
­+ЪР-*РР	
­,ЪР-+РР	
­-ЪР-,РР	
­.ЪР-)РР	
­/ЪР--РР	
­0ЪР-.РР	
­1ЪР-/РР	
­2ЪР-0РР	
­3ЪР-1РР	
­ЪР-)