Как извлечь источник и код подразделения из кассовой ведомости?

Здравствуйте.

Скрипт platv.S берет букву источника и код подразделения из списка ведомостей:

Если ведомость сформирована по нескольким источникам и подразделениям, то эти поля, само собой, остаются пустыми. Но внутри ведомости они заполнены. 

Как извлечь значения из первой строки самой ведомости?