public void EnterUnit(Unit unit)
{
_fileExportPath = $@"\\alfamos2\ALFAPRODDATA\{unit.Name}\REPORTING\{_currentUserProfile}";
send(unit.Name, 21, 18);
enter();
enter();
enter();
EUCL.ClearScreen();
}
/// <summary>
/// Записать текущий профайл пользователя в Equation
/// </summary>
/// <param name="connectionChar">имя сессии</param>
internal void GetUserProfile(char connectionChar)
{
EUCL.Connect(connectionChar.ToString());
EUCL.ClearScreen();
send("Я", 21, 17);
enter();
_currentUserProfile = EUCL.ReadScreen(6, 18, 4);
EUCL.SendStr("@c");
EUCL.Wait();
EUCL.Disconnect(connectionChar.ToString());
}
/// <summary>
/// Заполнить коллекцию счетов данными из equation
/// </summary>
/// <param name="accounts"></param>
/// <param name="connectionChar"></param>
internal void FillAccounts(List <Account> accounts, char connectionChar)
{
EUCL.Connect($"{connectionChar}");
foreach (Account acc in accounts)
{
DateTime temp;
EUCL.ClearScreen();
send("БРХ", 21, 17);
enter();
send(acc.Number, 3, 29);
enter();
DateTime.TryParse(EUCL.ReadScreen(4, 70, 11), out temp);
acc.OpenedDate = temp;
if (DateTime.TryParse(EUCL.ReadScreen(5, 70, 11), out temp))
{
acc.ClosedDate = temp;
}
}
EUCL.ClearScreen();
EUCL.Disconnect($"{connectionChar}");
}
/// <summary>
/// Проверить на наличие оборота
/// </summary>
/// <param name="account"></param>
/// <returns>True в случае, если оборот > 0, False, если == 0 </returns>
public bool CheckForTurnover(Account account)
{
EUCL.ClearScreen();
send("TOO", 21, 17);
enter();
send(account.Number, 3, 29);
enter();
int row = 0;
for (int i = 7; i < 22; i++)
{
if (EUCL.ReadScreen(i, 8, 6).Equals("ИТОГО:"))
{
row = i;
break;
}
}
if (row == 0)
{
throw new Exception("Необработанное исключение"); //TODO обработать
}
string sumDbtStr = EUCL.ReadScreen(row, 33, 20).Replace(" ", string.Empty)
.Replace(",", string.Empty)
.Replace('.', ','); //сумма дебет
string sumCdtStr = EUCL.ReadScreen(row, 58, 20).Replace(" ", string.Empty)
.Replace(",", string.Empty)
.Replace('.', ','); //сумма дебет
double.TryParse(sumDbtStr, out double sumDbrDbl);
double.TryParse(sumCdtStr, out double sumCdrDbl);
EUCL.ClearScreen();
if (sumDbrDbl == 0 && sumCdrDbl == 0) //оборота нет - просто выходим
{
return(false);
}
else
{
return(true);
}
}
/// <summary> /// Привести экран в начальное положение (закрыть все опции ит.п.) /// </summary> public void ClearScreen() => EUCL.ClearScreen();
/// <summary>
/// Закрыть соединение с PCOMM
/// </summary>
public void CloseConnection()
{
EUCL.ClearScreen();
EUCL.Disconnect(sessionName.ToString());
Console.WriteLine("Соединение с Equation закрыто");
}
/// <summary>
/// Получить информацию о всех счетах с бух.режимом 100
/// </summary>
/// <param name="data">Коллекция физ.лиц</param>
public void fillAccounts(List <FL_data> data)
{
EUCL.ClearScreen();
send(21, 17, "ppp");
pEnter();
pEnter();
send(6, 2, "1");
EUCL.Wait();
send(5, 5, "40* ");
send(5, 77, "* ");
double onePercent = 100.00 / data.Count;
double currentProgress = 0.0;
int counter = 0;
foreach (FL_data item in data)
{
currentProgress += onePercent;
Console.WriteLine($"Done: {currentProgress:F2}% ({counter++}/{data.Count})");
send(7, 69, item.Pin);
send(5, 71, "100");
pEnter();
List <Account> accList = new List <Account>();
for (int i = 8; i < 20; i += 2)
{
Account acc = new Account();
acc.Number = EUCL.ReadScreen(i, 5, 24).Replace(".", string.Empty);
acc.OpenDate = parseCustom(EUCL.ReadScreen(i, 56, 6));
if (string.IsNullOrWhiteSpace(acc.Number))
{
break;
}
send(i, 2, "1");
EUCL.Wait();
acc.Type = ClearWhiteSpacesStr(EUCL.ReadScreen(8, 34, 35));
acc.Mnemonic = EUCL.ReadScreen(10, 34, 4);
acc.MnemonicFull = ClearWhiteSpacesStr(EUCL.ReadScreen(10, 40, 35));
EUCL.SendStr("@l"); //F21
EUCL.Wait();
acc.AccountingMode = ClearWhiteSpacesStr(EUCL.ReadScreen(8, 18, 35));
DateTime.TryParse(EUCL.ReadScreen(4, 70, 11), out acc.OpenDate);
DateTime.TryParse(EUCL.ReadScreen(5, 70, 11), out acc.CloseDate);
if (string.IsNullOrWhiteSpace(ClearWhiteSpacesStr(EUCL.ReadScreen(16, 18, 35))))
{
acc.EmployeeOpenedFIO = EUCL.ReadScreen(9, 18, 4);
}
else
{
send(16, 2, "1");
EUCL.Wait();
acc.EmployeeOpenedFIO = EUCL.ReadScreen(6, 26, 4);
EUCL.SendStr("@c"); //F12
EUCL.Wait();
}
EUCL.SendStr("@3"); //F3
EUCL.Wait();
EUCL.SendStr("@c"); //F12
EUCL.Wait();
accList.Add(acc);
}
LogWorker.ClearPrevConsoleLine();
item.Accounts = accList;
}
}
/// <summary>
/// Запросить TZ в Equation
/// </summary>
/// <param name="account">Счет, для которого получаем выписку</param>
/// <param name="alfamos">сессия, которая будет закрыта</param>
/// <returns></returns>
public List <Operation> GetOperations(Account account, Process alfamos, Unit unit)
{
List <Operation> exportedOperations = new List <Operation>();
#region направляем в EQ запрос на создание выписки
DateTime queryDateTime = DateTime.Now;
EUCL.ClearScreen();
send("TZ", 21, 17);
enter();
send(account.Number, 3, 29);
enter();
EUCL.SendStr("@4"); //F4
EUCL.Wait();
enter();
#endregion
#region ждем готового файла
if (!Directory.Exists(_fileExportPath))
{
throw new Exception($@"У пользователя отсутствует директория экспорта на {_fileExportPath}");
}
for (int i = 0; i < WAIT_TIME; i++)
{
bool done = false;
foreach (string fileName in Directory.GetFiles(_fileExportPath, "*.DBF"))
{
FileInfo file = new FileInfo(fileName);
if (file.CreationTime > queryDateTime)
{
ExcelWorker excel = new ExcelWorker(file);
exportedOperations.AddRange(excel.ReadForOperations());
done = true;
break;
}
}
if (done)
{
break;
}
Thread.Sleep(5000);
}
#endregion
#region Поиск недостающих операций
for (int i = 0; i < exportedOperations.Count; i++)
{
if (string.IsNullOrWhiteSpace(exportedOperations[i].Number) || exportedOperations[i].OperationDate.Year < 1950)
{
DateTime LastFullDate; // дата последней операции полными данными
if (i != 0)
{
LastFullDate = exportedOperations[i - 1].OperationDate;
}
else
{
LastFullDate = account.OpenedDate < unit.DateStart ? unit.DateStart : account.OpenedDate;
}
DateTime NextFullDate = unit.DateEnd; // дата следующей заполненной опреации
for (int j = i; j < exportedOperations.Count; j++)
{
if (!string.IsNullOrEmpty(exportedOperations[j].Number))
{
NextFullDate = exportedOperations[j].OperationDate > unit.DateEnd ? unit.DateEnd : exportedOperations[j].OperationDate;
break;
}
if (j == exportedOperations.Count - 1)
{
if (account.ClosedDate < unit.DateEnd && account.ClosedDate > unit.DateStart)
{
NextFullDate = account.ClosedDate;
}
else
{
NextFullDate = unit.DateEnd;
}
}
}
EUCL.ClearScreen();
send("TT", 21, 17);
enter();
send(account.Number, 3, 29);
send(LastFullDate.ToString("ddMMyy"), 14, 29);
send(NextFullDate.ToString("ddMMyy"), 16, 29);
enter();
enter();
#region поиск операций
do
{
EUCL.SendStr("1111111111");
EUCL.SendStr("@v");
EUCL.Wait();
EUCL.SendStr("1111111111");
} while (EUCL.ReadScreen(21, 79, 1).Equals("+"));
enter();
while (EUCL.ReadScreen(1, 32, 17).Equals("Просмотр проводки"))
{
string currentOperationNumber = EUCL.ReadScreen(8, 29, 45).Replace(" ", string.Empty);
if (string.IsNullOrWhiteSpace(currentOperationNumber) || !exportedOperations.Any(operation => operation.Number.Equals(currentOperationNumber)) &&
!exportedOperations[i].IsEdited)
{
Operation newOperation = new Operation
{
Number = currentOperationNumber,
OperationDate = DateTime.Parse(EUCL.ReadScreen(3, 40, 11)),
PayerAccountNumber = EUCL.ReadScreen(9, 15, 24).Replace(".", string.Empty),
RecieverAccount = EUCL.ReadScreen(12, 15, 24).Replace(".", string.Empty),
PayerName = $"{EUCL.ReadScreen(9, 44, 35).Replace(" ", string.Empty)}{EUCL.ReadScreen(10, 44, 35).Replace(" ", string.Empty)}{EUCL.ReadScreen(11, 44, 35).Replace(" ", string.Empty)}",
RecieverName = $"{EUCL.ReadScreen(12, 44, 35).Replace(" ", string.Empty)}{EUCL.ReadScreen(13, 44, 35).Replace(" ", string.Empty)}{EUCL.ReadScreen(14, 44, 35).Replace(" ", string.Empty)}",
Comment = $"{EUCL.ReadScreen(18, 10, 70).Replace(" ", string.Empty)}{EUCL.ReadScreen(19, 10, 70).Replace(" ", string.Empty)}",
DebetSum = EUCL.ReadScreen(15, 15, 20).Replace(" ", string.Empty),
IsEdited = true
};
if (newOperation.RecieverAccount.Equals("40911810904000000138") ||
newOperation.Comment.IndexOf("перевод между счетами") > -1)
{
newOperation.RecieverBankBIK = newOperation.PayerBankBIK = "044525593";
newOperation.RecieverBankName = newOperation.PayerBankName = "АО \"Альфа-Банк\"";
}
exportedOperations[i] = newOperation;
break;
}
enter();
enter();
}
#endregion
}
}
#endregion
alfamos.CloseMainWindow();
alfamos.WaitForExit(10000);
return(exportedOperations);
}