Задача - добавить внешний атрибут в оба окна... (координаты убал чтоб места меньше было)
Определяем контейнер
Код: Выделить всё
inherited:: HandleEvent(cmInit);
cfsSetCurrentContainer(cfsGetCurrentContainerSelf);//интерфейс 'F_PLPOR::PLPOR'
Код: Выделить всё
cfsCreateObject(cfcLabel, 'SCPLDOCEDITPP', 'LbExtAttr: PLPOR,281474976710689', false, _iObjSp10); //название таблы, номер нрек AttrNam
cfsSetProp(_iObjSp10, cfpTitle, '№ стр.');
cfsSetProp(_iObjSp10, cfpVisible, TRUE);
cfsSetProp(_iObjSp10, cfpPickButton, TRUE);
cfsSetProp(_iObjSp10, cfpFieldName, 'LbExtAttr: PLPOR,281474976710689,Номер страницы,0'); //attrnam.name,attrnam.attrtype
cfsSetProp(_iObjSp10, 'Original', False);
Код: Выделить всё
cfsCreateObject(cfcPanelInputLine, 'SCPLDOCEDITPP', 'ExtAttr: PLPOR,281474976710689', false, _iObjSp09); //название таблы, attrnam.nrec
cfsSetProp(_iObjSp09, 'StatusCtx', 150);
cfsSetProp(_iObjSp09, 'Original', False);
cfsSetProp(_iObjSp09, cfpVisible, TRUE);
cfsSetProp(_iObjSp09, cfpProtect, False);
cfsSetProp(_iObjSp09, cfpPickButton, False);
cfsSetProp(_iObjSp09, cfpOriginal, false);
cfsSetProp(_iObjSp09, cfpFieldName, 'ExtAttr: PLPOR,281474976710689,Номер страницы,0'); //attrnam.name,attrnam.attrtype //
добавляем во второе окно
Код: Выделить всё
cfsSetCurrentContainer('F_PLPOR::PLPOR.WIPLDOCEDIT.SCPLDOCEDITPP_KVO')//эта строчка нафиг не нужна, но на всякий случай (нет разницы добавляю её или нет)
Код: Выделить всё
cfsCreateObject(cfcLabel, 'SCPLDOCEDITPP_KVO', 'LbExtAttr: PLPOR,281474976710689#1', false, iObj10); //название таблы, номер нрек AttrNam
cfsSetProp(iObj10, cfpTitle, '№ стр.');
cfsSetProp(iObj10, cfpVisible, TRUE);
cfsSetProp(iObj10, cfpPickButton, TRUE);
cfsSetProp(iObj10, cfpFieldName, 'LbExtAttr: PLPOR,281474976710689,Номер страницы,0'); //attrnam.name,attrnam.attrtype
Код: Выделить всё
message(cfsCreateObject(cfcPanelInputLine, 'SCPLDOCEDITPP_KVO', 'ExtAttr: PLPOR,281474976710689', false, iObj09)); //название таблы, attrnam.nrec
cfsSetProp(iObj09, 'name', 'ExtAttr: PLPOR,281474976710689#1');
cfsSetProp(iObj09, 'StatusCtx', 150);
cfsSetProp(iObj09, cfpVisible, TRUE);
cfsSetProp(iObj09, cfpProtect, False);
cfsSetProp(iObj09, cfpPickButton, False);
cfsSetProp(iObj09, 'Original', false);
cfsSetProp(iObj09, cfpFieldName, 'ExtAttr: PLPOR,281474976710689,Номер страницы,0'); //attrnam.name,attrnam.attrtype //