Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: TM850PREF - Alterar o Prefixo da Fatura
Versões: Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição: 
Este Ponto de Entrada, localizado na rotina de geração de Faturas por Documento (TMSA850) e na rotina de geração de Faturas Automáticas (TMSA491).Este ponto de entrada permite ao usuário alterar o prefixo da fatura. Por padrão, o prefixo da fatura é definido através do parâmetro MV_FATPREF. Como demonstra o exemplo você pode concatenar informação de um campo. Vale lembrar que o tamanho do prefixo está limitado a 3.
Eventos


 

Programa Fonte 
TMSA850.PRW;TMSA491
Sintaxe

TM850PREF - Alterar o Prefixo da Fatura ( ) --> cPrefixo

Retorno
    cPrefixo(caracter)
  • cPrefixo - novo prefixo a ser considerado na fatura.
Observações


 

Exemplos 
#Include "PROTHEUS.CH"User Function TM850PREF()Local cRet     := ''Local cFatPref := GetMv("MV_FATPREF",, "")If IsInCallStack('TMSA491')	Alert( 'CHAMADA DO PE "TM850PREF" A PARTIR DA FATURA AUTOMATICA' )	If MsgYesNo('TROCAR O PREFIXO DA FATURA?')		cRet := 'FT1'	Else		cRet := cFatPref	EndIfElseIf IsInCallStack('TMSA850')	Alert( 'CHAMADA DO PE "TM850PREF" A PARTIR DA FATURA P/ DOCTO.' )	If MsgYesNo('TROCAR O PREFIXO DA FATURA?')		cRet := 'FT2'	Else		cRet := cFatPref	EndIfEndIfReturn( cRet )