5,124
Simple question I hope: I am trying to retrieve a value from Purch Inv. Header table. This value field is Code data type and has a table relation with Payment code table. Can you please advise how to retrieve this field (payment code)? After I perform the necessary filter, in the findset section , this field is blank. Please help.
*This post is locked for comments
Hi All, I don't know what I did but above code just started to work. It's really strange. I didn't do anything different. I was racking my brains as to what to do when it's a normal field albeit with table relation. Anyway, I am not getting the value for payment method code above. Thank you anyway.
The Payment Code is a normal field. but it has a table relation with Payment Code Table.
Here's my code:
VLE.RESET;
VLE.SETRANGE("External Document No.",TransferLine."Transport Vendor Invoice No.");
VLE.SETRANGE(Open,FALSE);
IF VLE.FINDSET THEN
GetStatus := 'Paid'
ELSE
BEGIN
GetStatus := 'Not Paid';
VLE.SETRANGE(Open,TRUE);
IF VLE.FINDSET THEN
BEGIN
VLE.CALCFIELDS(Amount);
GetAmount := FORMAT(ABS(VLE.Amount),0,'<Precision,2><Standard Format,1>');
//now, get the payment Terms Code
PurchInvHdr.RESET;
PurchInvHdr.SETCURRENTKEY("No.");
PurchInvHdr.SETRANGE("No.",VLE."Document No.");
IF PurchInvHdr.FINDSET THEN
BEGIN
MESSAGE('payment =%1 and no is %2',PurchInvHdr."Payment Method Code",PurchInvHdr."No.");
GetTerms := PurchInvHdr."Payment Method Code";
END;
MESSAGE('Amount=%1 for extdoc no %2 and vle amount=%3, extdecno=%4,Open=%5 and terms=%6',GetAmount,TransferLine."Transport Vendor Invoice No.",ABS(VLE.Amount),VLE."External Document No.",VLE.Open,GetTerms); //mbr test
END;
END;
Note: The problem is in the PurchInvHdr."Payment Method Code". It gives me blank. I feel like I have to do something before I get the actual value?
Please paste your code so we can review and also you check if your field is a normal or flowfield, if it is a flowfield you have to use CALCFIEDLS.
Stay up to date on forum activity by subscribing. You can also customize your in-app and email Notification settings across all subscriptions.
#1
André Arnaud de Cal...
291,280
Super User 2024 Season 2
#2
Martin Dráb
230,214
Most Valuable Professional
#3
nmaenpaa
101,156
Share
Report
All responses (
Answers (