Keyword = new Object();
 Address = new Object();
 Data = new Object();
 Keyword[0] = 108

 Keyword[1] = "Счет № Р1182"
 Address[1] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[1] = "Дата отгрузки: 22.08.2017"

 Keyword[2] = "Счет № Р1230"
 Address[2] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[2] = "Дата отгрузки: 07.08.2017"
 
 Keyword[3] = "Счет № Р1297"
 Address[3] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[3] = "Дата отгрузки: 10.08.2017"

 Keyword[4] = "Счет № Р1104"
 Address[4] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[4] = "Дата отгрузки: 31.08.2017"
 
 Keyword[5] = "Счет № Р1266"
 Address[5] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[5] = "Дата отгрузки: 02.08.2017"
 
 Keyword[6] = "Счет № Р1298"
 Address[6] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[6] = "Дата отгрузки: 07.08.2017"
 
 Keyword[7] = "Счет № Р1303"
 Address[7] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[7] = "Дата отгрузки: 10.08.2017"
 
 Keyword[8] = "Счет № Р1326"
 Address[8] = "Статус: Оплачен. Отгружен. Байкал-Сервис."
 Data[8] = "Дата отгрузки: 02.08.2017"
  
 Keyword[9] = "Счет № Р1276"
 Address[9] = "Статус: Оплачен. Не отгружен."
 Data[9] = "Дата отгрузки: 11.08.2017"

 Keyword[10] = "Счет № Р1314"
 Address[10] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[10] = "Дата отгрузки: 15.08.2017"
 
 Keyword[11] = "Счет № Р1319"
 Address[11] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[11] = "Дата отгрузки: 02.08.2017"
  
 Keyword[12] = "Счет № Р1325"
 Address[12] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[12] = "Дата отгрузки: 23.08.2017"
 
 Keyword[13] = "Счет № Р1330"
 Address[13] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[13] = "Дата отгрузки:	11.08.2017"		
 
 Keyword[14] = "Счет № Р0974"
 Address[14] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[14] = "Дата отгрузки: 05.07.2017"
 
 Keyword[15] = "Счет № Р1215"
 Address[15] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[15] = "Дата отгрузки: 11.08.2017"
  
 Keyword[16] = "Счет № Р1344"
 Address[16] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[16] = "Дата отгрузки: 11.08.2017"

 Keyword[17] = "Счет № Р1336"
 Address[17] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[17] = "Дата отгрузки: 10.08.2017"
 
 Keyword[18] = "Счет № Р1144"
 Address[18] = "Статус: Оплачен. Отгружен. Возовоз."
 Data[18] = "Дата отгрузки: 15.08.2017"
 
 Keyword[19] = "Счет № Р1173"
 Address[19] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[19] = "Дата отгрузки: 10.08.2017"
 
 Keyword[20] = "Счет № Р1038"
 Address[20] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[20] = "Дата отгрузки: 10.07.2017"
 
 Keyword[21] = "Счет № Р01050"
 Address[21] = "Статус: Оплачен. Отгружен. ПЭК."
 Data[21] = "Дата отгрузки: 07.07.2017"
 
 Keyword[22] = "Счет № Р1361"
 Address[22] = "Статус: Оплачен.  Отгружен. ПЭК."
 Data[22] = "Дата отгрузки: 22.08.2017"
 
 Keyword[23] = "Счет № Р0992"
 Address[23] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[23] = "Дата отгрузки: 07.07.2017"
 
 Keyword[24] = "Счет № Р1096"
 Address[24] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[24] = "Дата отгрузки: 11.08.2017"
 
 Keyword[25] = "Счет № Р1174"
 Address[25] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[25] = "Дата отгрузки: 21.08.2017"
 
 Keyword[26] = "Счет № Р1353"
 Address[26] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[26] = "Дата отгрузки: 21.08.2017"
 
 Keyword[27] = "Счет № Р0925"
 Address[27] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[27] = "Дата отгрузки: 07.07.2017"
 
 Keyword[28] = "Счет № Р01079"
 Address[28] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[28] = "Дата отгрузки: 10.07.2017"
 
 Keyword[29] = "Счет № Р0970"
 Address[29] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[29] = "Дата отгрузки: 06.07.2017"
 
 Keyword[30] = "Счет № Р1069"
 Address[30] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[30] = "Дата отгрузки: 13.07.2017"
 
 Keyword[31] = "Счет № Р1087"
 Address[31] = "Статус: Оплачен. Отгружен. Байкал-Сервис."
 Data[31] = "Дата отгрузки: 06.07.2017"
 
 Keyword[32] = "Счет № Р1088"
 Address[32] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[32] = "Дата отгрузки: 04.07.2017"
 
 Keyword[33] = "Счет № Р1093"
 Address[33] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[33] = "Дата отгрузки: 07.07.2017"
 
 Keyword[34] = "Счет № Р1077"
 Address[34] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[34] = "Дата отгрузки: 05.07.2017"
 
 Keyword[35] = "Счет № Р1081"
 Address[35] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[35] = "Дата отгрузки: 11.07.2017"

 Keyword[36] = "Счет № Р1084"
 Address[36] = "Статус: Оплачен. Отгружен. КИТ."
 Data[36] = "Дата отгрузки: 21.07.2017"

 Keyword[37] = "Счет № Р1091"
 Address[37] = "Статус: Оплачен. Отгружен. Байкал-Сервис."
 Data[37] = "Дата отгрузки: 11.07.2017"

 Keyword[38] = "Счет № Р1102"
 Address[38] = "Статус: Оплачен."
 Data[38] = "Дата отгрузки: 10.07.2017"
 
 Keyword[39] = "Счет № Р0523"
 Address[39] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[39] = "Дата отгрузки: 06.07.2017"

 Keyword[40] = "Счет № Р1108"
 Address[40] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[40] = "Дата отгрузки: 11.07.2017"

 Keyword[41] = "Счет № Р1112"
 Address[41] = "Статус: Оплачен."
 Data[41] = "Дата отгрузки: 18.07.2017"

 Keyword[42] = "Счет № Р1118"
 Address[42] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[42] = "Дата отгрузки: 24.07.2017"

 Keyword[43] = "Счет № Р1141"
 Address[43] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[43] = "Дата отгрузки: 11.07.2017"

 Keyword[44] = "Счет № Р1129"
 Address[44] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[44] = "Дата отгрузки: 12.07.2017"

 Keyword[45] = "Счет № Р1160"
 Address[45] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[45] = "Дата отгрузки: 17.07.2017"

 Keyword[46] = "Счет № Р1147"
 Address[46] = "Статус: Отгружен. ПЭК."
 Data[46] = "Дата отгрузки: 25.07.2017"

 Keyword[47] = "Счет № Р1210"
 Address[47] = "Статус: Оплачен."
 Data[47] = "Дата отгрузки: 28.07.2017"

 Keyword[48] = "Счет № Р1171"
 Address[48] = "Статус: Оплачен. Отгружен. ПЭК."
 Data[48] = "Дата отгрузки: 21.07.2017"

 Keyword[49] = "Счет № Р1195"
 Address[49] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[49] = "Дата отгрузки: 24.07.2017"

 Keyword[50] = "Счет № Р1227"
 Address[50] = "Статус: Отгружен. Деловые линии."
 Data[50] = "Дата отгрузки: 25.07.2017"

 Keyword[51] = "Счет № Р1285"
 Address[51] = "Статус: Оплачен. Отгружен. Байкал-Сервис."
 Data[51] = "Дата отгрузки: 15.08.2017"

 Keyword[52] = "Счет № Р1245"
 Address[52] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[52] = "Дата отгрузки: 24.07.2017"

 Keyword[53] = "Счет № Р1268"
 Address[53] = "Статус: Оплачен. Не отгружен."
 Data[53] = "Дата отгрузки: 31.07.2017"

 Keyword[54] = "Счет № Р1291"
 Address[54] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[54] = "Дата отгрузки: 24.08.2017"

 Keyword[55] = "Счет № Р1270"
 Address[55] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[55] = "Дата отгрузки: 24.07.2017"

 Keyword[56] = "Счет № Р1125"
 Address[56] = "Статус: Оплачен. Отгружен. Байкал-Сервис."
 Data[56] = "Дата отгрузки: 28.07.2017"

 Keyword[57] = "Счет № Р1383"
 Address[57] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[57] = "Дата отгрузки: 16.08.2017"

 Keyword[58] = "Счет № Р1313"
 Address[58] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[58] = "Дата отгрузки: 24.08.2017"

 Keyword[59] = "Счет № Р1264"
 Address[59] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[59] = "Дата отгрузки: 02.08.2017"

 Keyword[60] = "Счет № Р1372"
 Address[60] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[60] = "Дата отгрузки: 21.08.2017"

 Keyword[61] = "Счет № Р1167"
 Address[61] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[61] = "Дата отгрузки: 10.08.2017"

 Keyword[62] = "Счет № Р1397"
 Address[62] = "Статус: Оплачен. Отгружен. Байкал-Сервис."
 Data[62] = "Дата отгрузки: 16.08.2017"

 Keyword[63] = "Счет № Р1184"
 Address[63] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[63] = "Дата отгрузки: 02.08.2017"

 Keyword[64] = "Счет № Р1323"
 Address[64] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[64] = "Дата отгрузки: 16.08.2017"

 Keyword[65] = "Счет № Р1251"
 Address[65] = "Статус: Оплачен. Отгружен. Байкал-Сервис."
 Data[65] = "Дата отгрузки: 28.07.2017"
 
 Keyword[66] = "Счет № Р1370"
 Address[66] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[66] = "Дата отгрузки: 31.08.2017"

 Keyword[67] = "Счет № Р1179"
 Address[67] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[67] = "Дата отгрузки: 25.07.2017"

 Keyword[68] = "Счет № Р1275"
 Address[68] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[68] = "Дата отгрузки: 25.07.2017"

 Keyword[69] = "Счет № Р1355"
 Address[69] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[69] = "Дата отгрузки: 25.08.2017"

 Keyword[70] = "Счет № Р1408"
 Address[70] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[70] = "Дата отгрузки: 28.08.2017"

 Keyword[71] = "Счет № Р1289"
 Address[71] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[71] = "Дата отгрузки: 21.08.2017"

 Keyword[72] = "Счет № Р1309"
 Address[72] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[72] = "Дата отгрузки: 24.08.2017"

 Keyword[73] = "Счет № Р1414"
 Address[73] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[73] = "Дата отгрузки: 25.08.2017"

 Keyword[74] = "Счет № Р1110"
 Address[74] = "Статус: Отгружен. Отгружен. РАТЭК."
 Data[74] = "Дата отгрузки: 28.08.2017"

 Keyword[75] = "Счет № Р1427"
 Address[75] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[75] = "Дата отгрузки: 28.08.2017"

 Keyword[76] = "Счет № Р1418"
 Address[76] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[76] = "Дата отгрузки: 24.08.2017"

 Keyword[77] = "Счет № Р1437"
 Address[77] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[77] = "Дата отгрузки: 28.08.2017"

 Keyword[78] = "Счет № Р1435"
 Address[78] = "Статус: Оплачен. Не отгружен."
 Data[78] = "Дата отгрузки: 05.09.2017"

 Keyword[79] = "Счет № Р1279"
 Address[79] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[79] = "Дата отгрузки: 02.08.2017"

 Keyword[80] = "Счет № Р1304"
 Address[80] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[80] = "Дата отгрузки: 24.08.2017"

 Keyword[81] = "Счет № Р1352"
 Address[81] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[81] = "Дата отгрузки: 24.08.2017"

 Keyword[82] = "Счет № Р1441"
 Address[82] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[82] = "Дата отгрузки: 28.08.2017"

 Keyword[83] = "Счет № Р1274"
 Address[83] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[83] = "Дата отгрузки: 28.08.2017"

 Keyword[84] = "Счет № Р1442"
 Address[84] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[84] = "Дата отгрузки: 29.08.2017"

 Keyword[85] = "Счет № Р1382"
 Address[85] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[85] = "Дата отгрузки: 28.08.2017"

 Keyword[86] = "Счет № Р1410"
 Address[86] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[86] = "Дата отгрузки: 31.08.2017"

 Keyword[87] = "Счет № Р1449"
 Address[87] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[87] = "Дата отгрузки: 28.08.2017"

 Keyword[88] = "Счет № Р1436"
 Address[88] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[88] = "Дата отгрузки: 30.08.2017"

 Keyword[89] = "Счет № Р0942"
 Address[89] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[89] = "Дата отгрузки: 06.07.2017"

 Keyword[90] = "Счет № Р1434"
 Address[90] = "Статус: Оплачен. Не отгружен."
 Data[90] = "Дата отгрузки: 04.09.2017"

 Keyword[91] = "Счет № Р1471"
 Address[91] = "Статус: Оплачен. Не отгружен."
 Data[91] = "Дата отгрузки: 08.09.2017"

 Keyword[92] = "Счет № Р0963"
 Address[92] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[92] = "Дата отгрузки: 04.07.2017"

 Keyword[93] = "Счет № Р1501"
 Address[93] = "Статус: Оплачен. Отгружен. ПЭК."
 Data[93] = "Дата отгрузки: 31.08.2017"

 Keyword[94] = "Счет № Р1485"
 Address[94] = "Статус: Оплачен. Не отгружен."
 Data[94] = "Дата отгрузки: 12.09.2017"

 Keyword[95] = "Счет № Р1496"
 Address[95] = "Статус: Оплачен. Не отгружен."
 Data[95] = "Дата отгрузки: 06.09.2017"

 Keyword[96] = "Счет № Р0830"
 Address[96] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[96] = "Дата отгрузки: 14.06.2017"

 Keyword[97] = "Счет № Р0879"
 Address[97] = "Статус: Оплачен. Не отгружен."
 Data[97] = "Дата отгрузки: 14.06.2017"

 Keyword[98] = "Счет № Р0975"
 Address[98] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[98] = "Дата отгрузки: 30.06.2017"

 Keyword[99] = "Счет № Р0986"
 Address[99] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[99] = "Дата отгрузки: 09.06.2017"

 Keyword[100] = "Счет № Р0919"
 Address[100] = "Статус: Оплачен. Не отгружен."
 Data[100] = "Дата отгрузки: 22.06.2017"

 Keyword[101] = "Счет № Р0985"
 Address[101] = "Статус: Оплачен. Отгружен."
 Data[101] = "Дата отгрузки: 21.06.2017"

 Keyword[102] = "Счет № Р0996"
 Address[102] = "Статус: Оплачен. Отгружен. РАТЭК."
 Data[102] = "Дата отгрузки: 14.06.2017"

 Keyword[103] = "Счет № Р1002"
 Address[103] = "Статус: Оплачен. Отгружен."
 Data[103] = "Дата отгрузки: 21.06.2017"

 Keyword[104] = "Счет № Р1003"
 Address[104] = "Статус: Оплачен. Отгружен. Деловые линии."
 Data[104] = "Дата отгрузки: 05.07.2017"

 Keyword[105] = "Счет № Р1004"
 Address[105] = "Статус: Оплачен. Отгружен."
 Data[105] = "Дата отгрузки: 15.06.2017"

 Keyword[106] = "Счет № Р1005"
 Address[106] = "Статус: Оплачен. Отгружен."
 Data[106] = "Дата отгрузки: 21.06.2017"

 Keyword[107] = "Счет № Р1006"
 Address[107] = "Статус: Оплачен. Отгружен."
 Data[107] = "Дата отгрузки: 21.06.2017"

 Keyword[108] = "Счет № Р1013"
 Address[108] = "Статус: Оплачен. Не отгружен."
 Data[108] = "Дата отгрузки: 26.06.2017"



 function contains(sub,s){
 strlen1=sub.length
 strlen2=s.length
 istrue=false
 for(i=0;i<=strlen2;i++)
 {
 comp=s.substring(i-1,strlen2)
 comp=comp.substring(0,strlen1)
 if(comp==sub){
 istrue=true
 break  
    }   
   }
 return istrue
  }

 function dolt() {
 loopCount=0;
 var Found=false
 var Item=document.forms[0].sub.value.toLowerCase();
 
stats='toolbar=no,location=no,scrollbars=no,directories=no,status=no,menubar=no,height=180,width=600,top=300,left=300'
stats += 'scrollbars=yes,resizable=no'
MsgBox = window.open ("","msgWindow",stats) 
MsgBox.opener = window;
MsgBox.opener.name = "opener";
MsgBox.document.write("<head><title>Информация по счету №"+Item+"</title></head>");

 if(document.form1.sub.value=="")
 MsgBox.document.write('<h5><font face="Verdana,Arial,Helvetica" color="#1952A1">Счет №<HR></h5></font>');
 else
 MsgBox.document.write('<h5><p align="center"><font face="Verdana,Arial,Helvetica" color="#1952A1">Информация по счету № '+Item+'</h5></font>');
 for(var i=1; i<=Keyword[0]; i++){
 contains(Item,Keyword[i].toLowerCase())
 if(comp==Item){
 loopCount++;
 Found=true;
  MsgBox.document.write('<div align="center"><center><table border="0" width="500" cellspacing="2" cellpadding="3"><tr><td width="2%" bgcolor="#EDAF22" height="18"align="center"><font face="Verdana,Arial,Helvetica" size="3" color="#1952A1"><h5>'+loopCount+' </h5></font></td>    <td width="150%" bgcolor="#FFFFFF" height="18" align="left"><font color="#0099CC"></font><fontcolor="#0099CC"><font face="Verdana,Arial,Helvetica" size="2" color="#000000">'+Keyword[i]+'<BR>'+Address[i]+'<BR>'+Data[i]+'</A></font></h1></font><font color="#1952A1"></font></td></tr></table></center></div>')
  MsgBox.document.write('<script Language="JavaScript">window.status=("Total '+loopCount+' found")</'+'script'+'>');

     }
  }

if(!Found)
MsgBox.document.write('<p align="center"><font face="Verdana,Arial,Helvetica" size="2" color="#FF5050">Информация по этому счёту не найдена.</font>')
MsgBox.document.write('<p align="center"><font face="Verdana,Arial,Helvetica" size="2" color="#1952A1">Телефон (8352) 28-60-28, 44-16-08</font>')
MsgBox.document.write('<style><!--A:link{color: #1952A1; text-decoration:none} A:visited {color: #FF9950; text-decoration:none}--></style>')
if(loopCount==0){
MsgBox.document.write('<script Language="JavaScript">window.status=("Total 0 found")</'+'script'+'>');
      }
    }