Árvore de páginas

Versões comparadas

Chave

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

...

Permite a manipulação de registros da tabela SE3 - Comissões de vendas, no momento da exclusão de um título de contas a pagar que possua amarração com comissão.

Parâmetros:

NomeTipoDescriçãoDefaultObrigatorio
ParamIxbArrayArray contendo o Recno() do registro da tabela SE3 que tem amarração com o título que está sendo excluído.
X


Retorno:

  • Array contendo duas posições, sendo: [1] - Data de pagamento da comissão (E3_DATA); [2] - Flag da amarração com título a pagar (E3_PROCCOM)


03. EXEMPLO DE UTILIZAÇÃO

...

Bloco de código
languagejava
themeMidnight
titleF050DSE3
#Include 'Protheus.ch'
#Include 'FWMVCDEF.ch'

User Function F050ROTF050DSE3()
	
	    Local aArea   := GetArea() 
	    Local aRotinaaRecno := Paramixb // Array contendo oso botoesrecno padrõesda databela rotina.

	// Tratamento no array aRotina para adicionar novos botoes e retorno do novo array.
	Aadd(aRotina, { "F050ROT", "U_F050ROTMSG", 0, 8, 0,.F.})
	
	RestArea(aArea)

Return aRotina

User Function F050ROTMsg()SE3
    Local aRet := {}
 
    SE3->(DbGoto(aRecno[1]))
    If SE3->E3_VEND == "000001"
        aRet := {Ctod(""),""}
    Endif      
	Aviso( "F050ROT", "Ponto de Entrada F050ROT", {"Ok"}, 2 )

Return .T. 

    RestArea(aArea)
 
Return aRet



04. DEMAIS INFORMAÇÕES

Não há

...