Este ponto de entrada está chamado antes o cálculo da regularização dos preços.
Transação
Existe uma transação em curso.
Ficheiro rasto
Pode existir um ficheiro rasto aberto (Testar GTRACE)
Diferentes casos de chamada
A regularização de preço está chamada no momento da validação de uma fatura de compra, do cálculo de preço de custo ou do pagamento sub-contrato (tomado em conta de fatura de sub-contrato validados após o cálculo do preço de custo).
Variáveis
Variável ou máscara | Definição | ||
GPE | Inicializado a 0. Colocar 1 para parar o pagamento sem desencadear erros | ||
Masque STKREGW [SRW] | LOT (Char) | Lotes afetados pelo pagamento | O quadruplo é único |
VCRTYP (Integer) | Tipo de documento que criou a entrada | ||
VCRNUM(Char) | Nº de documento que criou a entrada | ||
VCRLIN (Integer) | Nº de documento que criou a entrada | ||
QTYSTU (Decimal) | Quantidade movimentada por quadruplo dado | ||
AMTABS (Decimal) | Montante absorvido pelo quadruplo | ||
AMTNABS (Decimal) | Montante não absorvido pelo quadruplo | ||
QTYSTOLOT (Decimal) | Quantidade em stock do lote | ||
Máscara SAIDECPRI [SDPD] | AMTTOT | Montante total a absorver | |
MATCST(x), MACCST(x)… | Detalhe do montante a absorver | ||
WRND_SOC | Arredondamento dos montantes = 10^(número de decimais) |
Em caso de erro necessitando a paragem do tratamento standard, posicionar PRET a 1
Tabelas abertas
ITMMASTER; ITMFACILIT; STOJOU; TABCOSTMET; TABCOSTMVT; STOCOST; STOLOT; ITMMVT; ITMMVTHIS
Este ponto de entrada vai permitir de atualizar em específico as tabelas afetadas pela regularização do preço, ou de escolher um dos diferentes métodos propostos pelo standard.
Este ponto de entrada foi chamado justo antes a atualização das tabelas da regularização dos preços.
Existe uma transação em curso.
Pode existir um ficheiro rasto aberto (Testar GTRACE)
A regularização de preço está chamada no momento da validação de uma fatura de compra, do cálculo de preço de custo onde a regularização sub-contrato (tomado em conta de fatura de sub-contrato validados após o cálculo do preço de custo)
Variável ou máscara | Definição | ||
Masque STKREGW [SRW] | LOT (Char) | Lotes afetados pelo pagamento | O quadruplo é único |
VCRTYP (Integer) | Tipo de documento que criou a entrada | ||
VCRNUM(Char) | Nº de documento que criou a entrada | ||
VCRLIN (Integer) | Nº de documento que criou a entrada | ||
QTYSTU (Decimal) | Quantidade movimentada por quadruplo dado | ||
AMTABS (Decimal) | Montante absorvido pelo quadruplo | ||
AMTNABS (Decimal) | Montante não absorvido pelo quadruplo | ||
QTYSTOLOT (Decimal) | Quantidade em stock do lote | ||
LMODSTP (Integer) | Método de atualização da pilha FIFO: Por defeito, LMODSTP=4 se o método de valorização do artigo é FIFO ou LIFO, senão LMODSTP=0 | ||
LUPDTAB (Integer) | Tabelas a atualizar: Por defeito, LUPDTAB=1+2+4+8+16 = 31 |
Em caso de erro necessitando a paragem do tratamento standard, posicionar GOK a 0
ITMMASTER; ITMFACILIT; STOJOU; TABCOSTMET; TABCOSTMVT; STOCOST; STOLOT; ITMMVT; ITMMVTHIS
Este ponto de entrada permite gerir a traçabilidade sobre o seguimento em vez de OF
Existe uma transação em curso.
Pode existir um ficheiro rasto aberto (Testar GTRACE)
A regularização de preço está chamada no momento da validação de uma fatura de compra, do cálculo de preço de custo ou da regularização pagamento sub-contrato (tomado em conta de fatura de sub-contrato validados após o cálculo do preço de custo).
Este ponto de entrada está chamada na etiqueta MAJ_STOTRK_REGFLG do tratamento STKVALREG. Normalmente, o mesmo código deve ser utilizado neste ponto de entrada e o ponto de entrada ORI_TRK de STKLIB.
# --Sequência a escrever no ponto de entrada
If find([F:STJ]TRSTYP,5,6,19)
WTYP = [F:STJ]VCRTYP
WNUM = [F:STJ]VCRNUM
WLIN = [F:STJ]VCRLIN
WTYPORI = [F:STJ]VCRTYPORI
WNUMORI = [F:STJ]VCRNUMORI
WLINORI = [F:STJ]VCRLINORI
Endif