Konteyner Yükleme Optimizasyonu

[tamer42]

Merhaba,
Konteyner içine paketleri en ve boy olarak (2 boyutlu) en uygun pozisyonda yerleştirmek amacıyla hazırlanmış Ekli dosyayı arşivimde buldum, üzerinde çalışıyorum,

yalnız istediğim sonucu alamıyorum.

Paketleri yerleştir deyince ekli görselde olduğu konteyner dışına dağınık dağıtıyor.
istediğim konteyner içine paketleri düzgün bir şekilde yerleştirsin;

işin içinden bir türlü çıkamadım, yardımcı olursanız sevinirim,

ilgi ve alakanız için şimdiden teşekkürler,

iyi Çalışmalar.

 

[beab05]

Merhaba;

Eki incelemedim ama düşündüğüm gibiyse bu çok ama çok karışık bir algoritmadır. Aşağıdaki adreste birden fazla ürün çeşidi ve konteyner tipine göre yükleme planı oluşturan bir simulator vardır. Simülatörün sonunda "Paketlemeyi adım adım göster" seçeneğiyle adım adım görürsünüz. Fikir vermesi ve belki yararlanılacak olanlar için linki;

Spoyler: Link

Konteyner-Kamyon 3D Yükleme Simülatörü. Etkili Kargo Yükleme.

Konteyner ve Kamyon yükleme, Palet Yükleme, 3D Araç Yükleme,3D Kamyon Yükleme, TIRPORT, GRN Lojistik, AB Plus Bilişim, Lojistik Simülasyonu, Yükleme Simülasyonu, Yükleme Robotu, BigBag, Çuval, Çuval Yükleme.

packer.searates.com

 

[tamer42]

Merhaba;

Eki incelemedim ama düşündüğüm gibiyse bu çok ama çok karışık bir algoritmadır. Aşağıdaki adreste birden fazla ve konteyner tipine göre yükleme planı oluşturan bir simulator vardır. Simülatörün sonunda "Paketlemeyi adım adım göster" seçeneğiyle adım adım görürsünüz. Fikir vermesi ve belki yararlanılacak olanlar için linki;

Spoyler: Link

https://www.searates.com/load-calculator/

Hocam teşekkürler,

algoritma ilk bakışta aslında çok karışık bir algoritma olarak görünmüyor,
bu linke baktım ama çok yavaş çalışıyor, işlemi başlatalı 10 dak. oldu hala dönüyor.

Const oran  As Integer = 30  '
Dim toplamgenislik As Integer
Dim kontrol As Control
Dim paletle As Boolean

Private Sub CommandButton2_Click()

If ComboBox1 = Empty Then
    MsgBox "Önce konteyner tipi seçmelisiniz!", vbExclamation, "Hata!": Exit Sub
End If

If paletle = False Then
    MsgBox "Önce paletleri oluşturmalısınız!", vbExclamation, "Hata!": Exit Sub
End If

Dim dolu_uzunluk As Integer, dolu_genislik As Integer
Dim dolu_yukseklik As Integer
Dim kalan_uzunluk As Integer, kalan_genislik As Integer

dolu_uzunluk = 0
dolu_genislik = 0
dolu_yukseklik = 0
kalan_uzunluk = 0
kalan_genislik = 0
en_genis = 0
en_uzun = 0

For Each kontrol In Me.Controls
say = say + 1

If say >= Me.Controls.Count Then Exit For

    If VBA.Left(kontrol.Name, 5) = "Palet" Then
   
        If kontrol.Width > kalan_genislik Then dolu_uzunluk = en_uzun
        If kontrol.Height > kalan_uzunluk Then dolu_genislik = en_genis
       
        kontrol.Top = lblGenislik.Top + dolu_uzunluk
        kontrol.Left = lblGenislik.Left + dolu_genislik
        dolu_uzunluk = dolu_uzunluk + kontrol.Height
        dolu_genislik = dolu_genislik + kontrol.Width
        kalan_uzunluk = CDbl(lblGenislik.Height) - CDbl(dolu_uzunluk)
        kalan_genislik = CDbl(lblGenislik.Width) - CDbl(dolu_genislik)
       
        If en_genis < kontrol.Width Then en_genis = kontrol.Width
        If en_uzun < kontrol.Height Then en_uzun = kontrol.Height
       
    End If
   
Next kontrol

MsgBox "Yükleme yapıldı!", vbInformation

End Sub

 

[beab05]

