...
OldTempPaymentBuffer."Document No." := "Document No.";
END;
END;
"Account Type" := "Account Type"::Vendor;
VALIDATE("Account No.",TempPaymentBuffer."Vendor No.");
"Bal. Account Type" := BalAccType;
VALIDATE("Bal. Account No.",BalAccNo);
VALIDATE("Currency Code",TempPaymentBuffer."Currency Code");
...
...
OldTempPaymentBuffer."Document No." := "Document No.";
END;
END;
"Account Type" := "Account Type"::Vendor;
SetHideValidation(TRUE);
VALIDATE("Account No.",TempPaymentBuffer."Vendor No.");
Vendor.GET(TempPaymentBuffer."Vendor No.");
IF (Vendor."Pay-to Vendor No." <> '') AND (Vendor."Pay-to Vendor No." <> "Account No.") THEN
MESSAGE(Text025,Vendor.TABLECAPTION,Vendor."No.",Vendor.FIELDCAPTION("Pay-to Vendor No."),
Vendor."Pay-to Vendor No.");
"Bal. Account Type" := BalAccType;
VALIDATE("Bal. Account No.",BalAccNo);
VALIDATE("Currency Code",TempPaymentBuffer."Currency Code");
...