Hi All,
I am copying enquiry data into quote document through lookup funtion as per coding below:-
EnquiryRec.RESET;
EnquiryRec.SETFILTER(EnquiryRec.“Customer No”,“Sell-to Customer No.”);
IF EnquiryRec.FIND(’-’) THEN
BEGIN
IF FORM.RUNMODAL(50104,EnquiryRec)=ACTION::LookupOK THEN
BEGIN
“Enquiry No.”:=EnquiryRec.“Enquiry No.”;
“Customer Enquiry No.”:=EnquiryRec.“Customer Enquiry No.”;
“Enquiry Date”:=EnquiryRec.“Enquiry Date”;
Enqlinerec.RESET;
Enqlinerec.SETFILTER(Enqlinerec.“Enquiry No.”,“Enquiry No.”);
IF Enqlinerec.FIND(’-’) THEN
REPEAT
saleslinerec.INIT;
saleslinerec.“Document Type”:=“Document Type”;
saleslinerec.“Document No.”:=“No.”;
saleslinerec.“Line No.”:=Enqlinerec.“Line No.”;
saleslinerec.Type:=saleslinerec.Type::Item;
saleslinerec.“No.”:=Enqlinerec.“Item No.”;
saleslinerec.VALIDATE(saleslinerec.“No.”);
saleslinerec.Description:=Enqlinerec.Description;
saleslinerec.“Customer Part”:=Enqlinerec.“Cutomer part No.”;
saleslinerec.Size:=Enqlinerec.Size;
saleslinerec.Material:=Enqlinerec.Material;
saleslinerec.Quantity:=Enqlinerec.Quantity;
saleslinerec.“Minimum Order Qty.”:=Enqlinerec.“Minimum Quantity”;
saleslinerec.“Unit Price”:=Enqlinerec.“Sale Price/Unit In INR”;
saleslinerec.VALIDATE(“Unit Price”);
saleslinerec.“Enquiry No.”:=EnquiryRec.“Enquiry No.”;
saleslinerec.“Enquiry Date”:=EnquiryRec.“Enquiry Date”;
saleslinerec.INSERT;
UNTIL Enqlinerec.NEXT=0;
END;
END;
but unit price in quote document showing 4 digit after decimal point instead of 2 digit, for e.g. “Sale Price/Unit In INR” is 10761.98 in enquiry card but after copying data into quote document it is showing 10,761.9820.
In the property DecimalPlaces for both field is 2:2.
Pls tell me where i am doing wrong and suggest some code to show same values in quote document.
Thans