RecordSet у inventSum

[CasperSKY]

Листинг поиска и посчета остатков на складе по номеру склада(_inventLocationId) - складов 10, как суммировать остатки по всем 10 складам ?

 inventDim.InventLocationId  = _inventLocationId;

        inventSum = InventSum::findSum(_itemId,
                                       inventDim,
                                       inventDimParm,
                                       InventSumFields::All);

нужно что то типа ....

while select InventLocationId from inventDim {

inventDim.InventLocationId  = inventLocationId;

        inventSum = InventSum::findSum(_itemId,
                                       inventDim,
                                       inventDimParm,
                                       InventSumFields::All);

inventsum1=inventsum1+inventsum;
}

НО естественно так невыходит