Páginas filhas
  • WfProcessStart


Inicia uma nova solicitação de um processo já existente no ECM.

Atenção

Para a utilização desta função é necessário que o processo do qual deseja-se iniciar uma nova solicitação já esteja criado no ECM.



Sintaxe:
    LET nSolicitation = _ADVPL_WfProcessStart( cProcessId, nChoosedState, aColleagues, cComments, cUserId, lCompleteTask, aAttachs, oCardData )
Parâmetros:
    cProcessId → Id do processo do qual deseja-se criar uma nova solicitação <obrigatório>.
    nChoosedState → Número da atividade na qual a solicitação será iniciada [opcional, padrão: 2].
    aColleagues → Lista com o nome dos usuários ou grupos que receberão a solicitação [opcional].
    cComments → Comentários da solicitação [opcional].
    cUserId → Código do usuário que criará a nova solicitação [opcional].
    lCompleteTask → Verdadeiro se a solicitação deve ser salva e enviada, falso para indicar que apenas será salva [opcional, padrão: verdadeiro].
    aAttachs → Lista com os códigos dos documentos do GED que serão anexados à solicitação [opcional].
    oCardData → Objeto (RECORD) com as colunas e valores da solicitação [opcional].
Retorno:
    nSolicitation → Número da solicitação criada para o processo ou 0 (zero) se a solicitação não pôde ser criada.


EXEMPLO

#-------------------------------#
FUNCTION log02700_start_process()
#-------------------------------#
    DEFINE lr_usuarios RECORD LIKE usuarios.*
    DEFINE l_solicitation SMALLINT

    # Inicia a solicitação de criação de um novo usuário no workflow LOG02700.
    LET lr_usuarios.cod_usuario         = 'rubens'
    LET lr_usuarios.nom_funcionario     = 'Rubens Dos Santos Filho'
    LET lr_usuarios.ind_admlog          = 'N'
    LET lr_usuarios.num_telefone        = '(47) 2101-3000'
    LET lr_usuarios.num_ramal           = '7198'
    LET lr_usuarios.e_mail              = '[email protected]'
    LET lr_usuarios.cod_empresa_padrao  = '50'
    LET lr_usuarios.cod_impress_padrao  = ''
    LET lr_usuarios.dat_inclusao        = CURRENT YEAR TO SECOND
 
    LET l_solicitation = _ADVPL_WfProcessStart('LOG02700',NULL,NULL,'Criação do usuário "rubens"',p_user,TRUE,NULL,lr_usuarios)
 
    IF  l_solicitation > 0 THEN
        CALL LOG_message("Solicitação de criação do usuário enviada com sucesso.","INFO",NULL,NULL,0)
    ELSE
        CALL LOG_message("Não foi possível enviar uma nova solicitação de criação do usuário.","ERROR",_ADVPL_WfGetError(2),NULL,0)
    END IF

    RETURN l_solicitation
END FUNCTION

OBSERVAÇÕES

Se houver erros durante a criação da solicitação, para recuperar a mensagem e os detalhes do mesmo deve-se utilizar a função WfGetError.

Arquivo 4GL utilizado no exemplo desta função: log02700.4gl.


VEJA TAMBÉM

WfProcess