Share
Report
2HI
I Try Get /Buy-from Contact/ :
Source Screen : Purchase Quotes
Destination Screen : Requests to Approve
The subscriber field on the two screens is /Document No./I am currently trying to use Unit code to solve this problem, Does this solution work?Is this code correct the next?=========================================================================================
codeunit 51241 DataPassing
{
var
BuyFromContact: Text[100];
{
var
BuyFromContact: Text[100];
procedure PassBuyFromContact()
var
SourceRec: Record /Purchase Header/;
TargetRec: Record /Approval Entry/;
var
SourceRec: Record /Purchase Header/;
TargetRec: Record /Approval Entry/;
begin
CLEAR(SourceRec);
CLEAR(TargetRec);
CLEAR(SourceRec);
CLEAR(TargetRec);
SourceRec.SETRANGE(/No./, '1502');
//SourceRec.SETFILTER(/No./, Rec./No./);
if SourceRec.FINDFIRST THEN begin
BuyFromContact := SourceRec./Buy-from Contact/;
//SourceRec.SETFILTER(/No./, Rec./No./);
if SourceRec.FINDFIRST THEN begin
BuyFromContact := SourceRec./Buy-from Contact/;
TargetRec.INIT;
TargetRec.Contact := BuyFromContact;
TargetRec.INSERT;
end
else begin
TargetRec.Contact := BuyFromContact;
TargetRec.INSERT;
end
else begin
end;
end;
}
=========================================================================================
end;
}
=========================================================================================
What do I write here for the codeunit to work ????????????????????
pageextension 51244 PageExtension50099 extends /Requests to Approve/
{
{
layout
{
addbefore(/Details/)
{
field(/Buy-from Contact Copy/; Contact)
{
ApplicationArea = All;
Editable = false;
}
}
}
{
addbefore(/Details/)
{
field(/Buy-from Contact Copy/; Contact)
{
ApplicationArea = All;
Editable = false;
}
}
}
}
I ask for help from those with experience (Note: The post does not write a double quote, unfortunately, and puts (/) in its place.)
Categories:
All responses (
Answers (
