Документ TemplGrp/TemplGrp
Документ группы шаблона TemplGrp
Документ группы шаблона печати TemplGrp описывается програмистом в скриптах в виде документа. Пользователь не может его ни добавлять, ни редактировать, ни удалять. Он задается в скриптах с помощью функции CreateDoc("TemplGrp"), после чего задаются код группы, наименование и т.д. Документ TemplGrp, помимо главных реквизитов, имеет еще грид таблицу DataGrps, в котором хранятся группы данных, передаваемых документу. Документ TemplGrp задается следующим образом:
Dim docA1N As AsDoc
docA1N("Code") = "A1N"
docA1N("Name") = #BalanceSheet
docA1N("EName") = #e_BalanceSheet
docA1N.Grid("DataGrps").AddRow
docA1N.Grid("DataGrps").Value(0, "Code") = "01"
docA1N.Grid("DataGrps").Value(0, "Name") = "5"
docA1N.Grid("DataGrps").Value(0, "EName") = "5"
docA1N.Store
После задания групп, необходимо передать их в описание шаблона TEMPLATE следующим образом:
NAME = BusCert;
CAPTION = #BusTCertificate+"(doc)";
ECAPTION = #e_BusTCertificate+"(doc)";
TYPE = "0";
Group = A1N;
DataGroups = "01"
Каждый шаблон может принадлежать только одной группе, и каждый шаблон может иметь много групп данных, которые будут перечисляться через запятые, например: DataGroups = "01,05"
Обший вид документа TemplGrp следующий:
Name = TemplGrp;
Caption = "Տպելու ձևանմուշի խումբ";
ECaption = "Template group";
Page { Caption = #General; ECaption = #e_General;
Rekvizit {Name = Code; Caption = #Code; ECaption = #e_Code; Type = "C(20)"; ATRIBUTS = "R"; };
Rekvizit {Name = Name; Caption = #Name; ECaption = #e_Name; Type = "C(50)"; ATRIBUTS = "R"; };
Rekvizit {Name = EName; Caption = #EName; ECaption = #e_EName; Type = "C(50)"; };
GRID {Name = DataGrps; Caption = "Տվյալների խմբեր"; ECaption = "Data groups"; Width = 9000; Height = 2000;
COLUMN {Name = Code; Caption = #Code; ECaption = #e_Code; Type = "C(20)"; ATRIBUTS = "UR"; };
COLUMN {Name = Name; Caption = #Name; ECaption = #e_Name; Type = "C(50)"; ATRIBUTS = "R"; };
COLUMN {Name = EName; Caption = #EName; ECaption = #e_EName; Type = "C(50)"; };
};
};