Ben linki değiştirmiştim, siz ilk haline tıkladınız sanırım. Tekrar deneyin simulator için.

Algoritma konusu ise;

Konteyner ölçülerine göre, yüklenecek ürün ya da ürünlerin en boy yükseklik ölçülerine göre konteynera en optimum şekilde yükleme yerleşimi yapacağını düşünerek söylemiştim. Yani örneğin tabana 6 yan kutu 2 dik kutu ve 7 yükseklikten sonra en üste de 2 kutu koyarak yüklenmesi gerektiğini çıkaracak diye düşünmüştüm Bir de farklı ölçülerde kutular varsa örneğin 700 kutu başka 800 kutu başka ölçüde gibi.. Böyle bir algoritmayı düşünsenize...

Linkteki simulator de zaten bu dediklerimi yapıyor. İnceleyin, bence super bir uygulama...

 

[tamer42]

Ben linki değiştirmiştim, siz ilk haline tıkladınız sanırım. Tekrar deneyin simulator için.

Algoritma konusu ise;

Konteyner ölçülerine göre, yüklenecek ürün ya da ürünlerin en boy yükseklik ölçülerine göre konteynera en optimum şekilde yükleme yerleşimi yapacağını düşünerek söylemiştim. Yani örneğin tabana 6 yan kutu 2 dik kutu ve 7 yükseklikten sonra en üste de 2 kutu koyarak yüklenmesi gerektiğini çıkaracak diye düşünmüştüm Bir de farklı ölçülerde kutular varsa örneğin 700 kutu başka 800 kutu başka ölçüde gibi.. Böyle bir algoritmayı düşünsenize...

Linkteki simulator de zaten bu dediklerimi yapıyor. İnceleyin, bence super bir uygulama...

Hocam doğrudur, eski linki tıklamışım, sonra yeni linki tıklatım; simulatör gayet güzel, şimdilik işimizi görür; yalnız ileride burayı kapatırlarsa dışarı bağlı kalmayalım diye,

buradaki simülatör bir şekilde excel ortamına aktarılamaz mı?
iyi akşamlar.

 

[beab05]

Hocam doğrudur, eski linki tıklamışım, sonra yeni linki tıklatım; simulatör gayet güzel, şimdilik işimizi görür; yalnız ileride burayı kapatırlarsa dışarı bağlı kalmayalım diye,

buradaki simülatör bir şekilde excel ortamına aktarılamaz mı?
iyi akşamlar.

Apisi var ve bu api kullanılarak Excel ile istediğiniz gibi kullanabilirsiniz. Api kullanım linki de aşağıda..

Ama sanırım ücretli, incelemedim detaylı. Tabii apiyi de ayrıca çözmeniz ve excel ile kullanmanız oldukça sancılı olacaktır.

Simulator tarafında excel üstünde ilgili ölçüler gönderiliyor sanırım yani exceli o linkte export ediyorsunuz. İlk verdiğim linkte adımları inceleyiniz.

Spoyler: Api

Load calculator API

Load calculator API

www.searates.com

 

[tamer42]

Apisi var ve bu api kullanılarak Excel ile istediğiniz gibi kullanabilirsiniz. Api kullanım linki de aşağıda..

Ama sanırım ücretli, incelemedim detaylı. Tabii apiyi de ayrıca çözmeniz ve excel ile kullanmanız oldukça sancılı olacaktır.

Simulator tarafında excel üstünde ilgili ölçüler gönderiliyor sanırım yani exceli o linkte export ediyorsunuz. İlk verdiğim linkte adımları inceleyiniz.

Spoyler: Api

Load calculator API

Load calculator API

www.searates.com

Bilgilendirme için çok teşekkürler Hocam

 

[besen]

Merhaba,
Konteyner içine paketleri en ve boy olarak (2 boyutlu) en uygun pozisyonda yerleştirmek amacıyla hazırlanmış Ekli dosyayı arşivimde buldum, üzerinde çalışıyorum,

yalnız istediğim sonucu alamıyorum.

Paketleri yerleştir deyince ekli görselde olduğu konteyner dışına dağınık dağıtıyor.
istediğim konteyner içine paketleri düzgün bir şekilde yerleştirsin;

işin içinden bir türlü çıkamadım, yardımcı olursanız sevinirim,

ilgi ve alakanız için şimdiden teşekkürler,

iyi Çalışmalar.

Merhaba ÇİZİM sayfasında, K4+ ve T2 - T13'deki verilerin anlamı nedir?