<%init> # Provides a list of ST defs. Name & purpose are displayed with name being a hyperlink to the detailed ST def view. use DBI; our $dbh=$m->comp('mysql-connect-st.mas'); PS1-MOPS Testing System: View Simulation Test Definitions <& default-header.mas &>

<%perl> my $sql="select id,name,purpose from st_defs where deleted = 0"; my $sth=$dbh->prepare($sql); $sth->execute(); while(my $row=$sth->fetchrow_hashref()){ print ""; print ""; print ""; print ""; }

View Simulation Test Definitions

Name Purpose
{id}\" />{id}\">$row->{name}$row->{purpose}

<& default-footer.mas &>