connect('DBI:mysql:spa_pbld2017winter:localhost', 'spadb_user','Alseides81', { PrintError => 0}) || die $DBI::errstr; my $path="../../"; my $title="SPA/AAP Pediatric Anesthesiology 2017 Request for PBLD Submissions"; my $header = $title; my %States; my $Current_Screen; my @array; my $word_count; my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime(); my $month = $mon + 1; $year = $year + 1900; %States = ( 'Default' => \&SPAPBLDSUBMIT::front_page, 'Continue' => \&SPAPBLDSUBMIT::review_page, 'Submit PBLD' => \&SPAPBLDSUBMIT::update_data ); $Current_Screen = param("Submit") || "Default"; die "No screen for $Current_Screen" unless $States{$Current_Screen}; !> #include ../../includes/wp-spa-header.iphtml ($screen_name eq $Current_Screen); } print end_form(); sub front_page { my $active = shift; return unless $active; !>

Submission Deadline July 5, 2016, 10 AM EDT

You are invited to submit a Problem Based Learning Discussion (PBLD) for consideration for presentation at SPA/AAP Pediatric Anesthesiology 2017.

Submissions may be a case or problem that is real or fictitious, and could describe issues related to clinical anesthesia, resident education, medical ethics, or professionalism. Reviewers will score submissions for interest, scientific accuracy, and clarity of thought and expression.

Two moderators must be named for each submission, and if accepted, both must agree to participate as moderators for the group discussion at the meeting. Ideally, though not necessarily, one moderator will be an experienced educator, and the other a junior faculty member or a fellow in-training. Senior moderators may not be included on more than TWO PBLD submissions.

Please remember that the goal of the PBLD is for the LEARNER to participate in discussing the management options, not for the MODERATOR to tell participants how he/she actually did the case.

An effective PBLD:

Many unusual cases are better suited to a Medically Challenging Case or Case Report/Scientific Abstract instead of a PBLD. Therefore, it is important for the author to demonstrate to the reviewers that the PBLD contains areas for discussion, such as different ways of managing clinical or other issues, depending on personal preference, institutional norms, or country of practice.

It is crucial that submissions are carefully proof read for grammatical errors and typos, as carelessly written PBLDs are often automatically rejected. It is also recommended that authors disguise the identity of any real patients by changing demographic details and circumstances of the clinical scenario so as to avoid potential HIPAAA violations.

For more information on how to create a great PBLD:
https://www.mededportal.org/publication/9371

Institutions/hospitals may submit multiple PBLDs, however, no more than TWO PBLD submissions from an institution/hospital will be accepted for presentation at the meeting.

The final deadline for receipt of submissions will be July 5, 2016, 10 AM EDT. No late submissions will be entertained.

Please have your PBLD materials ready to submit. The online form will not allow you to save your work to submit at a later date.

Unless noted otherwise, all of the following fields are required.

"current_date", -value=>$year . "-" . $month . "-". $mday); print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print "
Contact Information
Your First Name:
Your Last Name:
Your Title (MD, PhD, etc.):
Your Email Address:

PBLD Title:
The title should be informative and no more than 20 words.

Moderator Information
Two moderators who are willing and available to participate in the discussion at the meeting must be named along with their official designation, position, and institution.
Moderator 1
Full Name w/ Title:
Position:
Institution:
Moderator 2
Full Name w/ Title:
Position:
Institution:

Goals
Please identify three to five goals that the learners will be expected to know, do, or value following participation in the case discussion. Please include how your PBLD might change the practice(s) of your learners.


Description
Include a short, informative description of the main elements of your case or problem to be discussed in 1000 words or less. Highlight any enigmatic features that make your submission interesting. The case or problem can be real or fictitious, and could describe issues relating to clinical anesthesia, resident education, medical ethics, or professionalism. The goal here is to provide enough information for reviewers in order for them to be able to score your submission accurately for interest, scientific accuracy, and clarity of thought and expression.


Prior Presentation
If this PBLD was not presented at a prior meeting, please do not check any of the following boxes.

You may make multiple selections. If you check \"other\", please enter information in the provided box.
SPA
ASA
other:

References
Provide up to five key references for reviewers and learners that support your case discussion or problem.


