Copying F3 functionality.

thijs_geeris

Hello,

On the Invoicecard I want to create a shortcut (under a Menu-button) which creates a new Invoice.
This because the customer wants to create a new invoice even when the cursor is in the subform. (F3 is no option because it creates a new line).

I know how to do it (see code below). But the problem is that the customer doesn't use Default Nos. but only Manual Nos.
The code below only works with default numbering.

Does anybody know how I can rewrite following code so that this functionality also works with manual nos?

INIT;
"Document Type" := "Document Type"::Invoice;
"No." := '';
INSERT(TRUE);

Thanks.

NC_AT

Hi,

try this:

w... globale variable Type Dialog
newnumber ... globale variable Code 10

>>>>>
CLEAR(NewNumber);
w.OPEN('Please insert the new Invoice No.\'+
'#####################1',NewNumber);
w.INPUT(1);
w.CLOSE;

INIT;
"Document Type" := "Document Type"::Invoice;
"No." := NewNumber;
INSERT(TRUE);


You need an individual invoice number, the user has to enter it in a pop-up (dialog) window...


regards,

Jürgen
[/b]