Цикл

[Fly]

Ок, может быть строки с "Unit of Measure Code" ='ЧАС' у тебя есть, а что насчет "Invoice Key"? Поставь брейкпойнт на строку clt+=...
и посмотри, вылетит дебаггер или нет.

UPD: Есть два предложения по поводу кода.
1. Не использовать FIND('-'), заменить на FINDSET.
2. Не "зашивать" в коде 'ЧАС', вынести в настройки и через get получать перед циклом.