"; print p(to_page("Continue")); print "
"; } sub review_page { my $active = shift; return unless $active; my @missing; my @array; my $word_count; my $invalidDATA; print hidden(-name=>'fname'); print hidden(-name=>'lname'); print hidden(-name=>'title'); print hidden(-name=>'email'); print hidden(-name=>'pbldtitle'); print hidden(-name=>'mod1name'); print hidden(-name=>'mod1position'); print hidden(-name=>'mod1inst'); print hidden(-name=>'mod2name'); print hidden(-name=>'mod2position'); print hidden(-name=>'mod2inst'); print hidden(-name=>'goals'); print hidden(-name=>'description'); print hidden(-name=>'reference'); if (!param('fname')) { push @missing, "Missing Your First Name" }; if (!param('lname')) { push @missing, "Missing Your Last Name" }; if (!param('title')) { push @missing, "Missing Your Title" }; if (!param('email')) { push @missing, "Missing Your Email" }; if (!(param('email') =~ /\w@\w/)) { push @missing, "Email entered does not appear to be a valid email address" }; if (!param('pbldtitle')) { push @missing, "Missing PBLD Title" }; @array = split(/ /, param('pbldtitle')); $word_count = @array; if ($word_count > 20) { push @missing, "PBLD Title must be 20 words or less. You currently have $word_count words." }; if (!param('mod1name')) { push @missing, "Missing Moderator 1 Name" }; if (!param('mod1position')) { push @missing, "Missing Moderator 1 Position" }; if (!param('mod1inst')) { push @missing, "Missing Moderator 1 Institution" }; if (!param('mod2name')) { push @missing, "Missing Moderator 2 Name" }; if (!param('mod2position')) { push @missing, "Missing Moderator 2 Position" }; if (!param('mod2inst')) { push @missing, "Missing Moderator 2 Institution" }; if (!param('goals')) { push @missing, "Missing PBLD Goals" }; if (!param('description')) { push @missing, "Missing PBLD Description" }; @array = split(/ /, param('description')); $word_count = @array; if ($word_count > 1000) { push @missing, "PBLD Description must be 1000 words or less. You currently have $word_count words." }; if (!param('reference')) { push @missing, "Missing PBLD References" }; if ((param('prior') eq "other") and !param('priorother')) { push @missing, "Missing Prior Presentation description (\"other\" selected)" }; if (@missing) { $invalidDATA = join "
", @missing; print p({align=>'center'},"There was an error submitting your PBLD request:"); print p({align=>'center'},"$invalidDATA"); print p({align=>'center'},"Please use your browser's \"back\" button and correct this information."); } else { print p({-align=>'center'},"Verify PBLD Request"); print p(""); print p({-align=>'center'},"Please review your PBLD request. If the information is correct, click the \"Submit PBLD\" button, otherwise click the \"Back\" button to correct this information."); !> "; print "
   
Your Name: &")!> &")!>, &")!>
Your Email: &")!>

PBLD Title: &")!>

Moderators
Moderator 1 Name: &")!>
Moderator 1 Position: &")!>
Moderator 1 Institution: &")!>
Moderator 2 Name: &")!>
Moderator 2 Position: &")!>
Moderator 2 Institution: &")!>

Goals
&")!>

Description
&")!>

Prior Presentation: &").", "; } else { $priorbuffer .= encode_entities(param('priorother'), "<>&").", "; } } $priorbuffer =~ s/, $//; } else { $priorbuffer = "none"; } print $priorbuffer; print hidden(-name=>'priorpres', -value=>"$priorbuffer"); !>

References
&")!>
"; print p(to_page("Submit PBLD"), ""); print "
"; } } sub update_data { my $active = shift; return unless $active; my $rows; my $insertSQL = "INSERT INTO pbld (fname, lname, title, email, pbldtitle, mod1name, mod1position, mod1inst, mod2name, mod2position, mod2inst, goals, description, priorpres, reference, submitted) VALUES (" . $main::dbh->quote(param('fname')) . "," . $main::dbh->quote(param('lname')) . "," . $main::dbh->quote(param('title')) . "," . $main::dbh->quote(param('email')) . "," . $main::dbh->quote(param('pbldtitle')) . "," . $main::dbh->quote(param('mod1name')) . "," . $main::dbh->quote(param('mod1position')) . "," . $main::dbh->quote(param('mod1inst')) . "," . $main::dbh->quote(param('mod2name')) . "," . $main::dbh->quote(param('mod2position')) . "," . $main::dbh->quote(param('mod2inst')) . "," . $main::dbh->quote(param('goals')) . "," . $main::dbh->quote(param('description')) . "," . $main::dbh->quote(param('priorpres')) . "," . $main::dbh->quote(param('reference')) . ",CURDATE())"; print p({align=>'center'},"PBLD Request Submission"); $main::dbh->do(qq{LOCK TABLES pbld WRITE}); $rows = $main::dbh->do(qq{$insertSQL}); $rows += 0; if (!$rows) { print p({align=>'center'},"We're sorry, unable to sublit your PBLD request at this time. Please try again later."); } else { print p({align=>'center'},"Thank you. Your PBLD request was submitted successfully."); } $main::dbh->do(qq{UNLOCK TABLES}); } sub to_page { submit(-NAME => "Submit", -VALUE => shift) } !> #include ../../includes/wp-spa-footer.iphtml