Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

Produto:

TOTVS BackOffice

Linha de Produto:

Linha Protheus

Segmento:

BackOffice

Módulo:

TOTVS BackOffice (Linha Protheus) - Estoque e Custos (SIGAEST)

Função:SIGACUS
País:Brasil


02. DESCRIÇÃO

LOCALIZAÇÃO : Function - da Rotina SIGACUS() 

EM QUE PONTO : O Ponto de entrada é executado dentro da função PegaCmDev , quando não é encontrada a NF original digitada no movimento.
Serve para alterar o custo da Nota Fiscal caso o usuário não queira utilizar o custo sugerido pelo sistema. Este ponto de entrada foi criado para tratar o custo em parte.

03. DEMAIS INFORMAÇÕES


PARÂMETROS

NomeTipoDescrição
PARAMIXB[1]ArrayArray com o custo da Nota Fiscal nas 5 moedas do sistema.
PARAMIXB[2]Caractere String com a somatória da NF original + Série original pesquisada


RETORNO

NomeTipoDescrição
aRetArray

Deve retornar um array com os custos do movimento em todas as moedas.



EXEMPLO DE UTILIZAÇÃO ADVPL

MTCNFDVP(ADVPL)
#INCLUDE "PROTHEUS.CH"
#INCLUDE "PRTOPDEF.CH"      

User Function MTCNFDVP()

Local aCustoNf := Paramixb[1] // Retorna os custos de todas moedas 
Local cNfSerie := Paramixb[2] // Retorna a nota+serie 
Local aRet     := {0,0,0,0,0}

//Customização do Cliente
If  cNfSerie  == 'XXXXXXXXXXXXX'    
	aRet  := {50,0,0,0,0} //no exemplo altera o custo da moeda 1 
Endif

Return(aRet)


04. ASSUNTOS RELACIONADOS

  • Não se aplica