Question: 001:0> use Clinical::Encounter::Section::MarAdministrationDetails; Compile error: Global symbol $stop_bag_map requires explicit package name (did you forget to declare my $stop_bag_map?) at /home/adsingh/adsingh-preprod/prod/perllib/Athena/Clinical/Encounter/Section/MarAdministrationDetails.pm line 120. Compilation failed
001:0> use Clinical::Encounter::Section::MarAdministrationDetails; Compile error: Global symbol "$stop_bag_map" requires explicit package name (did you forget to declare "my $stop_bag_map"?) at /home/adsingh/adsingh-preprod/prod/perllib/Athena/Clinical/Encounter/Section/MarAdministrationDetails.pm line 120. Compilation failed in require at (eval 1533) line 5. BEGIN failed--compilation aborted at (eval 1533) line 5. if($order->{processedEvents}) { $html_summary .= ""; my $stop_bag_map; for my $stop_event (@{$order->{processedEvents}->{STOP_BAG}}) { my $add_bag_id = $stop_event->{addBagEventId}; $stop_bag_map{$add_bag_id} = $stop_event; } for my $event (@{$order->{processedEvents}->{ADD_BAG}}, @{$order->{processedEvents}->{ADMINISTER}}, @{$order->{processedEvents}->{PUSH}}) { $html_summary .= $self->GenerateAdministrationEventHTML({EVENT => $event, STOP_BAG_MAP => $stop_bag_map, DEPARTMENT_ID => $department_id}); } }
Step by Step Solution
There are 3 Steps involved in it
1 Expert Approved Answer
Step: 1 Unlock
Question Has Been Solved by an Expert!
Get step-by-step solutions from verified subject matter experts
Step: 2 Unlock
Step: 3 Unlock
