Clase :: Flujo de trabajo

Sistema de flujo de trabajo de peso ligero.
Descargar ahora

Clase :: Flujo de trabajo Clasificación y resumen

Anuncio publicitario

  • Rating:
  • Licencia:
  • Perl Artistic License
  • Precio:
  • FREE
  • Nombre del editor:
  • Yuval Kogman
  • Sitio web del editor:
  • http://search.cpan.org/~nobull/

Clase :: Flujo de trabajo Etiquetas


Clase :: Flujo de trabajo Descripción

Sistema de flujo de trabajo ligero. Clase :: Workflow es un sistema de flujo de trabajo liviano.Synopsis Use Clase :: Flujo de trabajo; # ***** Note ***** # # Este es un ejemplo bastante largo y aburrido # # probablemente desee ver algunos videos flash llamativos, así que mire en ver también # primero ;-) # # **** ************ # Un objeto de flujo de trabajo lo ayuda a crear objetos de estado / transición # le permite asignar nombres simbólicos a los diversos objetos para facilitar la construcción de My $ WF = clase :: flujo de trabajo-> nuevo; # (aún puede crear los objetos del estado, la transición y la instancia manualmente). # Crear un estado y configurar las transiciones que puede realizar $ WF-> estado (NOMBRE => "NUEVO", TRANSITIONS => ,); # configurarlo como el estado inicial $ wf-> inicial_state ("nuevo"); # Crear algunos estados más $ WF-> Estado (nombre => "Abrir", transiciones => ,); $ wf-> estado (nombre => "rechazado",); # Transiciones Mueve las instancias del estado a otro # Crear la transición llamada "Rechazar" # El estado "nuevo" se refiere a esta transición #, el estado "rechazado" es el estado objetivo $ WF-> Transition (Name => "Rechazar", to_state => "rechazado",); # Crear una transición llamada "Aceptar", # Esta transición toma un valor del contexto (que contiene el usuario de actuación actual) # El contexto se usa para establecer el propietario actual para el error $ WF-> Transition (Name => "Aceptar ", to_state =>" abierto ", cuerpo => sub {my ($ ($ transición, $ instancia, $ contexto) = @_; devolución (propietario => $ contexto-> usuario, # Asignar al uso que lo aceptó); },); # Los ganchos se trigicitan cada vez que se ingresa un estado. No pueden cambiar la instancia # Este gancho llama un método hipotético en el objeto del remitente $ WF-> Estado ("Rechazo") -> Add_Hook (Sub {My ($ State, $ instancia) = @_; $ instancia-> Submisor- > Notificar ("Su artículo ha sido rechazado");}); # El resto de la definición del flujo de trabajo se omite para la brevedad # Finalmente, use este flujo de trabajo en la acción que maneja la creación de errores sub New_Bug {My ($ Submitter,% Params) = @_; Devuelva $ WF-> New_Instance (Submittion => $ Submitter,% Params,); } Requisitos: · Perl


Clase :: Flujo de trabajo Software relacionado