Automated Testing - Post routine via a page

mcoscas
Member Posts: 34
Hi everybody,
I try to create automated unit tests (in BC wave 2 version 15) but I have a problem with one test.
I tried to post general journal lines via a page action but I get the following error: "Unhandled UI: Confirm Do you want to post the journal lines?"
And this is my code:
[Test]
[HandlerFunctions('PurchaseCoverageReverseHandler')]
procedure TestOpenPurchaseCoverageReversePage()
var
myInt: Integer;
begin
// [Scenario] the user opens the Purchase Coverage Reverse page ofr select the invoices to reverse
// [Given] the Coverage Purchase Invoice page
// [When] the user invokes Coverage Invoices action
CoveragePurchInvoice."Coverage Invoices".Invoke();
// [Then] the Purchase Coverage Reverse page is handled
end;
[ModalPageHandler]
[HandlerFunctions('PostConfirmHandler,PostMessageHandler')]
procedure PurchaseCoverageReverseHandler(var PurchaseCoverageReverse: TestPage "Purchase Coverage Reverse")
var
PurchCoverageRevLineTax: Record "Purch Coverage Rev Line - Tax";
begin
PurchCoverageRevLineTax.Get(CoverageInvoiceNo, CoverageInvoiceDate);
PurchaseCoverageReverse.GoToRecord(PurchCoverageRevLineTax);
PurchaseCoverageReverse."Reverse Invoice".Invoke();
end;
[ConfirmHandler]
procedure PostConfirmHandler(Question: Text[1024]; var Reply: Boolean)
var
ConfirmPostInvoiceQst: Label 'Do you want to post the invoice?';
ConfirmPostJnlLinesQst: Label 'Do you want to post the journal lines?';
begin
Reply := false;
if (Question = ConfirmPostInvoiceQst) or (Question = ConfirmPostJnlLinesQst) then
Reply := true
end;
The line PurchaseCoverageReverse."Reverse Invoice".Invoke() is suppose to run the codeunit "Gen. Jnl.-Post" (Id 231).
I suppose that a function that is defined by the tag [ModalPageHandler] cannot be tagged also as a [HandlerFunctions] ...
Thanks in advance for your help.
Michael.
I try to create automated unit tests (in BC wave 2 version 15) but I have a problem with one test.
I tried to post general journal lines via a page action but I get the following error: "Unhandled UI: Confirm Do you want to post the journal lines?"
And this is my code:
[Test]
[HandlerFunctions('PurchaseCoverageReverseHandler')]
procedure TestOpenPurchaseCoverageReversePage()
var
myInt: Integer;
begin
// [Scenario] the user opens the Purchase Coverage Reverse page ofr select the invoices to reverse
// [Given] the Coverage Purchase Invoice page
// [When] the user invokes Coverage Invoices action
CoveragePurchInvoice."Coverage Invoices".Invoke();
// [Then] the Purchase Coverage Reverse page is handled
end;
[ModalPageHandler]
[HandlerFunctions('PostConfirmHandler,PostMessageHandler')]
procedure PurchaseCoverageReverseHandler(var PurchaseCoverageReverse: TestPage "Purchase Coverage Reverse")
var
PurchCoverageRevLineTax: Record "Purch Coverage Rev Line - Tax";
begin
PurchCoverageRevLineTax.Get(CoverageInvoiceNo, CoverageInvoiceDate);
PurchaseCoverageReverse.GoToRecord(PurchCoverageRevLineTax);
PurchaseCoverageReverse."Reverse Invoice".Invoke();
end;
[ConfirmHandler]
procedure PostConfirmHandler(Question: Text[1024]; var Reply: Boolean)
var
ConfirmPostInvoiceQst: Label 'Do you want to post the invoice?';
ConfirmPostJnlLinesQst: Label 'Do you want to post the journal lines?';
begin
Reply := false;
if (Question = ConfirmPostInvoiceQst) or (Question = ConfirmPostJnlLinesQst) then
Reply := true
end;
The line PurchaseCoverageReverse."Reverse Invoice".Invoke() is suppose to run the codeunit "Gen. Jnl.-Post" (Id 231).
I suppose that a function that is defined by the tag [ModalPageHandler] cannot be tagged also as a [HandlerFunctions] ...
Thanks in advance for your help.
Michael.
0
Categories
- All Categories
- 73 General
- 73 Announcements
- 66.6K Microsoft Dynamics NAV
- 18.7K NAV Three Tier
- 38.4K NAV/Navision Classic Client
- 3.6K Navision Attain
- 2.4K Navision Financials
- 116 Navision DOS
- 851 Navision e-Commerce
- 1K NAV Tips & Tricks
- 772 NAV Dutch speaking only
- 617 NAV Courses, Exams & Certification
- 2K Microsoft Dynamics-Other
- 1.5K Dynamics AX
- 320 Dynamics CRM
- 111 Dynamics GP
- 10 Dynamics SL
- 1.5K Other
- 990 SQL General
- 383 SQL Performance
- 34 SQL Tips & Tricks
- 35 Design Patterns (General & Best Practices)
- 1 Architectural Patterns
- 10 Design Patterns
- 5 Implementation Patterns
- 53 3rd Party Products, Services & Events
- 1.6K General
- 1.1K General Chat
- 1.6K Website
- 83 Testing
- 1.2K Download section
- 23 How Tos section
- 252 Feedback
- 12 NAV TechDays 2013 Sessions
- 13 NAV TechDays 2012 Sessions