Histórico da Página
Linha de Produto: | Microsiga Protheus | ||||||||
Segmento: | Serviços | ||||||||
Módulo: | Estoque e Custos (SIGAEST) Faturamento (SIGAFAT) | ||||||||
Rotina: |
| Cadastros Iniciais: | Faturamento
| ||||||
Parâmetro(s): | PARAMIBX PARAMIXB (array)01) - Tipo: Inclusão, alteração | ||||||||
Ponto de Entrada: | MTPOSSBDMTA228GSCC | ||||||||
País(es): | BrasilArgentina | ||||||||
Banco(s) de Dados: | Todos | ||||||||
Tabelas utilizadas: | SBDSCC | ||||||||
Sistema(s) operacional(is): | Windows/Linux | ||||||||
Versões/Release: | 1112.1.807 |
Ponto de Entrada
Descrição: | O Ponto de Entrada MTPOSSBD MTA228GSCC é utilizado para posicional a tabela SBD, de acordo com a regra do usuário para tratamento do custo de lote FIFOo tratamento de usuário na gravação da tabela SCC. | ||||||||
Localização: | No momento da geração do RemitoNa criação do saldo FIFO x LIFO. | ||||||||
Eventos: | Na geração do remito, o usuário pode fazer o posicionamento da tabela SBD e sobrepor a regra do custo FIFO indicando o lote ou amarração definida fugindo da regra standard para determinar o custo FIFOAo concluir a manutenção de saldo. | ||||||||
Programa Fonte: | SIGACUSBMATA228. | ||||||||
Função: | BaixaSBDA228Atu. | ||||||||
Parâmetros Retorno: |
Nota: é obrigatório fazer o posicionamento da tabela SBD. | ||||||||
Retorno : | NIL |
Exemplo:
#INCLUDE 'PROTHEUS.CH'
Nenhum. |
Exemplo:
User Function MTA228GSCC ()
local nOpcUser Function MTPOSSBD ()
Local cProduto:= Paramixb[1]Local cLocal := Paramixb[2]
Local cSeek := ""
Local lLifo := SuperGetMv('MV_CUSLIFO',.F.,.F.)
Local lFifo := SuperGetMv('MV_CUSFIFO',.F.,.F.)
Alert ('PE MTPOSSBD Produto: '+cProduto+' Local :'+cLocal)
dbSelectArea("SBD")
dbSetOrder(1)
If lLIFO .And. !lFIFO
If dbSeek(cSeek:=xFilial("SBD")+cProduto+cLocal+" ")
Do While !Eof() .And. cSeek == BD_FILIAL+BD_PRODUTO+BD_LOCAL+BD_STATUS
dbSkip()
EndDo
dbSkip(-1)
EndIf
Else
dbSeek(xFilial("SBD")+cProduto+cLocal+" ")
EndIf
If nOpc == 1
alert ('Execução PE MTA228GSCC na opção 1')
ElseIf nOpc == 2
alert ('Execução PE MTA228GSCC na opção 2')
EndIf
Return Nil
Return Nil