Histórico da Página

Composition Setup
import.css=/download/attachments/5263564/framework.css

Portuguese

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

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

Bloco de código

language	none
linenumbers	true

#-------------------------------#
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.

Páginas filhas

Versões comparadas

Versão antiga 11

Nova versão 12

Chave

Observações