Печать реестра по передаче сумм в Альфа-банк

Добрый день!

Опишите задачу более подробно ( что и куда нужно "написать")

сейчас - нет

По такому объему информации трудно поставить диагноз..

Как можно вмешаться в процесс подготовки печатной формы

Такой функционал не закладывался. Можете написать свою печатную форму.. как понял, она у вас уже была

Для печати можно и сейчас сформировать таблицу передачи данных в банк в старом формате, но для записи в файл таблицу передачи придется создавать другую, в новом формате, что не очень удобно!

Не понял почему таблицы должны быть разными?

1)Добавляете свой шаблон (на основе поставочной таблицы)

2)Для своего шаблона прописываете свою печатную форму.

3)Передача в файл будет поставочной, печать будет пользовательская.

Понял, сделал свой шаблон!

А для этого шаблона нет возможности генерировать путь записи на основании текущей даты, что можно было ранее делать в скрипте:

\\okb1-srv1\files\okb1-buh\ZP\ALFA\13-05-2024

?

для этого шаблона нет возможности

О каком шаблоне идет речь?

Я запутался.. какое отношение имеет "путь для выгрузки файла с зачислением" к проблеме  с "печатной формой", озвученной в первом посте.

Добрый день!

Пусть путь сохранения файла обмена с банком будет другая тема, хотя проблема редактирования этого файла упоминалась в первом посте, да и файлы созданные для печати и обмена у Альфы абсолютно идентичны...

Что касается непосредственно печати, то фантазии разыгрались:

Возможно-ли создать некую таблицу(справочник) которую читать в скрипте и по ключу(значению в колонке) получать данные для печати? Где посмотреть пример, если это реально?

Имея подобную таблицу данные для печати может менять/удалять/добавлять любой пользователь, а только я в тексте скрипта.

Возможно-ли создать некую таблицу(справочник) которую читать в скрипте и по ключу(значению в колонке) получать данные для печати

Можно.

Например так:

double mrot=0.; //сумма мрот
Value_For_Table_Cod(86,0, data, mrot);

или

char key[256];sprintf(key,"%02d",osnCode);
char value[256];
GetValueClassifIfExist("TABLSET2\\Tabl13.sum",to_string(key),value,200,"Name","OsnCode");

или

GetManagers()
{
  var mapManagers = CreateObject("MapString");  mapManagers.Clear();
  char dir[256];  GetCommonZPL(dir,255);//определяем путь до сетевого ЗПЛ -справочник берем из него
  string filePath =dir+"\\TABLSET2\\Tabl7.sum";   // путь до справочника
  var tabl = CreateObject("CurPrnTbl"); tabl.InitialNameFile(to_string(filePath));
  // цикл по записям таблицы
  for (int zap=0; zap < tabl.Count_Rcr(); zap++)
  {
    int tn=atoi(tabl.TextS("FCtn",zap));
    if (!tn) 
      continue; //пропускаем пустые строки
 
    char str[256];sprintf(str,"%05d",tn);
    if (!mapManagers.IsExist(to_string(str)))
      mapManagers.Add(to_string(str),GetFio(tn));
  }
  return mapManagers;
} 

Спасибо!

Добрый день!

В каком скрипте можно разместить функцию, типа выше приведенной "GetManagers()", чтобы была доступной к вызову из любого скрипта печати реестра?

В любом постоянно загруженном модуле.

Например в SCRIPT\user\USFUNCRW.S

Спасибо!