23. Oktober 2015 18:10
IF Item.GET("Warehouse Activity Line"."Item No.") THEN BEGIN
ItemUnitMeasure.RESET;
ItemUnitMeasure.SETRANGE("Item No.",Item."No.");
ItemUnitMeasure.SETFILTER(Code,'<> %1',"Warehouse Activity Line"."Unit of Measure Code");
IF ItemUnitMeasure.FINDSET THEN BEGIN
REPEAT
IF DescriptionVPEText <> '' THEN
DescriptionVPEText += '\n'; // Macht einen Zeilenumbruch innerhalb einer Textbox
DescriptionVPEText += ItemUnitMeasure.Code + ' ' + FORMAT(ItemUnitMeasure."Qty. per Unit of Measure");
UNTIL ItemUnitMeasure.NEXT = 0;
END;
END;
23. Oktober 2015 21:19
26. Oktober 2015 09:28
26. Oktober 2015 09:48
IF Item.GET("Item No.") THEN BEGIN
ItemUnitMeasure.RESET;
ItemUnitMeasure.SETRANGE("Item No.",Item."No.");
ItemUnitMeasure.SETFILTER(Code,'<>%1',"Unit of Measure Code");
IF ItemUnitMeasure.FINDSET THEN BEGIN
REPEAT
IF DescriptionVPEText <> '' THEN
DescriptionVPEText += '\n'; // Macht einen Zeilenumbruch innerhalb einer Textbox
DescriptionVPEText += ItemUnitMeasure.Code + ' ' + FORMAT(ItemUnitMeasure."Qty. per Unit of Measure");
UNTIL ItemUnitMeasure.NEXT = 0;
END;
END;
26. Oktober 2015 09:57