BREVEMENTE DISPONÍVEL
Manuais
PHC GO Como criar uma regra de negócio - Ao executar Trigger na gravação
 

Cenário


A sua empresa tem uma necessidade de, sempre que existir um movimento de conta corrente de um cliente igual ou superior a 1.000.000,00€, seja criada uma tarefa no PHC GO a alertar da respetiva ocorrência. Como tal, está à procura de uma regra de negócio, que lhe realize este automatismo de extrema importância para o seu negócio.
 
 

Como configurar


  • Entidade: Como queremos que esta regra se aplique a Contas Correntes de Clientes, a entidade a selecionar é a entidade Contas Correntes de Clientes.

  • Título: De forma a que esta peça seja facilmente reconhecida, foi selecionado o título -> Criar tarefa se movimento igual ou superior a 1Milhão de euros.

  • Tipo código: De acordo com o nosso cenário, queremos criar a tarefa Ao executar Trigger na gravação.

  • Código:
     
     
     1
     2
     3
     4
     5
     6
     7
     8
     9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
                    
    ´ itemVO é um objeto do tipo CCVO (Conta corrente de cliente)
    ´ Verifica se existe um movimento de débito ou crédito na conta corrente do cliente com valor maior ou igual a 1 milhão.
    Dim ONE_MILLION = 1000000
    Dim isMovementGreaterThanOneMillion As Boolean = itemVO.edeb >= ONE_MILLION OrElse itemVO.ecred >= ONE_MILLION
    
    If isMovementGreaterThanOneMillion Then
        Dim fieldThatWasChanged As String = If(itemVO.edeb > 0, "edeb", "ecred")
        Dim task As TasksVO = SDK.Triggers.GetNewObjectInstance(Of TasksVO)()
        task.summary = "Tem um movimento de conta corrente com valor acima de 1 milhão."
        task.startdate = SDK.Dates.timezoneDate()
        task.enddate = SDK.Dates.timezoneDate()
        
        Dim currentUser As UserVO = SDK.User.getCurrentInfo()
        task.whocreated = currentUser.usstamp
        task.description = "Tem um movimento de " & CDec(itemVO.GetPropertyValue(fieldThatWasChanged)).ToCurrency() & "€ para o cliente " & itemVO.nome & "."
        task.code = "Imagine some unique code here"
    
        ´ Criar conexão para navegar ao movimento através da tarefa
        Dim itemTaskConnection As TaskConnectionsVO = SDK.Triggers.GetNewObjectInstance(Of TaskConnectionsVO)()
        itemTaskConnection.tasksstamp = task.tasksstamp
        itemTaskConnection.ParentVO = task
        itemTaskConnection.summaryentity = itemVO.nome
        itemTaskConnection.urlextern = "/mainform/cc/view;stamp=" & itemVO.ccstamp
    End If
                    

     

    Resultado


    Depois de instalar o add-on que contém a peça desenvolvida, quando quando existir um movimento de conta corrente de cliente superior a 1.000.000,00€, irá ser criada uma tarefa no PHC GO a alertar o utilizador. A tarefa criada irá ter o seguinte aspeto: