Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Nilton Mioshi Koyanagui

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Ana Paula Tiete Lira Martins

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.


Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

Estoque e Custos (SIGAEST)

Faturamento (SIGAFAT)

Rotina:

Rotina

Nome Técnico

Gerar Remito 

SIGACUSB

Cadastros Iniciais:

Faturamento

Parâmetro(s):

PARAMIBX (array)

Ponto de Entrada:

MTPOSSBD

País(es):

Brasil

Banco(s) de Dados:

Todos

Tabelas utilizadas:

SBD

Sistema(s) operacional(is):

Windows/Linux

Versões/Release:

11.8

 

Ponto de Entrada

NIL

Descrição:FATURAMENTO

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 FIFO.

Localização:REMITO

No momento da geração do Remito.

Eventos:GERAR REMITO

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 FIFO.

Programa Fonte:

SIGACUSB.PRX

Função:

TODOSBaixaSBD

RetornoParâmetros :

Nome

Tipo

Descrição

Obrigatório

NIL 

NIL

NIL

 PARAMIXB

Array of recordes

Parâmetros que podem ser manipulados:

PARAMIXB[01] - Produto
PARAMIXB[02] - Local
 
 

X

 Nota: é obrigatório fazer o posicionamento da tabela SBD.

 Retorno : NIL

 

Exemplo:

#INCLUDE 'PROTHEUS.CH'

...

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

Return Nil