Histórico da Página

LOCALIZAÇÃO : Function DlgxProEnd() responsável pela pesquisa de endereços que possuam o produto e que esteja vencendo primeiro para efetuar apanhe / searação ou reabastecimento.

EM QUE PONTO : Na definição do Endereço a ser escolhido para o Apanhe / Separação.

USO : Possibilita o Reabastecimento de um Endereco, possibilitando o Apanhe.

DigXfun.PRW

DLABAEND - Reabastecimento de Endereço ( < PARAMIXB[1]> , < PARAMIXB[2]> , < PARAMIXB[3]> , < PARAMIXB[4]> , < PARAMIXB[5]> , < PARAMIXB[6]> ) --> aRet

aRet(vetor)
• aRet[1] = .T. //Logico, onde .T. realiza um Reabastecimento
  aRet[2] = cLocal //Local do Endereco a ser Reabastecido - SOH ALTERAR CASO (PARAMIXB[1]==.F.)
  aRet[3] = cEstFis //Estrutura Fisica do Endereco a ser Reabastecido - SOH ALTERAR CASO (PARAMIXB[1]==.F.)
  aRet[4] = cEndDes //Endereco a ser Reabastecido - SOH ALTERAR CASO (PARAMIXB[1]==.F.)

User Function DLABAENDP()//-- Ponto de entrada apos encontrar endereço com o produto para apanhe/separacao.//-- Exemplo: Permite definir um endereço para o reabastecimento.Local lRet    := PARAMIXB[1] //Logico, onde .T. significa que encontrou um Endereco DestinoLocal lAbast  := PARAMIXB[2] //Logico, onde .T. significa que acionou um Reabastecimento para o Endereco DestinoLocal cProd   := PARAMIXB[3] //ProdutoLocal cLocal  := PARAMIXB[4] //LocalLocal cEstFis := PARAMIXB[5] //Estrutura FisicaLocal cEndDes := PARAMIXB[6] //Endereco EncontradoLocal aret    := Array(4)aRet[1] = .T.     //Logico, onde .T. realiza um ReabastecimentoaRet[2] = cLocal  //Local do Endereco a ser Reabastecido - SOH ALTERAR CASO (PARAMIXB[1]==.F.)aRet[3] = cEstFis //Estrutura Fisica do Endereco a ser Reabastecido - SOH ALTERAR CASO (PARAMIXB[1]==.F.)aRet[4] = cEndDes //Endereco a ser Reabastecido - SOH ALTERAR CASO (PARAMIXB[1]==.F.)