ClearAll["Global`*"]
ClearAll["qPanel*"]
Get[FileNameJoin[{NotebookDirectory[],"SymbolicExams.m"}]];
expr=Column[{readTitle[,"POG230, Sept 2015", "Dr. Rubenson"],qPanelExpr2[1,11,-12,11,-10,12,-12,-15,-16,"",False],
qPanel6[2,31.50, 3, "expense time the number of months", False],
qPanel8[3,18, -11,False],
qPanel5[4,500,221,135,250,25,60, 140,75,300,10,False],
qPanel18[5,2,5,False],
qPanel7[6,120,5.5,3.49,4,2.10,6.5,1.2, 20,3.88,4,48, 3.99, 12, 4, 1.59, 7, 2.15,10.50,"", False],
qPanelExpr4[7,5,11,2,9,"", False],
qPanelExpr1[8,10,4,7,9, "",False]
}];
CDFDeploy[ToFileName[{$UserDocumentsDirectory},"POG230_INTEGERS_PRAC.cdf"],expr,
"Method"->"Standalone"];

ClearAll["Global`*"]
ClearAll["qPanel*"]
Get[FileNameJoin[{NotebookDirectory[],"Symbexv2POG230.m"}]];
expr=Column[{readTitle[,"POG230, Sept 2015", "Dr. Rubenson"],qPanel2[1,False],
qPanel1[2,False],
qPanel3[3,False],
qPanel4[4,False],
qPanel5[5,False],
qPanel6[6,False]
}];
CDFDeploy[ToFileName[{$UserDocumentsDirectory},"POG230_PROB_PRAC.cdf"],expr,
"Method"->"Standalone"];

ClearAll["Global`*"]
ClearAll["qPanel*"]
Get[FileNameJoin[{NotebookDirectory[],"SymbolicExams.m"}]];
expr=Column[{readTitle[,"POG230, Sept 2015", "Dr. Rubenson"],qPanel9[1,1000*RandomInteger[{25,54}],3.5,False],
qPanel10[2,425,85,False],
qPanel11[3, 14, 15.50,False],
qPanel12[4,40,25,False],
qPanel13[5,350,20,False],
qPanel14[6,199,99,False],
qPanel15[7,200,25,False],
qPanel16[8,69,20,10,2,False]

}];
CDFDeploy[ToFileName[{$UserDocumentsDirectory},"POG230_PERCENTS_PRAC.cdf"],expr,
"Method"->"Standalone"];

ClearAll["Global`*"]
ClearAll["qPanel*"]
Get[FileNameJoin[{NotebookDirectory[],"SymbolicExams.m"}]];
expr=Column[{readTitle[,"POG230, Sept 2015", "Dr. Rubenson"],qPlotLine3[1,3,-2,12,False],
qPlotLine4[2,2,3,6,False],
qPlotLineSlope1[3,RandomInteger[{1,10}],-3,5/4,False],
qPlotLine2Points1[4, -3,5,4,4,False],
qPlotLineMXB1[5,0.5, 2,False],
qPanel17[6,2,False]

}];
CDFDeploy[ToFileName[{$UserDocumentsDirectory},"POG230_LINES_PRAC.cdf"],expr,
"Method"->"Standalone"];