А что вы хотите увидеть и что видите, приведите пример.
Приведенный код может вывести только все существующие RContractCode без повторений.
Чтобы "схлапнуть " другие поля, нужно это и дописать, например:
X++:
while select count(RecId) from tmpPaymentRequest
group by RContractCode
{
info(strFmt("%1-%2", tmpPaymentRequest.RContractCode, tmpPaymentRequest.RecId));
}