// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// Подстановка дат ( [DayDate] и [NextDate] )
static string DateSubstitution(string SrcStr)
{
if (SrcStr == null)
{
return(CAbc.EMPTY);
}
if (SrcStr.Trim() == "")
{
return(SrcStr);
}
string Result = SrcStr.Trim().ToUpper();
if ((Result.IndexOf("[NEXTDATE]") >= 0) && (NextDate == 0))
{
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// Запрос пользователю на ввод даты дня, который закрывается
while (NextDate == 0)
{
CCommon.Write("Какой следующий рабочий день ? ( " + NEXT_STR.Replace("/", ".") + " ) ");
Answer = CCommon.Input().Trim();
if (Answer == "")
{
NextDate = DefaultNextDate;
}
else
{
NextDate = CCommon.GetDate(Answer);
}
}
}
Result = Result.Replace("[DAYDATE]", DayDate.ToString());
Result = Result.Replace("[NEXTDATE]", NextDate.ToString());
return(Result);
}
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// Получить имя файла с помощью графической панели открытия файла
static string SelectFileNameGUI(string SettingsPath, string DestPath)
{
string TmpS = CAbc.EMPTY;
string Result = CAbc.EMPTY;
string SettingsFileName = null;
if (SettingsPath != null)
{
if (SettingsPath.Trim().Length > 0)
{
SettingsFileName = SettingsPath.Trim() + "\\" + CCommon.GetUserName() + ".ldr";
if (CCommon.FileExists(SettingsFileName))
{
TmpS = CCommon.LoadText(SettingsFileName, CAbc.CHARSET_WINDOWS);
}
if (TmpS == null)
{
TmpS = CAbc.EMPTY;
}
}
}
TmpS = TmpS.Trim();
TmpS = CCommon.OpenFileBox(
"Укажите А-файл для загрузки"
, TmpS
, "А-файлы (?A*.*)|?a*.*"
);
if (TmpS == null)
{
return(Result);
}
TmpS = TmpS.Trim();
if (TmpS.Length == 0)
{
return(Result);
}
if (SettingsFileName != null)
{
CCommon.SaveText(SettingsFileName, CCommon.GetDirName(TmpS), CAbc.CHARSET_WINDOWS);
}
Result = DestPath.Trim() + "\\" + CCommon.GetFileName(TmpS);
if (CCommon.FileExists(Result))
{
CCommon.Print("", "Выбранный файл уже существует в целевом каталоге : ", Result, "", "Нажмите ENTER для выхода...");
CCommon.Input();
Result = CAbc.EMPTY;
}
else
if (!CCommon.CopyFile(TmpS, Result))
{
CCommon.Print("Ошибка копирования файла в целевой каталог : ", Result, "", "Нажмите ENTER для выхода...");
CCommon.Input();
Result = CAbc.EMPTY;
}
return(Result);
}
public void AskFixedValues()
{
//----------------------------------------------------------
// если из файла читается кредитовый IBAN, то кредитовый счет запрашивать у пользователя уже не будем
if (Kinds[CSepAFileInfo.L_CREDITIBAN] > 0 && Kinds[CSepAFileInfo.L_CREDITACC] == -1)
{
Kinds[CSepAFileInfo.L_CREDITACC] = -4;
}
string Answer = "";
for (int CurrentField = 0; CurrentField < TotalFields; CurrentField++)
{
if (Kinds[CurrentField] == -1) /* -1 = постоянное+редактир. */
{
do
{
CCommon.Write(Infos[CurrentField]);
if ((Values[CurrentField] != "") && (Values[CurrentField] != null))
{
CCommon.Write(" ( " + Values[CurrentField] + " )");
}
CCommon.Write(" : ");
Answer = CCommon.Input().Trim();
if ((Answer != "") && (Answer != null))
{
Values[CurrentField] = Answer;
}
} while (Values[CurrentField] == "");
}
}
CCommon.Write("Записать шаблон в файл ( пусто = не записывать ) : ");
Answer = CCommon.Input();
if (Answer != null)
{
if (Answer.Trim() != "")
{
if (!SaveToFile(Answer.Trim() + ((CCommon.GetExtension(Answer.Trim()) != "") ? "" : ".mod")))
{
CCommon.Print(" Ошибка записи шаблона в файл " + Answer);
}
}
}
CCommon.Write("Нумеровать документы начиная с ( " + NumberDoc.ToString() + " ) : ");
Answer = CCommon.Input();
if ((Answer != "") && (Answer != null))
{
try{
NumberDoc = CCommon.CLng(Answer.Trim());
} catch (System.Exception Excpt) {
NumberDoc = 1;
}
}
}
public bool Load()
{
if (Connection == null)
{
return(false);
}
CRecordSet RecordSet = new CRecordSet(Connection);
if (RecordSet.Open("declare @OwnerCode as VarChar(32) select @OwnerCode=user_name() exec dbo.Mega_Common_Registry;1 @OwnerCode=@OwnerCode , @TaskCode='loader' , @TaskName='TAL\\FILIAL\\LOADER.EXC' "))
{
while (RecordSet.Read())
{
if (CCommon.IsDigit("0" + RecordSet["FlagCode"].Trim()))
{
Current = CCommon.CInt32("0" + RecordSet["FlagCode"].Trim());
if (Current < TOTAL_GROUP)
{
Topics[Current] = RecordSet["Name"].Trim();
Purposes[Current] = RecordSet["Info"].Trim();
}
}
}
}
RecordSet.Close();
Print();
Current = CConsole.GetMenuChoice("Принять такие назначения платежей", "Изменить назначения платежей");
while (Current == 2)
{
Print();
Current = CConsole.GetMenuChoice(TopicMenus);
while (Current != 0)
{
CCommon.Write(" Введите номер балансового счета или список через запятую : ");
Topics[Current - 1] = CCommon.Input().Trim();
CCommon.Write(CAbc.CRLF + " Назначение платежа : ");
Purposes[Current - 1] = CCommon.Input().Trim();
Print();
Current = CConsole.GetMenuChoice(TopicMenus);
}
Print();
Current = CConsole.GetMenuChoice("Принять такие назначения платежей", "Изменить назначения платежей");
}
if (Current == 1)
{
return(true);
}
else
{
return(false);
}
}
//-----------------------------------------------------------------------------------------
// основная программа
public static void Main()
{
const bool DEBUG = false;
const int MAX_COLUMNS = 299; // максимальное количество столбцов
int[] ColWidth = new int[MAX_COLUMNS]; // ширины столбцов
int ColNumber = 0;
int ALineNumber = 0;
int AFieldNumber = 0;
string AFileName = "";
string ModelFileName = CCommon.GetTempDir() + "\\" + "AMaker.mod";
string Now_Date_Str = CCommon.DtoC(CCommon.Today()).Substring(2, 6);
string Now_Time_Str = CCommon.Hour(CCommon.Now()).ToString("00") + CCommon.Minute(CCommon.Now()).ToString("00");
CTsvWriter TsvWriter = new CTsvWriter();
CTextReader TextReader = new CTextReader();
string TsvFileName = "$";
string InpFileName = "";
int InpColCount = 0;
int I, SourceMode = -2; // откуда читать данные : 0=ClipBoard , 1=CSV , 2=DIF
string Tmps = "";
string[] SubTmps;
//----------------------------------------------------------
CCommon.Print(" Программа для cоздания А-файлов с платежами на основе форматных данных,");
CCommon.Print(" полученных из электронной таблицы (CVS/DIF). Версия 2.03 от 17.09.2019г.");
if (DEBUG)
{
InpFileName = "F:\\Trash\\Kazna1.csv";
}
else
if (CCommon.ParamCount() < 2)
{
CCommon.Print("");
CCommon.Print(" Формат запуска : ");
CCommon.Print(" AMaker3 Имя_файла ");
CCommon.Print(" где : ");
CCommon.Print(" Имя_файла - имя файла данных в формате CSV или DIF ");
CCommon.Print("");
return;
}
else
{
InpFileName = CAbc.ParamStr[1].Trim();
}
if (InpFileName == "*")
{
SourceMode = 0;
}
else
{
switch (CCommon.GetExtension(InpFileName).ToUpper())
{
case ".CSV": {
SourceMode = 1;
break;
}
case ".DIF": {
SourceMode = 2;
break;
}
case ".MOD": {
SourceMode = -1;
break;
}
default: {
CCommon.Print("Неправильный тип файла !");
SourceMode = -2;
break;
}
}
}
//----------------------------------------------------------
// если выбран файл с шаблоном, то выводим его на экран
if (SourceMode == -1)
{
if (AModel.LoadFromFile(InpFileName))
{
AModel.PrintConstValues();
if (CConsole.GetBoxChoice("Использовать теперь этот шаблон ?", " Да = Enter . Нет = Esc ."))
{
if (CCommon.FileExists(ModelFileName))
{
CCommon.DeleteFile(ModelFileName);
}
if (CCommon.FileExists(ModelFileName))
{
CCommon.Print("Ошибка удаления файла " + ModelFileName);
}
else if (!CCommon.CopyFile(InpFileName, ModelFileName))
{
CCommon.Print("Ошибка записи файла " + ModelFileName);
}
return;
}
}
}
else
if (CCommon.FileExists(ModelFileName))
{
AModel.LoadFromFile(ModelFileName);
}
if ((SourceMode < 0) || (SourceMode > 2))
{
CCommon.Print("Неправильная строка параметров !");
return;
}
//----------------------------------------------------------
// скидываем информацию в промежуточный Tsv-файл
TsvFileName = CCommon.GetTempName();
if (TsvFileName == null)
{
TsvFileName = InpFileName + ".$$$";
}
else if (TsvFileName.Trim() == "")
{
TsvFileName = InpFileName + ".$$$";
}
if (SourceMode == 0)
{
TsvWriter.LoadFromClipboard();
if (!TsvWriter.SaveToFile(TsvFileName))
{
CCommon.Print("Ошибка записи в файл " + TsvFileName);
return;
}
}
if (SourceMode > 0)
{
if (!CCommon.FileExists(InpFileName))
{
CCommon.Print("Не найден файл " + InpFileName);
return;
}
}
if (SourceMode == 1)
{
if (TsvWriter.LoadFromCsvFile(InpFileName))
{
if (!TsvWriter.SaveToFile(TsvFileName))
{
CCommon.Print("Ошибка записи в файл " + TsvFileName);
return;
}
}
else
{
CCommon.Print("Ошибка чтения файла " + InpFileName);
return;
}
}
if (SourceMode == 2)
{
if (TsvWriter.LoadFromDifFile(InpFileName))
{
if (!TsvWriter.SaveToFile(TsvFileName))
{
CCommon.Print("Ошибка записи в файл " + TsvFileName);
return;
}
}
else
{
CCommon.Print("Ошибка чтения файла " + InpFileName);
return;
}
}
//----------------------------------------------------------
// подсчитываем количество столбцов во входящем файле , а также ширину этих столбцов
for (I = 0; I < MAX_COLUMNS; I++)
{
ColWidth[I] = 0;
}
for (I = 0; I < (MAX_LINES * MAX_FILES); I++)
{
Cents[I] = 0;
}
if (!TextReader.Open(TsvFileName, CAbc.CHARSET_WINDOWS))
{
CCommon.Print("Ошибка чтения файла" + TsvFileName);
TsvFile.Close();
CCommon.DeleteFile(TsvFileName);
return;
}
if (!TextReader.Read())
{
CCommon.Print("Ошибка чтения файла" + TsvFileName);
TsvFile.Close();
CCommon.DeleteFile(TsvFileName);
return;
}
for (I = 0; I < 20; I++)
{
Tmps = TextReader.Value;
SubTmps = Tmps.Split(CCommon.Chr(9));
if (SubTmps != null)
{
if (SubTmps.Length > InpColCount)
{
InpColCount = SubTmps.Length;
}
for (ColNumber = 0; ColNumber < SubTmps.Length; ColNumber++)
{
if (SubTmps[ColNumber].Length > ColWidth[ColNumber])
{
ColWidth[ColNumber] = SubTmps[ColNumber].Length;
}
}
}
else
{
InpColCount = 0;
}
if (!TextReader.Read())
{
break;
}
}
TextReader.Close();
if (InpColCount == 0)
{
CCommon.Print("Не получается распознать входные данные ");
CCommon.DeleteFile(TsvFileName);
return;
}
//----------------------------------------------------------
// выводим столбцы на экран и запрос пользователю ( помним , что в Csv - файле нумерация столбцов начинается с 1 )
CConsole.Clear();
if (!TsvFile.Open(TsvFileName, CAbc.CHARSET_WINDOWS))
{
CCommon.Print("Ошибка чтения файла " + TsvFileName);
return;
}
for (I = 0; I < (System.Console.WindowHeight - 1); I++)
{
if (!TsvFile.Read())
{
break;
}
Tmps = "";
for (ColNumber = 0; ColNumber < InpColCount; ColNumber++)
{
Tmps += CCommon.Left(TsvFile[ColNumber + 1], ColWidth[ColNumber]) + "¦";
}
if (Tmps.Length > 0)
{
if (Tmps.Length < System.Console.WindowWidth - 1)
{
CCommon.Print(Tmps);
}
else
{
CCommon.Print(Tmps.Substring(0, System.Console.WindowWidth - 2));
}
}
}
TsvFile.Close();
if (!CConsole.GetBoxChoice("Для продолжения обработки нажмите Enter.", "", "Для выхода нажмите Esc. "))
{
CCommon.DeleteFile(TsvFileName);
return;
}
CConsole.Clear();
//----------------------------------------------------------
// распознавание столбцов во входящем файле ( помним , что в Csv - файле нумерация столбцов начинается с 1 )
for (ColNumber = 0; ColNumber < InpColCount; ColNumber++)
{
CConsole.Clear();
CCommon.Print("");
if (!TsvFile.Open(TsvFileName, CAbc.CHARSET_WINDOWS))
{
CCommon.Print("Ошибка чтения файла " + TsvFileName);
TsvFile.Close();
CCommon.DeleteFile(TsvFileName);
return;
}
for (I = 0; I < (System.Console.WindowHeight - 1); I++)
{
if (!TsvFile.Read())
{
break;
}
else
{
CCommon.Print(" " + TsvFile[ColNumber + 1]);
}
}
TsvFile.Close();
if (!AModel.RecognizeColumn(ColNumber + 1))
{
CCommon.DeleteFile(TsvFileName);
return;
}
}
CConsole.Clear();
//----------------------------------------------------------
// запрашиваем у пользователя значения постоянных полей
AModel.AskFixedValues();
//----------------------------------------------------------
// подсчитываем количество строк и общую сумму по входному файлу
TotalLines = 0;
TotalCents = 0;
if (!TsvFile.Open(TsvFileName, CAbc.CHARSET_WINDOWS))
{
CCommon.Print("Ошибка чтения файла " + TsvFileName);
TsvFile.Close();
CCommon.DeleteFile(TsvFileName);
return;
}
while (TsvFile.Read())
{
if (IsLineEmpty())
{
continue;
}
Cents[TotalLines] = CCommon.CLng(GetColValue(CSepAFileInfo.L_SUMA).Trim());
TotalCents += Cents[TotalLines];
TotalLines++;
}
TsvFile.Close();
//-----------------------------------------------------------
// запрашиваем у пользователя имя файла , в который будет записан результат
string ShortName = ConstPartOfName;
CCommon.Write("Краткое имя результирующего файла ( " + ShortName + " ) : ");
ShortName = CCommon.Input().Trim();
if (ShortName.Length > 0)
{
ConstPartOfName = CCommon.Left(ShortName, 8);
}
//-----------------------------------------------------------
// сверяем с пользователем общее количество строк и общую сумму
if (!CConsole.GetBoxChoice(" Всего строк : " + CCommon.Right(TotalLines.ToString(), 11)
, " Общая сумма : " + CCommon.StrN(TotalBucks, 11).Replace(",", ".")
, "_________________________________"
, "Для продолжения нажмите Enter."
, "Для выхода - Esc. "
)
)
{
CCommon.DeleteFile(TsvFileName);
return;
}
CConsole.Clear();
//-----------------------------------------------------------
// записываем результатов работы программы в файлы
if (!TsvFile.Open(TsvFileName, CAbc.CHARSET_WINDOWS))
{
CCommon.Print("Ошибка чтения файла " + TsvFileName);
TsvFile.Close();
CCommon.DeleteFile(TsvFileName);
return;
}
BatchNum = 0;
//
while (TotalLines > 0)
{
AFileName = GetAFileName();
if (!AFile.Create(AFileName, CAbc.CHARSET_DOS))
{
CCommon.Print("Ошибка создания файла " + AFileName);
break;
}
else
{
CCommon.Print(AFileName);
}
//
AFile.Head[CSepAFileInfo.H_EMPTYSTR] = "";
AFile.Head[CSepAFileInfo.H_CRLF1] = CAbc.CRLF;
AFile.Head[CSepAFileInfo.H_FILENAME] = CCommon.Left(AFileName, 12);
AFile.Head[CSepAFileInfo.H_DATE] = Now_Date_Str;
AFile.Head[CSepAFileInfo.H_TIME] = Now_Time_Str;
AFile.Head[CSepAFileInfo.H_STRCOUNT] = TotalLinesInBatch().ToString();
AFile.Head[CSepAFileInfo.H_TOTALDEBET] = "0";
AFile.Head[CSepAFileInfo.H_TOTALCREDIT] = TotalCentsInBatch().ToString();
AFile.Head[CSepAFileInfo.H_DES] = "0";
AFile.Head[CSepAFileInfo.H_DES_ID] = "UIAB00";
AFile.Head[CSepAFileInfo.H_DES_OF_HEADER] = "";
AFile.Head[CSepAFileInfo.H_CRLF2] = CAbc.CRLF;
//
if (!AFile.WriteHeader())
{
CCommon.Print("Ошибка записи файла " + AFileName);
AFile.Close();
break;
}
//
for (ALineNumber = 0; ALineNumber < TotalLinesInBatch(); ALineNumber++)
{
do
{
if (!TsvFile.Read())
{
break;
}
}while (IsLineEmpty());
for (AFieldNumber = 0; AFieldNumber < AModel.TotalFields; AFieldNumber++)
{
AFile.Line[AFieldNumber] = GetColValue(AFieldNumber);
}
if (!AFile.WriteLine())
{
CCommon.Print("Ошибка записи файла " + AFileName);
break;
}
AModel.IncNumber();
}
AFile.Close();
BatchNum++;
TotalLines -= TotalLinesInBatch();
}
TsvFile.Close();
CCommon.DeleteFile(TsvFileName);
}
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
public static void Main()
{
const bool DEBUG = false;
CParam Param = new CParam();
int Choice = 0;
bool Result = false;
byte SavedColor = 7;
string OutputDir = CAbc.EMPTY;
string ScroogeDir = CAbc.EMPTY;
string ServerName = CAbc.EMPTY;
string DataBase = CAbc.EMPTY;
string LogFileName = CAbc.EMPTY;
string UnsolverBillsCmdText = CAbc.EMPTY;
int UnsolvedBillsExists = 0;
string[] Titles = { "ОТКРЫТИЕ ДНЯ", "ЗАКРЫТИЕ ДНЯ" };
string[] LogFileNames = { "dayopen.log", "dayclose.log" };
string NOW_STR = CCommon.StrD(CCommon.Today(), 10, 10).Substring(6)
+ CCommon.StrD(CCommon.Today(), 10, 10).Substring(2, 4)
+ CCommon.StrD(CCommon.Today(), 10, 10).Substring(0, 2);
Err.LogToConsole();
CConsole.Clear();
CCommon.Print(" Оболочка открытия и закрытия дня в `Скрудже`. Версия 3.13 от 02.10.2018г.", "");
if (DEBUG)
{
Mode = 1;
}
else
if (CCommon.IsEmpty(Param["Mode"]))
{
CCommon.Print("Не указан режим работы программы !");
}
else
{
switch (Param["Mode"].ToUpper())
{
case "OPEN": {
Mode = 1;
break;
}
case "CLOSE": {
Mode = 2;
break;
}
default: {
CCommon.Print("Неверно указан режим работы программы !");
break;
}
}
}
if ((Mode != 1) && (Mode != 2))
{
return;
}
if ((Mode == 2) && (!CCommon.DirExists("Z:\\")))
{
SavedColor = CConsole.BoxColor;
CConsole.BoxColor = CConsole.RED * 16 + CConsole.WHITE;
CConsole.ShowBox("", "Не подключен Z:\\", "");
CConsole.ClearKeyboard();
CConsole.ReadChar();
CConsole.BoxColor = SavedColor;
CConsole.Clear();
CConsole.ShowCursor();
}
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// Запрос пользователю на ввод даты дня, который открывается или закрывается
while (DayDate == 0)
{
switch (Mode)
{
case 1: {
CCommon.Write("Какую дату открываем ? ( " + NOW_STR.Replace("/", ".") + " ) ");
break;
}
default: {
CCommon.Write("Какую дату закрываем ? ( " + NOW_STR.Replace("/", ".") + " ) ");
break;
}
}
Answer = CCommon.Input().Trim();
if (Answer == "")
{
DayDate = CCommon.Today();
}
else
{
DayDate = CCommon.GetDate(Answer);
}
}
// - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Scrooge2Config = new CScrooge2Config();
if (!Scrooge2Config.IsValid)
{
CCommon.Print(Scrooge2Config.ErrInfo);
return;
}
ScroogeDir = (string)Scrooge2Config["Root"];
OutputDir = (string)Scrooge2Config["Output"];
ServerName = (string)Scrooge2Config["Server"];
DataBase = (string)Scrooge2Config["DataBase"];
if (ScroogeDir == null)
{
CCommon.Print(" Не найдена переменная `Root` в настройках `Скрудж-2` ");
return;
}
if (ServerName == null)
{
CCommon.Print(" Не найдена переменная `Server` в настройках `Скрудж-2` ");
return;
}
if (DataBase == null)
{
CCommon.Print(" Не найдена переменная `Database` в настройках `Скрудж-2` ");
return;
}
CCommon.Print(" Беру настройки `Скрудж-2` здесь : " + ScroogeDir);
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
ConnectionString = "Server=" + ServerName
+ ";Database=" + DataBase
+ ";Integrated Security=TRUE;";
Connection = new CConnection(ConnectionString);
if (Connection.IsOpen())
{
CCommon.Print(" Сервер " + ServerName);
CCommon.Print(" База " + DataBase + CAbc.CRLF);
}
else
{
CCommon.Print(CAbc.CRLF + " Ошибка подключения к серверу !");
return;
}
System.Console.Title = " " + Titles[Mode - 1] + " | " + ServerName + "." + DataBase;
Command = new CCommand(Connection);
int IsFullAccess = ( int )CCommon.IsNull(Command.GetScalar(" select dbo.Fn_IsFullAccess( DEFAULT ) "), (int)0);
string InfNBU_OutPath = ( string )CCommon.IsNull(Command.GetScalar(" exec dbo.Mega_Day_Open;5 @Mode=2 ; "), (string)CAbc.EMPTY);
if (Mode == 2)
{
// Записываю в историю логин пользователя, который закрывает день
Command.Execute(" exec dbo.Mega_Day_Close;12 @DayDate = " + DayDate.ToString() + " , @UserCode = '" + UserCode + "' ");
// Проверка : имеются ли непроведенные документы ?
UnsolverBillsCmdText = " If Exists ( select 1 from dbo.Mega_SV_WaitingBills with (NoLock) where (DayDate=" + DayDate.ToString() + " ) and ((PermitFlag & 255 )!=255) and ((ProcessFlag & 3)!=3) ) select Convert(Integer,1) else select Convert(Integer,0) ";
UnsolvedBillsExists = ( int )CCommon.IsNull(Command.GetScalar(UnsolverBillsCmdText), (int)0);
}
Command.Close();
Connection.Close();
if (IsFullAccess < 1)
{
CCommon.Print(CAbc.CRLF + " Для работы программы пользователю необходим полный доступ в Скрудже !");
return;
}
InfNBU_OutPath = InfNBU_OutPath.Trim();
if (InfNBU_OutPath.Length == 0)
{
Err.Print(CCommon.Now().ToString() + "Ошибка определения выходного каталога для ОДБ." + CAbc.CRLF + CAbc.CRLF);
}
if (UnsolvedBillsExists == 1)
{
SavedColor = CConsole.BoxColor;
CConsole.BoxColor = CConsole.RED * 16 + CConsole.WHITE;
CConsole.ShowBox("", "Имеются непpоведенные документы", "", " Пpоведите их или удалите !", "");
CConsole.ClearKeyboard();
CConsole.ReadChar();
CConsole.BoxColor = SavedColor;
CConsole.Clear();
CConsole.ShowCursor();
}
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
if (OutputDir != null)
{
OutputDir = ScroogeDir + "\\" + OutputDir.Trim();
if (!CCommon.DirExists(OutputDir))
{
CCommon.MkDir(OutputDir);
}
if (CCommon.DirExists(OutputDir))
{
OutputDir += "\\" + CCommon.StrD(DayDate, 8, 8).Replace("/", "").Replace(".", "");
if (!CCommon.DirExists(OutputDir))
{
CCommon.MkDir(OutputDir);
}
if (!CCommon.DirExists(OutputDir))
{
OutputDir = ScroogeDir + "\\";
}
}
LogFileName = OutputDir + "\\" + LogFileNames[Mode - 1];
}
else
{
LogFileName = ScroogeDir + "\\" + LogFileNames[Mode - 1];
}
Err.LogTo(LogFileName);
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// Основной цикл программы
do
{
System.Console.Title = " " + Titles[Mode - 1] + " " + CCommon.StrD(DayDate, 8, 8) + " | " + ServerName + "." + DataBase;
string[] FilesForMEDOC = CCommon.GetFileList(InfNBU_OutPath + "\\@*.*");
if (FilesForMEDOC != null)
{
if (FilesForMEDOC.Length > 0)
{
CConsole.GetBoxChoice(
""
, "В каталоге " + InfNBU_OutPath
, "Найдены файлы для налоговой @*.*"
, "Не забудьте их отправить!"
, ""
);
}
}
if (!LoadHistory(Mode))
{
Err.Print(CCommon.Now().ToString() + "Ошибка получения с сервера истории работы программы !");
}
Choice = CConsole.GetMenuChoice(MenuNames);
if (Choice > 0)
{
Err.Print(CCommon.Now().ToString() + "\t< " + MenuNames[Choice - 1] + " ( " + UserCode + " ) " + CAbc.CRLF);
if (!SaveHistory(Mode, Choice))
{
Err.Print("Ошибка сохранения на сервере истории работы программы !");
}
switch (MenuKinds[Choice - 1].Trim().ToUpper())
{
case "EXE.COPY": {
Result = StartExeCopy(
MacroSubstitution(MenuCommands[Choice - 1])
, MacroSubstitution(
DateSubstitution(
MenuParams[Choice - 1]
)
)
);
break;
}
case "SQL.CMD": {
Result = StartSqlCmd(
DateSubstitution(
MenuCommands[Choice - 1]
)
);
break;
}
case "SQL.RS": {
Result = StartSqlRS(
DateSubstitution(
MenuCommands[Choice - 1]
)
);
break;
}
case "SQL.ROUTINE": {
Result = StartSqlRoutine(
DateSubstitution(
MenuCommands[Choice - 1]
)
);
break;
}
case "EXC": {
Result = StartExc(ScroogeDir
, MacroSubstitution(
DateSubstitution(
MenuCommands[Choice - 1]
)
)
);
break;
}
case "URL.IE": {
Result = StartUrl(
DateSubstitution(
MenuCommands[Choice - 1]
)
);
break;
}
default: {
break;
}
}
Err.Print(CCommon.Now().ToString() + "\t " + MenuNames[Choice - 1] + " ( " + Result.ToString() + " ) > " + CAbc.CRLF);
}
} while (Choice != 0);
}
