Klasse :: Workflow Lichtgewicht workflowsysteem.
Download nu

Klasse :: Workflow Rangschikking & Samenvatting

Klasse :: Workflow Tags

Perl-module perl klas workflow werkstroomsysteem

Klasse :: Workflow Beschrijving

Lichtgewicht workflowsysteem. Klasse :: Workflow is een lichtgewicht workflowsysteem. Synopsis Gebruik Klasse :: Workflow; # ***** OPMERKING ****** # # Dit is een vrij lang en saai voorbeeld # # U wilt waarschijnlijk een flitsende flash-video's zien, dus kijk in zie ook # Eerste ;-) # # **** ************* # Een workflow-object helpt u bij het maken van staat / overgangsobjecten # Hiermee kunt u symbolische namen toewijzen aan de verschillende objecten om de constructie te vergemakkelijken Mijn $ WF = Klasse :: Werkstroom-> Nieuw; # (U kunt nog steeds de staat, overgangs- en instantieobjecten maken.) # Maak een status en stel de overgangen in die het kan uitvoeren van $ WF-> Staat (NAME => "NIEUWE", overgangen => ,); # Zet het als de initiële status $ WF-> initial_state ("nieuw"); # Maak nog een paar staten $ WF-> Status (naam => "open", overgangen => ,); $ WF-> Staat (naam => "Afgewezen",); # Overgangen verplaatsen exemplaren van status naar state # Creëer de overgang met de naam "weigeren" # De staat "NIEUWE" verwijst naar deze overgang # De status "afgewezen" is de doelstaat $ WF-> Transitie (naam => "weigeren", to_state => "afgewezen",); # Maak een overgang met de naam "Accepteren", # Deze overgang neemt een waarde uit de context (die de huidige acteergebruiker bevat) # De context wordt gebruikt om de huidige eigenaar in te stellen voor de BUG $ WF-> Transitie (naam => "Accepteren ", to_state =>" geopend ", lichaam => sub {mijn ($ transitie, $ exemplaar, $ context) = @_; Return (Eigenaar => $ context-> Gebruiker, # Wijs toe aan het gebruik van het gebruik); },); # haken zijn geactiveerd wanneer een staat wordt ingevoerd. Ze kunnen de instance # niet wijzigen # Deze haak noemt een hypothetische methode op de subminderobject $ WF-> Staat ("weigeren") -> Add_hook (sub {My ($ State, $ exemplaar) = @_; $ exemplaar-> submitted > Melding ("Uw artikel is geweigerd");}); # De rest van de workflowdefinitie wordt weggelaten voor beknoptheid # Eindelijk, gebruik deze workflow in de actie die betrekking heeft op het maken van bug Creation Sub New_bug {My ($ Submitter,% params) = @_; Retourneer $ WF-> NEW_INSTANTIE (indiener => $ indiener,% params,); } Vereisten: · Perl

Klasse :: Workflow Gerelateerde software