21. September 2009 11:15
CLEAR(ItemVend);
CLEAR(ItemUnit);
CLEAR(ItemVendor);
CLEAR(ItemUnit2);
IF "Vendor No." <> '' THEN
IF ItemVend.GET("Vendor No.","No.",'') THEN;
IF "Base Unit of Measure" <> '' THEN
IF ItemUnit.GET("Base Unit of Measure") THEN;
IF "No." <> '' THEN
IF ItemVendor.GET("No.") THEN;
IF "No." <> '' THEN
IF ItemUnit2.GET("No.","Base Unit of Measure") THEN;
21. September 2009 11:23
IF "Vendor No." <> '' THEN
ItemVend.GET("Vendor No.","No.",'');
IF "Base Unit of Measure" <> '' THEN
ItemUnit.GET("Base Unit of Measure");
IF "No." <> '' THEN
ItemVendor.GET("No.");
IF "No." <> '' THEN
ItemUnit2.GET("No.","Base Unit of Measure");
21. September 2009 11:29
21. September 2009 12:07
21. September 2009 12:30
CLEAR(ItemVend);
CLEAR(ItemUnit);
CLEAR(ItemVendor);
CLEAR(ItemUnit2);
IF "Vendor No." <> '' THEN
IF ItemVend.GET("Vendor No.","No.",'') THEN; => für Vendor No. und Vendor Item No.
IF "Base Unit of Measure" <> '' THEN
IF ItemUnit.GET("Base Unit of Measure") THEN; => für die Beschreibung der Einheit
IF "No." <> '' THEN
IF ItemVendor.GET("No.") THEN; => für den Namen des Lieferanten
IF "No." <> '' THEN
IF ItemUnit2.GET("No.","Base Unit of Measure") THEN; => für Menge pro Einheit
21. September 2009 12:49
21. September 2009 13:03
21. September 2009 13:06
21. September 2009 13:11
21. September 2009 13:14
MisterElektro1981 hat geschrieben:Sorry mein Beitrag war etwas unvollständig. Ich beschreibe es mal vollständig.
IF "No." <> '' THEN
IF ItemVendor.GET("No.") THEN; => für den Namen des Lieferanten
21. September 2009 13:15
misterelektro1981 hat geschrieben:Ich sage ja, ich habe die Variable blöd benannt. Jetzt habe ich sie umgeschrieben als Vendor. das ändert aber doch nichts an der Funktion. Jetzt heißt es Vendor.GET.
21. September 2009 13:36
//Vorab die Variablen löschen
CLEAR(ItemVend);
CLEAR(ItemUnit);
CLEAR(Vendor);
CLEAR(ItemUnit2);
//hiermit möchte ich die Kreditorennr. sowie die Kred.-Artikelnr. holen
IF "Vendor No." <> '' THEN
IF ItemVend.GET("Vendor No.","No.",'') THEN;
//hiermit möchte ich die Beschreibung der Einheit holen
IF "Base Unit of Measure" <> '' THEN
IF ItemUnit.GET("Base Unit of Measure") THEN;
//hiermit möchte ich den Namen des Lieferanten holen
IF "No." <> '' THEN
IF Vendor.GET("No.") THEN;
//hiermit möchte ich die Menge pro Einheit holen
IF "No." <> '' THEN
IF ItemUnit2.GET("No.","Base Unit of Measure") THEN;
Name DataType Subtype Length
ItemVend Record Item Vendor
ItemUnit Record Unit of Measure
Vendor Record Vendor
ItemUnit2 Record Item Unit of Measure
GM Codeunit GeneralMgt
Enabled SourceExpr StartPos Width Format
Yes GM.Ascii2Ansi(ItemVend."Vendor No.") 0 0
Yes GM.Ascii2Ansi(ItemVend."Vendor Item No.") 0 0
Yes GM.Ascii2Ansi(Vendor.Name) 0 0
Yes GM.Ascii2Ansi(ItemUnit.Description) 0 0
Yes ItemUnit2."Qty. per Unit of Measure" 0 0
21. September 2009 14:02
ItemVend -> Item Vendor
UoM -> Unit of Measure
Vendor -> Vendor
ItemUoM -> Item Unit of Measure
misterelektro1981 hat geschrieben:
- Code:
//hiermit möchte ich die Kreditorennr. sowie die Kred.-Artikelnr. holen -> OK
//hiermit möchte ich die Beschreibung der Einheit holen -> OK
//hiermit möchte ich den Namen des Lieferanten holen -> NICHT OK
// "No." ist die Artikelnr. Die Kreditorennr. steht in Vendor No., so wie du es schon in der 1. Zeile richtig gemacht.
// Richtig:
IF "Vendor No." <> '' THEN
IF Vendor.GET("Vendor No.") THEN;
//hiermit möchte ich die Menge pro Einheit holen -> FRAGWÜRDIG
IF "No." <> '' THEN
IF ItemUnit2.GET("No.","Base Unit of Measure") THEN;
// Du holst dir hier den Basiseinheitencode - dessen Menge pro Einheit ist per definitionem immer 1, von daher könntest du diesen Aufruf sparen - oder geht es dir um einen anderen Einheitencode? Es gibt z.B. noch den Verkaufs- und Einkaufseinheitencode auf der Artikelkarte (wenn es die Artikelkarte ist).?
21. September 2009 14:18
21. September 2009 14:25
misterelektro1981 hat geschrieben:Jetzt das kuriose:
beim ersten Artikel gehen jetzt alles gewünschten Infos raus. Bei allen anderen, bei denen die Felder wir Kreditornr.,Kred.-Artikelnr. und Name (des Kreditors) auch gefüllt sind gehen keine Infos raus.
Yes GM.Ascii2Ansi(ItemVend."Vendor No.") 0 0
Yes GM.Ascii2Ansi("Vendor No.") 0 0
Ich kann mir vorstellen, da der erste Artikel ein Katalogartikel ist
21. September 2009 14:37
IF "Vendor No." <> '' THEN BEGIN
ItemVend.GET("Vendor No.","No.");
ItemVendor.GET("Vendor No.");
END;
IF "Base Unit of Measure" <> '' THEN BEGIN
ItemUnit.GET("Base Unit of Measure");
ItemUnit2.GET("No.","Base Unit of Measure");
END;
Enabled SourceExpr StartPos Width
Yes ItemVend."Vendor No." 0 0
Yes ItemVend."Vendor Item No." 0 0
Yes ItemVendor.Name 0 0
Yes ItemUnit.Description 0 0
Yes ItemUnit2."Qty. per Unit of Measure" 0 0
Name DataType Subtype Length
ItemVend Record Item Vendor
ItemVendor Record Vendor
ItemUnit Record Unit of Measure
ItemUnit2 Record Item Unit of Measure
21. September 2009 14:47
IF "Vendor No." <> '' THEN BEGIN
ItemVend.GET("Vendor No.","No.");
Vendor.GET("Vendor No.");
END;
21. September 2009 14:57
21. September 2009 15:00
21. September 2009 16:31
misterelektro1981 hat geschrieben:Ich habe es mal geändert, jedoch das gleiche wie vorher. Nur beim ersten Artikel werden diese Infos rausgegeben. Bei den weotern Artikeln gehen diese Infos einfach nicht heraus.
21. September 2009 22:11
misterelektro1981 hat geschrieben:Die obere Grafik ist der erste Artikel. Hier wird die Kreditornr., Kred.-Artikelnr. sowie Name des Kreditos ausgegeben.
In der unteren Grafik sind alle Felder gefüllt, jedoch kommen hier keine Infos raus.
22. September 2009 07:13
22. September 2009 08:43
misterelektro1981 hat geschrieben:Ber Kreditorennr. 60312 ist die Kred.-Artikelnr. 4000370780 zugeordnet.
22. September 2009 08:51
22. September 2009 08:57
Natalie hat geschrieben:Ist denn beim Artikel Nr. 60312 im Feld "Vendor No." (Kreditorennr.) momentan 4000370780 eingetragen
IF "Vendor No." <> '' THEN ...