@auto[]

#####################################################################
# 
#
@initMain[]
$prog[^DATA.getProgram[$form:program;$DATA.downloadFields]]

# Увеличиваем количество закачек
^DATA.touchProg[$prog.PID;downloads]

$pageTitle[$prog.Program_Name download on $pageTitle]

#####################################################################
# 
#
@bodyMain[]

<H2>Downloading ${prog.Program_Name}...</H2>
<IMG src="$ROOT/pics/line1.gif" width="548" height="4" vspace=2><br> <br>

The download process should start in a few seconds, if it doesn't, click
<B><A href="$prog.Primary_Download_URL">here</A></B>...

<SCRIPT language="JavaScript">

setTimeout("downloadFile()", 5000);

function downloadFile(){
	document.location = '$prog.Primary_Download_URL';
}
</SCRIPT>