Linha Microsiga Protheus

Árvore de páginas

Carregando...
Tempo aproximado para leitura: 3 minutos

Função: MATA390 - Programa de Manutenções nas Movimentações de Lote (SD5)
Abrangências: Advanced Protheus 7.10
Versões: Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Nível de Acesso: Nível 1 (Acesso Clientes)
Idiomas: Português (Brasil)
Descrição: 
OBJETIVO: 
Esta rotina efetua manutenções nas Movimentações de Lote (SD5). 
 
Observação: 
Esta rotina permite pesquisar e visualizar lotes já existentes e incluir/excluir lotes novos. 
- Somente lotes incluídos manualmente poderão ser excluídos. 
- A inclusão de lotes deve ser utilizada quando um produto com saldo em estoque e sem controle de rastreabilidade passa a utilizar este controle.
Sintaxe:

MATA390 - Programa de Manutenções nas Movimentações de Lote (SD5) ( [ PARAMIXB1 ] [ PARAMIXB2 ] ) --> nulo

Retorno:
    nulo(nulo)
Exemplos 
#INCLUDE "RWMAKE.CH" #INCLUDE "TBICONN.CH" User Function ROTAUT390()                      Local aTamProd:= {}Local cProd   := ""Local aVetor := {} PRIVATE lMsErroAuto := .F.   //ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿//| Abertura do ambiente                                         |//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙPREPARE ENVIRONMENT EMPRESA "99" FILIAL "01" MODULO "EST" TABLES "SD5" aTamProd:= TamSX3("B1_COD")cProd   := "6"+Space( aTamProd[1]-Len("PROD1") )aadd(aVetor,{"D5_PRODUTO" ,cProd            ,})aadd(aVetor,{"D5_LOCAL"	  ,"01"     ,})aadd(aVetor,{"D5_DOC"     ,"000000001"      ,})aadd(aVetor,{"D5_DATA"    ,dDataBase        ,})aadd(aVetor,{"D5_QUANT"   ,1000             ,})aadd(aVetor,{"D5_LOTECTL" ,"Teste_AUTO"     ,})aadd(aVetor,{"D5_POTENCI" ,0                ,})aadd(aVetor,{"D5_DTVALID" ,dDataBase        ,})  // InclusaoMSExecAuto({|x,y| Mata390(x,y)},aVetor,3)If !lMsErroAuto	ConOut("Incluido com sucesso! "+cProd)	Else      MostraErro()	ConOut("Erro na inclusao!")EndIfConOut("Fim  : "+Time())Return Nil
Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
PARAMIXB1 Array of Record Contendo os valores para as movimentacoes de Lote (SD5)
PARAMIXB2 Array of Record 2-Visualizar 3-Incluir 4-Alterar 5-Excluir