Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Guilherme Augusto de Sordi Nogueira Guedes

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Guilherme Augusto de Sordi Nogueira Guedes

Gravado em

Chave

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

...

  • E5_FILIAL
  • E5_PREFIXO
  • E5_NUMERO
  • E5_PARCELA
  • E5_TIPO
  • E5_CLIFOR
  • E5_LOJA
  • E5_SEQ
  • E5_RECPAG
  • Dtos(E5_DATA )
  • E5_NUMCHEQ
  • E5_DOCUMEN

03. PARÂMETROS

TipoDescrição
CharacterString com a ordenação padrão

04. RETORNO

TipoDescrição
CharacterString com a nova ordenação

...

Bloco de código
languagejava
themeMidnight
firstline1
titleExemplo de execução
linenumberstrue
#include 'Protheus.ch'

User Function F370E5K ()
	local cKey := PARAMIXB
	local cNewKey := "E5_RECPAG+Dtos(E5_DATA )+E5_NUMCHEQ+E5_DOCUMEN+E5_PREFIXO+E5_NUMERO+E5_PARCELA+E5_TIPO+E5_CLIFOR+E5_LOJA+E5_SEQ+E5_FILIAL"

	MsgInfo("Key = " + cKey ,"PE F370E5K")
	MsgInfo("NewKey = " + cNewKey  ,"PE F370E5K")
return cNewKey

06. EVENTO DE CHAMADA DO PONTO DE ENTRADA

Bloco de código
languagejava
themeMidnight
firstline1
titleExemplo de execução
linenumberstrue
Local lF370E1WH := Existblock("F370E1W")

If lF370E1WH
	cCondWhile := Execblock("F370E1W",.F.,.F.) 
Else
	cCondWhile := "( SE1->E1_EMISSAO >= mv_par04 .And. SE1->E1_EMISSAO <= mv_par05 ) "
EndIf



Templatedocumentos