Histórico da Página
Ponto de entrada MTA228GSCC
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: 11.8 | 12.1.07 |
O Ponto de entrada MTA228GSCC é utilizado para tratamentos de usuário na gravação da tabelas SCC.
Ponto de Entrada
Descrição: | O Ponto de Entrada MTPOSSBD é utilizado para posicional a tabela SBD, de acordo com a regra do usuário para tratamento do custo de lote FIFOTratamento de gravação na tabela SCC. | ||||||||
Localização: | No momento da geração Na Geração do Remito. | ||||||||
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 um remito. | ||||||||
Programa Fonte: | SIGACUSBMATA228 | ||||||||
Função: | BaixaSBDA228Atu | ||||||||
Parâmetros : |
Nota: é obrigatório fazer o posicionamento da tabela SBD. | ||||||||
Retorno : | NIL | ||||||||
Retorno: | Nenhum |
Exemplo:
#INCLUDE 'PROTHEUS.CH'
User Function MTPOSSBD MTA228GSCC ()
Local cProdutolocal nOpc:= 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