MTGRVSD5 - Grava Registros de Movimentação de Lote

LOCALIZAÇÃO : Function GravaSD5( ) - Função responsável pela atualização da tabela SD5 com base nos movimentos SD1, SD2 e SD3. Vale ressaltar que a tabela SB8 está posicionada. 

EM QUE PONTO : Executado após a atualização ou inclusão do registro na tabela SD5. Este ponto de entrada MTGRVSD5 é utilizado para manipular a gravação dos registros de movimentação de lote ('Tabela SD5') e também a tabela de resumo de lotes ('Tabela SB8').

SIGACUSA.PRX

MTGRVSD5 - Grava Registros de Movimentação de Lote ( < PARAMIXB[1]> , [ PARAMIXB[2] ], [ PARAMIXB[3] ], [ PARAMIXB[4] ], [ PARAMIXB[5] ], [ PARAMIXB[6] ], [ PARAMIXB[7] ], [ PARAMIXB[8] ] ) --> Nil

Nil(nulo)
• Nil

#INCLUDE 'RWMAKE.CH'User Function MTGRVSD5()Local cAlias    := PARAMIXB[1]Local cProduto  := PARAMIXB[2]Local cLocal    := PARAMIXB[3]Local cLoteCtl  := PARAMIXB[4]Local cNumLote  := PARAMIXB[5]Local cOp       := PARAMIXB[6]Local dDtValid  := PARAMIXB[7]Local lProducao := PARAMIXB[8]// Parametros do array PARAMIXB// PARAMIXB[1] - Alias que esta gerando o movimento na tabela SD5// PARAMIXB[2] - Codigo do produto// PARAMIXB[3] - Armazem// PARAMIXB[4] - Lote// PARAMIXB[5] - SubLote// PARAMIXB[6] - Numero da ordem de producao// PARAMIXB[7] - Data de validade// PARAMIXB[8] - Movimento originado de apontamento de producaoIf lProducao  // Movimento de Producao If cAlias == 'SD3'   //Movimento Internos  // ATENCAO - ESTE PONTO DE ENTRADA ESTA DENTRO DE UMA TRANSACAO  // Customizacoes do Cliente  // As tabelas SB8 e a tabela de movimento passada pela variavel cAlias estao posicionads. EndIfElse // Outras customizacoesEndIf Return Nil