1c/OpenIntegrations
1
0
Fork 0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-08-15 20:13:31 +02:00
Code Issues Releases Activity

Merge branch 'main' of https://github.com/Bayselonarrend/OpenIntegrations

Browse Source
This commit is contained in:
Anton
2024-06-01 17:45:31 +03:00
parent ea636b2d60 a7abd00f1b
commit a8b25df3a9
4 changed files with 10 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

BIN
data.json.gpg
View File

Binary file not shown.

10
src/en/OInt/tools/Modules/OPI_TestDataRetrieval.os
View File

@@ -289,7 +289,7 @@ Function GetBinary(Parameter) Export
LocalFile = New File(LocalValue); LocalFile = New File(LocalValue);
If LocalFile.Exists() Then If LocalFile.Exist() Then
Value = New BinaryData(LocalValue); Value = New BinaryData(LocalValue);
Else Else
Value = MainValue; Value = MainValue;
@@ -398,7 +398,7 @@ Function DataFilePath()
RepositoryFile = New File(PossiblePath); RepositoryFile = New File(PossiblePath);
If RepositoryFile.Exists() Then If RepositoryFile.Exist() Then
Path = PossiblePath; Path = PossiblePath;
EndIf; EndIf;
@@ -446,20 +446,20 @@ Procedure WriteLogFile(Val Data, Val Method, Val Library)
LogDirectory = New File(LogPath); LogDirectory = New File(LogPath);
If Not LogDirectory.Exists() Then If Not LogDirectory.Exist() Then
CreateDirectory(LogPath); CreateDirectory(LogPath);
EndIf; EndIf;
LibraryLogCatalog = New File(LibraryLogPath); LibraryLogCatalog = New File(LibraryLogPath);
If Not LibraryLogCatalog.Exists() Then If Not LibraryLogCatalog.Exist() Then
CreateDirectory(LibraryLogPath); CreateDirectory(LibraryLogPath);
EndIf; EndIf;
FilePath = LibraryLogPath + "/" + Method + ".log"; FilePath = LibraryLogPath + "/" + Method + ".log";
LogFile = New File(FilePath); LogFile = New File(FilePath);
If Not LogFile.Exists() Then If Not LogFile.Exist() Then
LogDocument = New TextDocument; LogDocument = New TextDocument;
LogDocument.SetText(Data); LogDocument.SetText(Data);
LogDocument.Write(FilePath); LogDocument.Write(FilePath);

8
src/en/OInt/tools/Modules/OPI_TypeConversion.os
View File

@@ -51,7 +51,7 @@ Procedure GetBinaryData(Value) Export
File = New File(Value); File = New File(Value);
If File.Exists() Then If File.Exist() Then
Value = New BinaryData(Value); Value = New BinaryData(Value);
ElsIf StrFind(Value, "//") Then ElsIf StrFind(Value, "//") Then
@@ -85,7 +85,7 @@ Procedure GetBinaryOrStream(Value) Export
File = New File(Value); File = New File(Value);
If File.Exists() Then If File.Exist() Then
Value = New FileStream(Value, FileOpenMode.Open); Value = New FileStream(Value, FileOpenMode.Open);
Else Else
GetBinaryData(Value); GetBinaryData(Value);
@@ -116,7 +116,7 @@ Procedure GetCollection(Value) Export
File = New File(Value); File = New File(Value);
JSONReader = New JSONReader; JSONReader = New JSONReader;
If File.Exists() Then If File.Exist() Then
JSONReader.OpenFile(Value); JSONReader.OpenFile(Value);
@@ -230,7 +230,7 @@ Procedure GetLine(Value, Val FromSource = False) Export
Value = OPI_Tools.NumberToString(Value); Value = OPI_Tools.NumberToString(Value);
File = New File(Value); File = New File(Value);
If File.Exists() Then If File.Exist() Then
TextReader = New TextReader(Value); TextReader = New TextReader(Value);
Value = TextReader.Read(); Value = TextReader.Read();

2
src/en/OInt/tools/Modules/internal/Modules/OPI_Tools.os
View File

@@ -396,7 +396,7 @@ Function ConvertDataWithSizeRetrieval(Data, Val MinimumStreamSize = 0) Export
FileOnDisk = New File(Data); FileOnDisk = New File(Data);
If FileOnDisk.Exists() Then If FileOnDisk.Exist() Then
Size = FileOnDisk.Size(); Size = FileOnDisk.Size();
Else Else
OPI_TypeConversion.GetBinaryData(Data); OPI_TypeConversion.GetBinaryData(Data);