mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-10-07 23:56:56 +01:00
Address Marketplace review feedback
This commit is contained in:
parent
2ec109e534
commit
e451e92f5d
9 changed files with 15 additions and 11 deletions
|
|
@ -5,13 +5,17 @@ codeunit 50100 "Rental Service"
|
|||
var
|
||||
RentalAgreement: Record "Rental Agreement";
|
||||
begin
|
||||
if not Confirm('Close rental agreement %1?', false, AgreementNo) then
|
||||
if not Confirm(CloseAgreementQst, false, AgreementNo) then
|
||||
exit(false);
|
||||
|
||||
RentalAgreement.Get(AgreementNo);
|
||||
RentalAgreement.Closed := true;
|
||||
RentalAgreement.Modify(true);
|
||||
Message('Rental agreement %1 was closed.', AgreementNo);
|
||||
Message(AgreementClosedMsg, AgreementNo);
|
||||
exit(true);
|
||||
end;
|
||||
|
||||
var
|
||||
CloseAgreementQst: Label 'Close rental agreement %1?';
|
||||
AgreementClosedMsg: Label 'Rental agreement %1 was closed.';
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue