Journal number with dataarea id

static void Job29(Args _args)
{
    VendTrans VendTrans;
    VendSettlement VendSettlement;
    ledgerJournalTrans ledgerJournalTrans;


     while select  VendTrans
        join VendSettlement
         join ledgerJournalTrans
        where
            vendtrans.voucher == ledgerJournalTrans.Voucher
            && VendSettlement.TransCompany == VendTrans.dataAreaId
            && VendSettlement.TransRecId == VendTrans.RecId
            && VendSettlement.AccountNum == VendTrans.AccountNum
    {
        info(ledgerJournalTrans.JournalNum);
        info(VendTrans.dataAreaId);
    }
}