If that you want to do for all users follow below steps -
1. Design Codeunit 81.
2. Create a Text Constant Say Text5000 with Const Value as &Ship.
3. Under function Code, change the Function as shown below -
Standard CODE -
SalesSetup.GET;
WITH SalesHeader DO BEGIN
CASE "Document Type" OF
"Document Type"::Order:
BEGIN
Selection := STRMENU(Text000,3);
IF Selection = 0 THEN
EXIT;
Ship := Selection IN [1,3];
Invoice := Selection IN [2,3];
END;
New Code -
SalesSetup.GET;
WITH SalesHeader DO BEGIN
CASE "Document Type" OF
"Document Type"::Order:
BEGIN
//Selection := STRMENU(Text000,3);
Selection := STRMENU(Text5000,1);
IF Selection = 0 THEN
EXIT;
Ship := Selection IN [1,3];
Invoice := Selection IN [2,3];
END;
Comments
If that you want to do for all users follow below steps -
1. Design Codeunit 81.
2. Create a Text Constant Say Text5000 with Const Value as &Ship.
3. Under function Code, change the Function as shown below -
Standard CODE -
New Code -
Let me know if any issues.
Thanks & Regards,
Saurav Dhyani
Do you Know this About NAV?
Connect - Twitter | Facebook | Google + | YouTube
Follow - Blog | Facebook Page | Google + Page
Thank you very much for the help.
warm regards
kmk