Árvore de páginas

Ponto-de-Entrada: A455SLT1 - Montagem de lotes
Versões: Microsiga Protheus 8.11 , Microsiga Protheus 10
Idiomas: Espanhol , Inglês
Descrição:

Este ponto de entrada é executado na montagem dos lotes que serão apresentados pelo usuário pela rotina MATA455.

Ele permite ao cliente personalizar o browse adicionando novos campos, porém não será permitido retirar os do sistema.

Deve ser utilizado em conjunto com o ponto A455SLT2.

Programa Fonte
.PRW
Sintaxe

A455SLT1 - Montagem de lotes ( < PARAMIXB[1]> , < PARAMIXB[1]> ) --> Nil

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
PARAMIXB[1] Vetor Array com a estrutura da tabela que manterá as informações. X
PARAMIXB[1] Vetor Array com a descrição dos campos do browse. X
Retorno
    Nil(nulo)
  • Nil
Exemplos
Parâmetro 1Array com a estrutura da tabela que manterá as informações.Exemplo:aadd(aStruTrb,{"TRB_OK","C",2,0})aadd(aStruTrb,{"TRB_LOTECT","C",TamSx3("C6_LOTECTL")[1],TamSx3("C6_LOTECTL")[2]})aadd(aStruTrb,{"TRB_NUMLOT","C",TamSx3("C6_NUMLOTE")[1],TamSx3("C6_NUMLOTE")[2]})aadd(aStruTrb,{"TRB_LOCALI","C",TamSx3("C6_LOCALIZ")[1],TamSx3("C6_LOCALIZ")[2]})aadd(aStruTrb,{"TRB_POTENC","N",TamSx3("C6_POTENCI")[1],TamSx3("C6_POTENCI")[2]})aadd(aStruTrb,{"TRB_NUMSER","C",TamSx3("C6_NUMSERI")[1],TamSx3("C6_NUMSERI")[2]})aadd(aStruTrb,{"TRB_QTDLIB","N",TamSx3("C6_QTDLIB")[1] ,TamSx3("C6_QTDLIB")[2]})aadd(aStruTrb,{"TRB_DTVALI","D",TamSx3("C6_DTVALID")[1],TamSx3("C6_DTVALID")[2]})Parâmetro 2Array com a descrição dos campos do browse, conforme exemplo abaixo:aadd(aBrowse,{"TRB_OK",,""})aadd(aBrowse,{"TRB_LOTECT",,RetTitle("C6_LOTECTL")})aadd(aBrowse,{"TRB_NUMLOT",,RetTitle("C6_NUMLOTE")})aadd(aBrowse,{"TRB_LOCALI",,RetTitle("C6_LOCALIZ")})aadd(aBrowse,{"TRB_POTENC",,RetTitle("C6_POTENCI")})aadd(aBrowse,{"TRB_NUMSER",,RetTitle("C6_NUMSERI")})aadd(aBrowse,{"TRB_QTDLIB",,RetTitle("C6_QTDLIB")})aadd(aBrowse,{"TRB_DTVALI",,RetTitle("C6_DTVALID")})