Classe :: Workflow. sistema de fluxo de trabalho leve.
Baixe Agora

Classe :: Workflow. Classificação e resumo

Classe :: Workflow. Tag

Módulo Perl. perl classe fluxo de trabalho Sistema de fluxo de trabalho

Classe :: Workflow. Descrição

Sistema de fluxo de trabalho leve. Classe :: Workflow é um sistema de fluxo de trabalho leve.Synopsis Use Class :: Workflow; # ***** Nota ***** # # Este é um exemplo muito longo e chato # # você provavelmente quer ver alguns vídeos flash flash, então olhe para ver também # primeiro ;-) # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #*** ************ # Um objeto de fluxo de trabalho ajuda você a criar objetos de estado / transição # ele permite atribuir nomes simbólicos aos vários objetos para facilitar a construção Minha $ WF = Class :: Workflow-> Novo; # (você ainda pode criar os objetos de estado, transição e instância manualmente.) # Crie um estado e defina as transições que ele pode executar $ wf-> estado (nome => "novo", transições => ,); # defina como o estado inicial $ wf-> inicial_state ("novo"); # Crie mais alguns estados $ wf-> estado (nome => "aberto", transições => ,); $ wf-> estado (nome => "rejeitado",); # transições movem as instâncias do estado para o estado # Crie a transição chamada "Rejeitar" # O estado "Novo" refere-se a esta transição # O estado "rejeitado" é o estado de destino $ wf-> transição (nome => "rejeitar", to_state => "rejeitado",); # Criar uma transição chamada "Aceitar", # Esta transição leva um valor a partir do contexto (que contém o usuário de atuação atual) # O contexto é usado para definir o proprietário atual para o bug $ wf-> transição (nome => "aceitar ", to_state =>" aberto ", corpo => sub {My ($ Transition, $ Instância, $ context) = @_; return (proprietário => $ context-> usuário, # Atribui ao uso que aceitou); },); # Ganchos são trigrados sempre que um estado é inserido. Eles não podem alterar a instância # Este gancho chama um método hipotético no objeto do remetente $ WF-> estado ("Rejeitar") -> Add_hook (Sub {My ($ State, $ Instância) = @_; $ > Notificar ("Seu item foi rejeitado");}); # O restante da definição do fluxo de trabalho é omitido para o Brevity # Finalmente, use este fluxo de trabalho na ação que lida com a criação de bugs sub new_bug {my ($ remisster,% params) = @_; retornar $ wf-> new_instance (remetente => $ remisster,% params,); } Requisitos: · Perl.

Classe :: Workflow. Software Relacionado