Var in Codeunit

guenther

Hello,

sorry that I cannot speak english that good, so I will explain my problem in German. Maybe here's someone who speaks German.

Ich möchte in einem VK-Report die Daten aus "Item Ledger Entry" auslesen. Dabei filtere ich auf einen bestimmten Datumsbereich, den der User wählen kann.
Nun möchte ich zu jeder der aufgeführten Positionen den tatsächlichen Verkaufspreis haben (soweit ist es klar) und den zum Zeitpunkt der Fakturierung gültigen VK-Preis haben. Es existiert auch eine Codeunit, die diesen Preis bereits berechnet, sie sieht wie folgt aus (hier die Funktion):

____________________________________________________________
tmporder(VAR fromitem2 : TEMPORARY Record Item)
IF findprice = FALSE THEN
EXIT;

IF fromitem2.Blocked THEN
EXIT;

tmpsalesheader."Shipment Date" := WORKDATE;
tmpsalesheader.Status := tmpsalesheader.Status::Open;
tmpsalesheader."Document Date" := WORKDATE;
tmpsalesheader."Posting Date" := WORKDATE;
tmpsalesheader."Order Date" := WORKDATE;
tmpsalesline.SetSalesHeader(tmpsalesheader);
tmpsalesline."Line No." := tmpsalesline."Line No." + 10000;
tmpsalesline."Document Type" := tmpsalesheader."Document Type";
tmpsalesline."Document No." := tmpsalesheader."No.";
///tmpsalesline.VALIDATE(Type,tmpsalesline.Type::Item);
///tmpsalesline.VALIDATE("No.",fromitem2."No.");
//tmpsalesline.VALIDATE("Location Code",fromitem2."Location Filter");
///tmpsalesline.VALIDATE(Quantity,1);
// - WT1.00:07 ---
tmpsalesline."Responsibility Center" := tmpsalesheader."Responsibility Center";
// + WT1.00:07 +++

tmpsalesline."Location Code" := fromitem2."Location Filter"; //*
tmpsalesline."No." := fromitem2."No.";
tmpsalesline.Type := tmpsalesline.Type::Item; //*
tmpsalesline."Unit of Measure Code" := fromitem2."Base Unit of Measure";
tmpsalesline.Quantity := 1;

PriceCalcMgt.FindSalesLinePrice(tmpsalesheader,tmpsalesline,3);

fromitem2."Unit Price" := tmpsalesline."Unit Price";
fromitem2."Unit Cost" := tmpsalesline."Unit Cost";
fromitem2.tmpcbprice := tmpsalesline."CB-Price";

_________________________________________________________

Im Report möchte ich folgende Variable füllen "Unitprice". In den Item Ledger Entries habe ich ja theoretisch alle wichtigen Daten, ich weiss nur leider nicht, wie ich die Daten durch die Codeunit bearbeiten lassen kann.

Vielleicht kann mir da einer kurz unter die Arme greifen, wenn er eine Idee hat.

Vielen Dank,
Guenther

Timo_Lässer

I suggest that you post your question in a german speaking Navision Forum:
http://www.mbsonline.org/forum/forum.asp?FORUM_ID=13
or
http://mbs-support.info

I know that your Navision Installation is heavy modified for your business, because I know the comment lines "// - WT1.00:07 ---" and "// + WT1.00:07 +++" :whistle: