package App::Office::Contacts::Donations::Controller::Initialize; use parent 'App::Office::Contacts::Donations::Controller'; use strict; use warnings; # We don't use Moose because we isa CGI::Application. our $VERSION = '1.10'; # ----------------------------------------------- sub build_head_js { my($self, $search_js) = @_; $self -> log(debug => 'Entered build_head_js'); my($add_organization_js) = $self -> param('view') -> organization -> build_add_organization_js; my($add_person_js) = $self -> param('view') -> person -> build_add_person_js; my($detail_js) = $self -> param('view') -> build_display_detail_js; my($organization_donations_js) = $self -> param('view') -> donations -> build_donations_js('organization'); my($person_donations_js) = $self -> param('view') -> donations -> build_donations_js('person'); my($organization_notes_js) = $self -> param('view') -> notes -> build_notes_js('organization'); my($person_notes_js) = $self -> param('view') -> notes -> build_notes_js('person'); my($report_js) = $self -> param('view') -> report -> build_update_report_js; my($update_organization_js) = $self -> param('view') -> organization -> build_update_organization_js; my($update_person_js) = $self -> param('view') -> person -> build_update_person_js; # These things are being declared globally within the web page. my($head_js) = < log(debug => 'Entered display'); return 'Invalid cookie digest' if ($self -> validate_post($cookie_name) == 0); $self -> generate_cookie($cookie_name); return $self -> build_web_page; } # End of display. # ----------------------------------------------- 1;