vitalok_mzo писав:Подскажите код для "код КВЦПЗ и наименование КВЗПЗ"
В шаблоне "База слияния.fr3" на закладке "Код" найтите строку:
Код: Виділити все
ArrayEx('Участок_УКЦИЗ_код_2', 0);
и ниже её добавте:
Код: Виділити все
ArrayEx('Участок_КВЦПЗ_код', 0);
ArrayEx('Участок_КВЦПЗ_наименование', 0);
Найдите кусоче кода:
Код: Виділити все
If LocateData( 'DM2.TbTypeUses', 'ID_TypeUses', GetValue('DM2.TbUsesLnk', 'ID_TypeUses')) = True Then
begin
A2[ArrayEx('Участок_УКЦИЗ_код_1', 1)] := <DM2.TbTypeUses."Number">;
A2[ArrayEx('Участок_Функц_назнач1', 1)] := <DM2.TbTypeUses."Name">;
end;
И ниже него добавте:
Код: Виділити все
If LocateData( 'DM2.TbTypeUse', 'ID_TypeUse', GetValue('DM2.TbUsesLnk', 'ID_TypeUse')) = True Then
begin
A2[ArrayEx('Участок_КВЦПЗ_код', 1)] := <DM2.TbTypeUse."Number">;
A2[ArrayEx('Участок_КВЦПЗ_наименование', 1)] := <DM2.TbTypeUse."Name">;
end;
И также не забудьте подключить таблицу DM2.TbTypeUse