Linha Microsiga Protheus

Page tree

MATA220 - Controle de Itens do Estoque

Linha de Produto:

Protheus

Segmento:

Manufatura

Módulo:

SIGAPCP - Planejamento e Controle da Produção

Parâmetro(s):


Nome
Tipo
Descrição
Default
Obrigatório Referência

PARAMIXB1
Vetor
Array contendo os campos, valores e validações a serem cadastradas,alteradas ou excluídas.


X



PARAMIXB2
Numérico
Opção escolhida: 3-Inclusão ; 4-Alteração ; 5-Exclusão


X


Nível de Acesso:Nível 1 (Acesso Clientes)

Idiomas:

Espanhol, Inglês

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

Por meio dos saldos iniciais pode-se controlar cada item do estoque em quantidade e valor.

Importante:

Para cada item em estoque, o sistema mantém três saldos em quantidade e valor:
• Saldo Inicial

É o saldo no início do período (normalmente mês), utilizado para reprocessamentos do recálculo do custo médio e no acerto do saldo atual. No fechamento é atualizado pelo saldo final, desde que seja feita a limpeza dos movimentos, pois o saldo inicial deve estar coerente com o movimento mais antigo.
• Saldo Final

É o saldo final do período (normalmente mês), utilizado para emissão dos relatórios de fechamento. É atualizado pelo Recálculo do Custo Médio ou em tempo real (on-line).
• Saldo Atual

É o saldo on-line que pode também ser calculado pelo programa de Saldo Atual, com base no saldo inicial e no movimento existente nos arquivos.

Programa Fonte:

MATA220.PRX

Sintaxe:

MATA220 - Controle de Itens do Estoque ( PARAMIXB1PARAMIXB2 ) --> Nil

Retorno:

Nil

    (nulo)
  • Nil
Variáveis:
Nome
Tipo
Escopo
Pode Alterar
Descrição


Array of Record
Global
Não


Observações:


Exemplo:
User Function MyMata220()Local PARAMIXB1 := {}Local PARAMIXB2 := 3Local cProd	:= "PI001"Local cArmazem	:= "01"Local cQtdIni 	:= 30PRIVATE lMsErroAuto := .F.//------------------------//| Abertura do ambiente |//------------------------PREPARE ENVIRONMENT EMPRESA "YY" FILIAL "01" MODULO "EST" TABLES "SB9"ConOut(Repl("-",80))ConOut(PadC("Teste de Cadastro de Saldos Iniciais",80))ConOut("Inicio: "+Time())//------------------------//| Teste de Inclusao    |//------------------------Begin Transaction   	PARAMIXB1 := {}	aadd(PARAMIXB1,{"B9_COD",cProd,})	aadd(PARAMIXB1,{"B9_LOCAL",cArmazem,})	aadd(PARAMIXB1,{"B9_QINI",cQtdIni,})	        MSExecAuto({|x,y| mata220(x,y)},PARAMIXB1,PARAMIXB2)		If !lMsErroAuto		ConOut("Incluido com sucesso! "+cProd)		Else		ConOut("Erro na inclusao!")	EndIf	ConOut("Fim  : "+Time())	         End TransactionRESET ENVIRONMENTReturn Nil