[r371]: / trunk / Library / POUs / FB_xUnitXmlPublisher / DeleteOpenWriteClose / svnobj  Maximize  Restore  History

Download this file

17 lines (17 with data), 2.5 kB

Gx_l½	!0…jüo$b]#5qh_ëõ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
tDeleteOpenWriteClose := SysDir.CmpErrors.Errors.ERR_OK;   *IF Initialised() THENÞ    DeleteOpenWriteClose := MAX(DeleteOpenWriteClose, File.Delete(Filename := GVL_Param_CfUnit.xUnitFilePath));–    DeleteOpenWriteClose := MAX(DeleteOpenWriteClose, File.Open(Filename := GVL_Param_CfUnit.xUnitFilePath, FileAccessMode := AccessMode));Ú    DeleteOpenWriteClose := MAX(DeleteOpenWriteClose, File.Write(BufferPointer := ADR(Buffer), Xml.Length)); ˆ    DeleteOpenWriteClose := MAX(DeleteOpenWriteClose, File.Close());ELSE‚    DeleteOpenWriteClose := SysDir.CmpErrors.Errors.ERR_NOBUFFER;END_IF;InterfaceL{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}(*V    Deletes the former file (if it exists).h    Opens the file, writes the buffer and closes it.*)ŒMETHOD PRIVATE DeleteOpenWriteClose : SysFile.SysTypes.RTS_IEC_RESULT;ÐÐÐE	ÐÐ	
­ÚÐ-
ÐÐ	
­ÚÐ-ÐÐ	
­ÚÐ-ÐÐ	
­ÚÐ-ÐÐ	
­ÚÐ-ÐÐ	
­ÚÐ-ÐÐ	
­	ÚÐ-ÐÐ	
­
ÚÐ-ÐÐ	
­ÚÐ-ÐÐEÐÐ	
­ÚÐ-ÐÐ	
­ÚÐ-ÐÐ	
­
ÚÐ-ÐÐ	
­ÚÐ-ÐÐ	
­ÚÐ-