Add Simulation Test Success Condition

<%perl> my $sql="select id,name,purpose from st_defs where id=?"; my $sth=$dbh->prepare($sql); $sth->execute($ARGS{id}); my $row=$sth->fetchrow_hashref(); Name Purpose <% $row->{purpose} %> Success Conditions <%perl> # List existing success conditions. $sql="SELECT st_defs.id, st_success_conditions.id, st_success_conditions.st_def_id, st_success_conditions.success_condition, st_success_conditions.information FROM st_success_conditions Inner Join st_defs ON st_success_conditions.st_def_id = st_defs.id WHERE st_defs.id=$ARGS{id} AND st_success_conditions.deleted=0"; $sth=$dbh->prepare($sql); $sth->execute(); while(my $row=$sth->fetchrow_hashref()){ print ""; print ""; print ""; print ""; print ""; } Success Condition Information "; print "{id}\" /> "; print " "; print $row->{success_condition}; print " "; print $row->{information}; if($row->{information} eq ""){ print " "; } print " SC Info

Note: Modify for success conditions is not currently unavailable.

<& default-footer.mas &>