function pop21()
{
var s;
var s1;
var ss;
var sss;
var ssc;
var num2;
var hsil;
if  ((document.pph21.T2.value < "1")) 
{
 window.confirm ("Isi Kode Instalasi !! Periksa, tidak boleh ada spasi didepan angka pertama!!!") ;}
else 
{
ss = document.pph21.T2.value ;
s = ss.substr(0,1) + ss.substr(5,1) + ss.substr(7,1);
s1 =  ss.substr(9,1);
num2 = parseInt(s1);
	if (num2 == 0 )
		{ num2 = 1 ;}
num2 = num2 - 1 ;		
sss = ss.substr(num2,1) ;
var num1 = Math.floor(Math.random()* 9) + 1 ;
sss = sss + num1 ;
s1 =  ss.substr(7,1);
num2 = parseInt(s1);
	if (num2 == 0 )
		{ num2 = 9 ;}
num2 = num2 - 1 ;	
ssc = ss.substr(num2,1) ;
hsil = sss + s + ssc ;
regt = ">Reg:" + sss + s + ssc;
regmail = document.pph21.T1.value ;
lnkv="valemrg.php?em="+regmail+"&r1="+regt+"&kt=Noreg:PPh21";
var xcrx = window.open(lnkv,"nself","width=300,height=300,resizable=no,scrollbars=no,status=no");  
}
}