Работа с InventDim...

[NJD]

и снова о помощи взываю. раньше у меня номера партий автоматом генерились и всё ок было. а сейчас они пустые... -((
чего делать?
while select Spt_Temp_Perenos
{
// Теперь лепим строку
purchLine.clear();
purchLine.PurchId=purchTable.PurchId;
info(purchLine.PurchId);
purchLine.ItemId=Spt_Temp_Perenos.ItemId; // номенклатура
purchLine.PurchPrice=Spt_Temp_Perenos.PurchPrice; // цена
purchLine.PurchQty=Spt_Temp_Perenos.PurchQty; //количество
purchLine.CurrencyCode='RUR';
//purchLine.РубМос
purchLine.initValue();
purchLine.createLine(true, true, true, true, true, true);

inventDim.InventLocationId = 'недостачи'; // склад недостачи
purchLine.InventDimId = InventDim::findOrCreate(inventDim).inventDimId;

InventDim.InventGtdId_RU = Spt_Temp_Perenos.InventGtdId_RU;
purchLine.InventDimId = InventDim::findOrCreate(inventDim).inventDimId;
purchLine.update();