Endereçar Produtos

Delphi

04/09/2007

Ola amigos, Desenvolvi um Sistema de estoque Semi-Acabado, Esse produtos são endereçados, ou seja colocados em prateleiras manualmente conforme espaço vazio.
São diversos produtos.
estou precisando colocar em prateleiras automaticamente, Cada prateleiras cabem no máximo 24 cx produtos iguais.
Por exemplo: Exitem 5 plateleiras para o mesmo produto.
a minha dúvida é: Conforme eu faço um entrada ele selecionda a prateleira automaticamente, essas prateleiras são numeradas conforme os produtos.
Se a prateleira numero 1(um) do produto 101(Cento e um), tiver menos que 24 cx, Print em um label ou edit, para sair no relatório, ou senão pule para a proxima prateleira do mesmo produto.
Alguem tem algum exemplo?

segue um exemplo:

Prateleira CODIGO
------------ -------------
119 311300
119 311300
119 311300
119 311300
119 311300
119 311300
119 311300
119 311300
119 311300
119 311300
119 311300
119 311300
119 311300
119 311300
119 311300
119 311300
119 311300
119 311300
119 311300

121 311300
121 311300
121 311300
121 311300
121 311300
121 311300
121 311300
121 311300
121 311300
121 311300
121 311300

123 311300
123 311300
123 311300
123 311300
123 311300
123 311300
123 311300
123 311300
123 311300
123 311300
123 311300
123 311300
123 311300
123 311300
123 311300
123 311300
123 311300
123 311300
123 311300

127 311300
127 311300
127 311300
127 311300


Obrigado.


Bertocco

Bertocco

Curtidas 0

Respostas

Gandalf.nho

Gandalf.nho

04/09/2007

Você deve ter uma tabela onde indica quais são as prateleiras designadas para cada produto. Inclua mais um campo para indicar quantos lugares estão ocupados. A cada inclusão basta checar qual a primeira prateleira que ainda possui espaço disponível, imprimir o recibo e atualizar o valor no campo.


GOSTEI 0
POSTAR