#!/usr/bin/perl # # $Id: qframes.pl,v 1.3 2006/01/23 21:39:30 ddoughty Exp $ # # Source File: qframes.pl # Get config require 'sitecfg.pl'; require 'testlib.pl'; &app_initialize; print "Content-Type: text/html\n\n"; if (&get_session($FORM{'tid'})) { &get_test_profile($SESSION{'clid'}, $FORM{'tstid'}); &show_template("qdefframe"); }