[miklenew]

Я не заметил строк

        LP.setUsername('Usr');
        LP.setPassword('Pwd');

И не помню точно.
Но попробовать можно.
Возможно ругаеться на запрос.
Место

            strfmt("Select excontrolqty,primor,collectrefprodid from ShiftReportPourHeader " +
                   "Where DataAreaId = '%1' and collectrefprodid = '%2'",
                    curext(),ProdTable.collectrefprodid));

попробуйте

            strfmt("Select ShiftReportPourHeader.excontrolqty, ShiftReportPourHeader.primor, ShiftReportPourHeader.collectrefprodid from ShiftReportPourHeader " +
                   "Where ShiftReportPourHeader.DataAreaId = '%1' and ShiftReportPourHeader.collectrefprodid = '%2'",
                    curext(),ProdTable.collectrefprodid));

Точно не помню. Но помойму так должен выглядить select.
И ещё dns точно создан.
Из описанного выше у вас код выполняется на клиенте.
Но если вы что-то упустили или не дописали и он выполняется на сервере, то dns нужно создавать на сервере.
Да и с дебагером лучше всё же разберитесь. Лучше на код положить, чем на дебагер.