Обновление статуса производственного заказа программно

[niksen]

prodId = '1';
    select firstonly prodTable
        where (ProdTable.ProdStatus != ProdStatus::Created);
        {
            prodId = prodTable.ProdId;
        }
    }
    while (prodId!='');

вот этот кусок
можно ли его как-нибудь заменить?