Small and medium business | Business Central, N...

How to show RecordLink on Service Order

(0) Share

Report

Posted on by Community Member

I'm trying to some how show the RecordLink of type=Link on a Service Order.

In the Factbox I just see the notes. Is there any possibilities to show the link without extending the service order page?

I have the same question (0)

All responses (7)

Answers (0)

Suggested answer

keoma 32,729 on at

Like (0)

Report

that needs a customization. the factbox is set to visible=false per default.

to change that you can use the al object designer extension in vs-code. there open the service order page. you find at the end the factboxes list, something like that:

...

area(FactBoxes)

{

....

{

}

part(Control1906530507;"Service Item Line FactBox")

{

}

systempart(Control1900383207;RecordLinks)

{

}

systempart(Control1905767507;Notes)

{

}

}

to change the visibility you need the name of the recordlinks factbox, which is here Control1900383207. depends maybe from the bc version.

then develope the page extension:

pageextension 50101 ServiceOrderExt extends "Service Order"

{

layout

{

modify(Control1900383207)

{

Visible = true;

}

}

}

publish the extension to your target bc and the recordlinks factbox is shown.

Was this reply helpful? Yes No
Community Member on at

Like (0)

Report

So you don't think it will be possible without extending the Service Order page?

Was this reply helpful? Yes No
Suggested answer

Marco Mels on at

Like (0)

Report

Hello,

You can perhaps raise this issue at http://aka.ms/bcideas.

Thanks.

Was this reply helpful? Yes No
Community Member on at

Like (0)

Report

Hi Marco

It redirects me to Microsofts official page (https://www.microsoft.com/da-dk/?ref=aka). Do you know where I can find the page you have mentioned?

Was this reply helpful? Yes No
Suggested answer

Marco Mels on at

Like (0)

Report

Hello,

That did happen to me twice now in this forum. In this forum, the last "." is part of the link.

http://aka.ms/bcideas

Apologies.

Thanks

Was this reply helpful? Yes No
LewisH95 65 on at

Like (0)

Report

Note Always test code fixes in a controlled environment before you apply the fixes to your production computers.

To resolve this problem, follow these steps:

Change the code in the PrepareShipmentHeader function in the Serv-Documents Mgt. codeunit (5988) as follow:

Existing code

...

ServShptHeader."No." := "Shipping No.";

IF "Document Type" = "Document Type"::Order THEN BEGIN

ServShptHeader."Order No. Series" := "No. Series";

ServShptHeader."Order No." := "No.";

END;

ServShptHeader."Source Code" := SrcCode;

ServShptHeader."User ID" := USERID;

ServShptHeader."No. Printed" := 0;

ServShptHeader.INSERT;

...

Replacement code

...

ServShptHeader."No." := "Shipping No.";

IF "Document Type" = "Document Type"::Order THEN BEGIN

ServShptHeader."Order No. Series" := "No. Series";

ServShptHeader."Order No." := "No.";

END;

// Add the following lines.

IF ServMgtSetup."Copy Comments Order to Shpt." THEN

ServShptHeader.COPYLINKS(ServHeader);

// End of the lines.

ServShptHeader."Source Code" := SrcCode;

ServShptHeader."User ID" := USERID;

ServShptHeader."No. Printed" := 0;

ServShptHeader.INSERT;

...

Change the code in the PrepareInvoiceHeader function in the Serv-Documents Mgt. codeunit (5988) as follow:

Existing code

...

IF "Posting No." <> '' THEN BEGIN

ServInvHeader."No." := "Posting No.";

Window.UPDATE(1,STRSUBSTNO(Text007,"Document Type","No.",ServInvHeader."No."));

END;

END;

ServInvHeader."Source Code" := SrcCode;

ServInvHeader."User ID" := USERID;

ServInvHeader."No. Printed" := 0;

ServInvHeader.INSERT;

...

Replacement code

...

IF "Posting No." <> '' THEN BEGIN

ServInvHeader."No." := "Posting No.";

Window.UPDATE(1,STRSUBSTNO(Text007,"Document Type","No.",ServInvHeader."No."));

END;

END;

// Add the following lines.

IF ServMgtSetup."Copy Comments Order to Invoice" THEN

ServInvHeader.COPYLINKS(ServHeader);

// End of the lines.

ServInvHeader."Source Code" := SrcCode;

ServInvHeader."User ID" := USERID;

ServInvHeader."No. Printed" := 0;

ServInvHeader.INSERT;

...

Was this reply helpful? Yes No
Suggested answer

keoma 32,729 on at

Like (0)

Report

there already exists an entry on ideas.

so follow experience.dynamics.com/.../

Was this reply helpful? Yes No