Cacher is the code snippet organizer for pro developers

FOR CrossDockBin := TRUE DOWNTO FALSE DO
  FOR DefaultBin := TRUE DOWNTO FALSE DO
    IF TotalQtytoPickBase > 0 THEN
      FindBWPickBin(
        LocationCode,ItemNo,VariantCode,
        ToBinCode,UnitofMeasureCode,QtyPerUnitofMeasure,DefaultBin,CrossDockBin,
        TotalQtyToPick,TotalQtytoPickBase,TempWhseItemTrackingLine);