/beta/bank/CheqMoeen.asp

http://github.com/khaneh/Orders · ASP · 486 lines · 419 code · 54 blank · 13 comment · 51 complexity · c7b9714dfd911680c735ef81667f25c2 MD5 · raw file 

    

  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="1256"%><%

    2. 

  2. 'Bank (10 [=A])

    3. 

  3. PageTitle= " "

    4. 

  4. SubmenuItem=6

    5. 

  5. if not Auth("A" , 6) then NotAllowdToViewThisPage()

    6. 

  6. 

    7. 

  7. %>

    8. 

  8. <!--#include file="top.asp" -->

    9. 

  9. <!--#include File="../include_farsiDateHandling.asp"-->

    10. 

  10. <!--#include File="../include_JS_InputMasks.asp"-->

    11. 

  11. <style>

    12. 

  12. 	.RcpTable { font-family:tahoma; font-size: 9pt; border:0; padding:0; }

    13. 

  13. 	.RcpMainTable { font-family:tahoma; font-size: 9pt; border:0; padding:0; background-color: #558855; text-align:right; direction: right-to-left;}

    14. 

  14. 	.RcpMainTableTH { background-color: #C3C300;}

    15. 

  15. 	.RcpMainTableTR { background-color: #CCCC88; border: 0; }

    16. 

  16. 	.RcpRowInput { font-family:tahoma; font-size: 9pt; border: none; background-color: #F0F0F0; text-align:right;}

    17. 

  17. 	.RcpRowInput2 { font-family:tahoma; font-size: 9pt; border: 1px solid black; background-color: #F0F0F0; text-align:right;}

    18. 

  18. 	.RcpHeadInput { font-family:tahoma; font-size: 9pt; border: none; background-color: #CCCC88; text-align:center;}

    19. 

  19. 	.RcpHeadInput2 { font-family:tahoma; font-size: 9pt; border: none; background-color: #AACC77; text-align:center;}

    20. 

  20. 	.RcpHeadInput3 { font-family:tahoma; font-size: 9pt; border: 1px solid black; background-color: #D0E0FF; text-align:right; direction: right-to-left;}

    21. 

  21. 	.RcpGenInput { font-family:tahoma; font-size: 9pt; border: none; text-align:right; direction: left-to-righ;}

    22. 

  22. 	.GenButton { font-family:tahoma; font-size: 9pt; border: 1px solid black; }

    23. 

  23. 	.CustGenTable  { font-family:tahoma; font-size: 9pt;}

    24. 

  24. 	.CustGenInput { font-family:tahoma; font-size: 9pt;}

    25. 

  25. </STYLE>

    26. 

  26. 

    27. 

  27. <%

    28. 

  28. '---------------------------------------------

    29. 

  29. '---------------------------- ShowErrorMessage

    30. 

  30. '---------------------------------------------

    31. 

  31. function ShowErrorMessage(msg)

    32. 

  32. 	response.write "<table align='center' cellpadding='5'><tr><td bgcolor='#FFCCCC' dir='rtl' align='center'>  ! <br>"& msg & "<br></td></tr></table><br>"

    33. 

  33. end function

    34. 

  34. 

    35. 

  35. 

    36. 

  36. '-----------------------------------------------------------------------------------------------------

    37. 

  37. '------------------------------------------------------------------------------------- Submit Transfer

    38. 

  38. '-----------------------------------------------------------------------------------------------------

    39. 

  39. if request("act")="submit" then

    40. 

  40. 	accountID = request.form("accountID")

    41. 

  41. 	accountName = request.form("accountName")

    42. 

  42. 	GLMemoDate = request.form("GLMemoDate")

    43. 

  43. 	'----- Check GL is closed

    44. 

  44. 	if (session("IsClosed")="True") then

    45. 

  45. 		Conn.close

    46. 

  46. 		response.redirect "?errMsg=" & Server.URLEncode("!             .")

    47. 

  47. 	end if 

    48. 

  48. 	'----

    49. 

  49. 	creationDate =shamsiToday()

    50. 

  50. 	CreationTime = currentTime10()

    51. 

  51. 

    52. 

  52. 	if GLMemoDate="" or not(isnumeric(accountID)) then 

    53. 

  53. 		call showAlert( "!     " , CONST_MSG_ERROR )

    54. 

  54. 		response.end

    55. 

  55. 	end if 

    56. 

  56. 

    57. 

  57. 	for cheques = 1 to request.form("ChequeNos").count 

    58. 

  58. 		Item		= request.form("Items")(cheques)

    59. 

  59. 		accTitle	= request.form("accTitles")(cheques)

    60. 

  60. 		ChequeNo	= request.form("ChequeNos")(cheques)

    61. 

  61. 		ChequeDate	= request.form("ChequeDates")(cheques)

    62. 

  62. 		Bank		= request.form("Banks")(cheques)

    63. 

  63. 		shobe		= request.form("shobe")(cheques)

    64. 

  64. 		jaari		= request.form("jaari")(cheques)

    65. 

  65. 		Description = request.form("Description")(cheques)

    66. 

  66. 		Amount		= text2value(request.form("Amounts")(cheques))

    67. 

  67. 

    68. 

  68. 		if ChequeNo="" or ChequeDate="" or Amount="0" or not(isnumeric(amount)) then 

    69. 

  69. 			call showAlert( "!     " , CONST_MSG_ERROR )

    70. 

  70. 			response.end

    71. 

  71. 		end if 

    72. 

  72. 	next

    73. 

  73. 

    74. 

  74. 	mySQL="SELECT ISNULL(MAX(GLDocID),0) AS LastMemo FROM GLDocs WHERE GL='"& OpenGL & "'"

    75. 

  75. 	Set RS1=conn.Execute (mySQL)

    76. 

  76. 	GLMemoNo = RS1("LastMemo") + 1

    77. 

  77. 

    78. 

  78. 	mySQL="INSERT INTO GLDocs (GL, GLDocID, GLDocDate, CreatedDate, createdBy,  IsTemporary) VALUES ("& OpenGL& " , "& GLMemoNo & ", N'"& GLMemoDate & "' , N'"& creationDate & "', "& session("id") & ", 1)"

    79. 

  79. 	conn.Execute(mySQL)

    80. 

  80. 

    81. 

  81. 	mySQL="SELECT max(ID) as GLDoc FROM GLDocs where GLDocID="& GLMemoNo

    82. 

  82. 	set RS1=conn.execute(mySQL)

    83. 

  83. 	GLDoc=RS1("GLDoc")

    84. 

  84. 

    85. 

  85. 	for cheques = 1 to request.form("ChequeNos").count 

    86. 

  86. 		Item		= request.form("Items")(cheques)

    87. 

  87. 		accTitle	= request.form("accTitles")(cheques)

    88. 

  88. 		ChequeNo	= request.form("ChequeNos")(cheques)

    89. 

  89. 		ChequeDate	= request.form("ChequeDates")(cheques)

    90. 

  90. 		Bank		= request.form("Banks")(cheques)

    91. 

  91. 		shobe		= request.form("shobe")(cheques)

    92. 

  92. 		jaari		= request.form("jaari")(cheques)

    93. 

  93. 		Description = request.form("Description")(cheques)

    94. 

  94. 		Amount		= text2value(request.form("Amounts")(cheques))

    95. 

  95. 		

    96. 

  96. 

    97. 

  97. 		if jaari<> "" then jaari=" " & jaari

    98. 

  98. 		if Bank = -1 then Bank = ""

    99. 

  99. 

    100. 

  100. 		theDescription = " " & ChequeNo & "  " & ChequeDate & " " & Bank & " " & shobe & " " & jaari & " " & Description

    101. 

  101. 

    102. 

  102. 		mySQL="INSERT INTO GLRows ( GLDoc, GLAccount,  Amount, Description, IsCredit, Ref1, Ref2) VALUES ( "& GLDoc & ", "& Item & ", "& Amount & ", N'"& theDescription & "', 1, N'"& ChequeNo &"', N'"& ChequeDate &"')"

    103. 

  103. 		conn.Execute(mySQL)

    104. 

  104. 

    105. 

  105. 		mySQL="INSERT INTO GLRows ( GLDoc, GLAccount,  Amount, Description, IsCredit, Ref1, Ref2) VALUES ( "& GLDoc & ", "& accountID & ", "& Amount & ", N'"& theDescription & " " & accTitle & "', 0, N'"& ChequeNo &"' , N'"& ChequeDate &"')"

    106. 

  106. 		conn.Execute(mySQL)

    107. 

  107. 	next

    108. 

  108. 

    109. 

  109. 	response.redirect "../accounting/GLMemoDocShow.asp?id="&GLDoc&"&msg=  "

    110. 

  110. 	'response.write replace(request.form,"&", "<br>")

    111. 

  111. 	response.end

    112. 

  112. 	

    113. 

  113. '-----------------------------------------------------------------------------------------------------

    114. 

  114. '---------------------------------------------------------------------------------------- Search Form

    115. 

  115. '-----------------------------------------------------------------------------------------------------

    116. 

  116. elseif request("act")="" then

    117. 

  117. %>

    118. 

  118. 	<BR><BR>

    119. 

  119. 	<input type="hidden" Name='tmpDlgArg' value=''>

    120. 

  120. 	<input type="hidden" Name='tmpDlgTxt' value=''>

    121. 

  121. 	<FORM METHOD=POST ACTION="?act=submit">

    122. 

  122. 		<table class="RcpMainTable" Cellspacing="1" Cellpadding="0" Width="690" align="center">

    123. 

  123. 			<tr class="RcpMainTableTH">

    124. 

  124. 			<TD colspan="10"><TABLE class="RcpTable" Border="0" Width="100%" Cellspacing="1" Cellpadding="0" Dir="RTL"><TR>

    125. 

  125. 				<TD align="left">:</TD>

    126. 

  126. 				<TD align="right" width="5">

    127. 

  127. 					<INPUT class="RcpGenInput" TYPE="text"  maxlength="5" size="5" tabIndex="1" dir="LTR" name="accountID" onKeyPress='return maskTop(this);' onBlur='checkTop(this);' >

    128. 

  128. 				</TD>

    129. 

  129. 				<TD align="right">

    130. 

  130. 					<INPUT TYPE="text" NAME="accountName" size=40 readonly  value="<%=accountName%>" style="background-color:transparent; border:0pt">

    131. 

  131. 				</TD>

    132. 

  132. 				<TD align="left">:</TD>

    133. 

  133. 				<TD><TABLE class="RcpTable">

    134. 

  134. 					<TR>

    135. 

  135. 						<TD dir="LTR">

    136. 

  136. 							<INPUT class="RcpGenInput" NAME="GLMemoDate" tabIndex="1" TYPE="text" maxlength="10" size="10" value="<%=shamsiToday()%>" onblur="acceptDate(this)">

    137. 

  137. 						</TD>

    138. 

  138. 						<TD dir="RTL">: <font color=white><%=weekdayname(weekday(date))%> <span dir=rtl><%=shamsiToday()%></span></font></TD>

    139. 

  139. 					</TR>

    140. 

  140. 					</TABLE></TD>

    141. 

  141. 			</TR></TABLE></TD>

    142. 

  142. 			</tr>

    143. 

  143. 			<tr class="RcpMainTableTR">

    144. 

  144. 			<TD colspan="10"><div>

    145. 

  145. 			<TABLE class="RcpTable" Cellspacing="1" Cellpadding="0" Dir="RTL" bgcolor="#558855">

    146. 

  146. 			<tr>

    147. 

  147. 				<td class="RcpHeadInput" align='center' width="25px"> # </td>

    148. 

  148. 				<td class="RcpHeadInput"><INPUT class="RcpHeadInput" readonly TYPE="text" value="" size="6" tabindex="9999"></td>

    149. 

  149. 				<td class="RcpHeadInput"><INPUT class="RcpHeadInput" readonly TYPE="text" value="" size="14" tabindex="9999"></td>

    150. 

  150. 				<td class="RcpHeadInput"><INPUT class="RcpHeadInput" readonly TYPE="text" value=" " size="10" tabindex="9999"></td>

    151. 

  151. 				<td class="RcpHeadInput"><INPUT class="RcpHeadInput" readonly TYPE="text" value=" " size="10" tabindex="9999"></td>

    152. 

  152. 				<td class="RcpHeadInput"><INPUT class="RcpHeadInput" readonly TYPE="text" Value="" size="8" tabindex="9999"></td>

    153. 

  153. 				<td class="RcpHeadInput"><INPUT class="RcpHeadInput" readonly TYPE="text" Value="" size="8" tabindex="9999"></td>

    154. 

  154. 				<td class="RcpHeadInput"><INPUT class="RcpHeadInput" readonly TYPE="text" Value="" size="8" tabindex="9999"></td>

    155. 

  155. 				<td class="RcpHeadInput"><INPUT class="RcpHeadInput" readonly TYPE="text" Value="" size="16" tabindex="9999" ></td>

    156. 

  156. 				<td class="RcpHeadInput"><INPUT class="RcpHeadInput" readonly TYPE="text" Value="" size="10" tabindex="9999" ></td>

    157. 

  157. 			</tr>

    158. 

  158. 			</TABLE></div></TD>

    159. 

  159. 			</TR>

    160. 

  160. 			<tr class="RcpMainTableTR">

    161. 

  161. 			<TD colspan="10" dir="RTL"><div style="overflow:auto; height:250px;width:690px;">

    162. 

  162. 

    163. 

  163. 			<TABLE class="RcpTable" Border="0" Cellspacing="1" Cellpadding="0" Dir="RTL" bgcolor="#558855">

    164. 

  164. 			<Tbody id="ChequeLines">

    165. 

  165. 			<%		

    166. 

  166. 			for i=1 to 1

    167. 

  167. 			%>

    168. 

  168. 			<tr bgcolor='#F0F0F0' onclick="currentRow=this.rowIndex;" >

    169. 

  169. 				<td align='center' width="25px"> <%=i%> </td>

    170. 

  170. 				<td dir="LTR"><INPUT class="RcpRowInput" TYPE="text" NAME="Items" maxlength="5" size="5" onKeyPress="return mask(this);" tabIndex="2"  onBlur='check(this);'></td>

    171. 

  171. 				<td dir="RTL"><INPUT class="RcpRowInput" TYPE="text" NAME="accTitles" size="14" onKeyPress="return mask(this);" tabIndex="9999" readonly></td>

    172. 

  172. 				<td dir="LTR"><INPUT class="RcpRowInput" TYPE="text" NAME="ChequeNos" size="10" onKeyPress="return mask(this);" tabIndex="2" ></td>

    173. 

  173. 				<td dir="LTR" ><INPUT class="RcpRowInput" TYPE="text" NAME="ChequeDates" maxlength="10" size="10"  onKeyPress="return maskDate(this);" onblur="acceptDate(this)" tabIndex="2"></td>

    174. 

  174. 				<td dir="RTL">

    175. 

  175. 					<select name="Banks" class=inputBut style="width:60; " tabIndex="2">

    176. 

  176. 					<option value="-"> </option>

    177. 

  177. 					<option value="-">---------------------------------</option>

    178. 

  178. 						<option value="">  </option>

    179. 

  179. 						<option value="">  </option>

    180. 

  180. 						<option value="">  </option>

    181. 

  181. 						<option value="Ӂ"> Ӂ </option>

    182. 

  182. 						<option value="">  </option>

    183. 

  183. 						<option value="">  </option>

    184. 

  184. 						<option value="">  </option>

    185. 

  185. 						<option value="">  </option>

    186. 

  186. 						<option value="">  </option>

    187. 

  187. 						<option value="">  </option>

    188. 

  188. 						<option value="">  </option>

    189. 

  189. 						<option value="">  </option>

    190. 

  190. 					</select>

    191. 

  191. 				

    192. 

  192. 				</td>

    193. 

  193. 				<td dir="RTL"><INPUT class="RcpRowInput" TYPE="text" NAME="shobe" size="8" tabIndex="2"></td>

    194. 

  194. 				<td dir="RTL"><INPUT class="RcpRowInput" TYPE="text" NAME="jaari" size="8" tabIndex="2"></td>

    195. 

  195. 				<td dir="RTL"><INPUT class="RcpRowInput" TYPE="text" NAME="Description" size="16" tabIndex="2"></td>

    196. 

  196. 				<td dir="LTR"><INPUT class="RcpRowInput" TYPE="text" NAME="Amounts" size="10" onKeyPress="return mask(this);" onBlur="setPrice(this);" tabIndex="2"></td>

    197. 

  197. 			</tr>

    198. 

  198. 			<%

    199. 

  199. 			next

    200. 

  200. 			%>

    201. 

  201. 			<tr bgcolor='#F0F0F0' onclick="currentRow=this.rowIndex;" >

    202. 

  202. 				<td colspan="15">

    203. 

  203. 					<INPUT class="RcpGenInput" TYPE="button" value="" onkeyDown="if(event.keyCode==9) return false;" tabIndex="3" onClick="addRow(this.parentNode.parentNode.rowIndex);">

    204. 

  204. 				</td>

    205. 

  205. 			</tr>

    206. 

  206. 			</Tbody></TABLE></div>

    207. 

  207. 			<div ALIGN=LEFT>

    208. 

  208. 			<TABLE Border="1" Cellspacing="1" Cellpadding="0" Dir="RTL">

    209. 

  209. 			<tr>

    210. 

  210. 				<td  class="RcpHeadInput" align='center' > 

    211. 

  211. 				</td>

    212. 

  212. 				<td class="RcpHeadInput" align='center' width="25px"> </td>

    213. 

  213. 				<td class="RcpHeadInput"><INPUT class="RcpHeadInput" readonly TYPE="text" Value=":" size="10" tabindex="9999"></td>

    214. 

  214. 				<td class="RcpHeadInput"><INPUT class="RcpHeadInput3" readonly dir="LTR" TYPE="text" Name="TotalAmount"  size="15" tabindex="9999"></td>

    215. 

  215. 			</tr>

    216. 

  216. 			</TABLE></div></TD>

    217. 

  217. 			</TR>

    218. 

  218. 		</table><br><CENTER>

    219. 

  219. 		<TABLE class="RcpTable" Border="0" Cellspacing="5" Cellpadding="1" Dir="RTL">

    220. 

  220. 		<tr>

    221. 

  221. 			<td align='center' bgcolor="#000000"><INPUT class="RcpGenInput" style="text-align:center" TYPE="button" value="" onclick="if (document.getElementsByName('TotalAmount')[0].value!='0') CheckAndSubmit();"></td>

    222. 

  222. 			<td align='center' bgcolor="#000000"><INPUT class="RcpGenInput" style="text-align:center" TYPE="button" value="" onclick="document.close();"></td>

    223. 

  223. 		</tr>

    224. 

  224. 		</TABLE></CENTER>

    225. 

  225. 	</FORM>

    226. 

  226. <SCRIPT LANGUAGE="JavaScript">

    227. 

  227. <!--

    228. 

  228. document.all.accountID.focus();

    229. 

  229. 

    230. 

  230. var dialogActive=false;

    231. 

  231. 

    232. 

  232. //===================================================

    233. 

  233. function maskTop(src){ 

    234. 

  234. 	var theKey=event.keyCode;

    235. 

  235. 

    236. 

  236. 	if (theKey==13){

    237. 

  237. 		event.keyCode=9

    238. 

  238. 		dialogActive=true

    239. 

  239. 		document.all.tmpDlgArg.value="#"

    240. 

  240. 		document.all.tmpDlgTxt.value="     :"

    241. 

  241. 		var myTinyWindow = window.showModalDialog('../dialog_GenInput.asp',document.all.tmpDlgTxt,'dialogHeight:200px; dialogWidth:440px; dialogTop:; dialogLeft:; edge:None; center:Yes; help:No; resizable:No; status:No;');

    242. 

  242. 		if (document.all.tmpDlgTxt.value !="") {

    243. 

  243. 			var myTinyWindow = window.showModalDialog('../accounting/dialog_selectGL.asp?act=select&name='+escape(document.all.tmpDlgTxt.value),document.all.tmpDlgArg,'dialogHeight:500px; dialogWidth:380px; dialogTop:; dialogLeft:; edge:Raised; center:Yes; help:No; resizable:Yes; status:No;');

    244. 

  244. 			dialogActive=false

    245. 

  245. 			if (document.all.tmpDlgArg.value!="#"){

    246. 

  246. 				Arguments=document.all.tmpDlgArg.value.split("#")

    247. 

  247. 				src.value=Arguments[0];

    248. 

  248. 				document.all.accountName.value=Arguments[1];

    249. 

  249. 			}

    250. 

  250. 		}

    251. 

  251. 	}

    252. 

  252. }

    253. 

  253. 

    254. 

  254. //===================================================

    255. 

  255. function checkTop(src){ 

    256. 

  256. 	if (!dialogActive){

    257. 

  257. 		badCode = false;

    258. 

  258. 		if (window.XMLHttpRequest) {

    259. 

  259. 			var objHTTP=new XMLHttpRequest();

    260. 

  260. 		} else if (window.ActiveXObject) {

    261. 

  261. 			var objHTTP = new ActiveXObject("Microsoft.XMLHTTP");

    262. 

  262. 		}

    263. 

  263. 		objHTTP.open('GET','../accounting/xml_GLAccount.asp?id='+src.value,false)

    264. 

  264. 		objHTTP.send()

    265. 

  265. 		tmpStr = unescape( objHTTP.responseText)

    266. 

  266. 		document.all.accountName.value=tmpStr;

    267. 

  267. 		}

    268. 

  268. }

    269. 

  269. 

    270. 

  270. //===================================================

    271. 

  271. function mask(src){ 

    272. 

  272. 	var theKey=event.keyCode;

    273. 

  273. 

    274. 

  274. 	rowNo=src.parentNode.parentNode.rowIndex;

    275. 

  275. 	invTable=document.getElementById("ChequeLines");

    276. 

  276. 	theRow=invTable.getElementsByTagName("tr")[rowNo];

    277. 

  277. 

    278. 

  278. 	if (src.name=="Items"){

    279. 

  279. 		if (theKey==13){

    280. 

  280. 			event.keyCode=9

    281. 

  281. 			dialogActive=true

    282. 

  282. 			document.all.tmpDlgArg.value="#"

    283. 

  283. 			document.all.tmpDlgTxt.value="      :"

    284. 

  284. 			var myTinyWindow = window.showModalDialog('../dialog_GenInput.asp',document.all.tmpDlgTxt,'dialogHeight:200px; dialogWidth:440px; dialogTop:; dialogLeft:; edge:None; center:Yes; help:No; resizable:No; status:No;');

    285. 

  285. 			if (document.all.tmpDlgTxt.value !="") {

    286. 

  286. 				var myTinyWindow = window.showModalDialog('../accounting/dialog_selectGL.asp?act=select&name='+escape(document.all.tmpDlgTxt.value),document.all.tmpDlgArg,'dialogHeight:500px; dialogWidth:380px; dialogTop:; dialogLeft:; edge:Raised; center:Yes; help:No; resizable:Yes; status:No;');

    287. 

  287. 				dialogActive=false

    288. 

  288. 				if (document.all.tmpDlgArg.value!="#"){

    289. 

  289. 					Arguments=document.all.tmpDlgArg.value.split("#")

    290. 

  290. 					src.value=Arguments[0];

    291. 

  291. 					invTable.getElementsByTagName("tr")[rowNo].getElementsByTagName("td")[2].getElementsByTagName("Input")[0].value=Arguments[1];

    292. 

  292. 				}

    293. 

  293. 				invTable.getElementsByTagName("tr")[rowNo].getElementsByTagName("td")[3].getElementsByTagName("Input")[0].focus();

    294. 

  294. 			}

    295. 

  295. 		}

    296. 

  296. 		else if (theKey >= 48 && theKey <= 57 ) { 

    297. 

  297. 			//alert(theKey)

    298. 

  298. 			//src.value=''

    299. 

  299. 			return true;

    300. 

  300. 		}

    301. 

  301. 		else { 

    302. 

  302. 			return false;

    303. 

  303. 		}

    304. 

  304. 	}

    305. 

  305. }

    306. 

  306. 

    307. 

  307. //===================================================

    308. 

  308. function check(src){ 

    309. 

  309. 	invTable=document.getElementById("ChequeLines");

    310. 

  310. 	if (src.name=="Items"){

    311. 

  311. 		rowNo=src.parentNode.parentNode.rowIndex;

    312. 

  312. 		rowsCount=document.getElementsByName("Items").length;

    313. 

  313. 		if (!dialogActive){

    314. 

  314. 			if (src.value=='0' ){

    315. 

  315. 				if (rowNo == 0 && rowsCount == 1) {

    316. 

  316. 					src.focus();

    317. 

  317. 				}

    318. 

  318. 				else{

    319. 

  319. 					if (confirm("          Ͽ")){

    320. 

  320. 						delRow(rowNo);

    321. 

  321. 						return false;

    322. 

  322. 					}

    323. 

  323. 					else{

    324. 

  324. 						src.focus();

    325. 

  325. 					}

    326. 

  326. 				}

    327. 

  327. 			}

    328. 

  328. 			else {

    329. 

  329. 				badCode = false;

    330. 

  330. 				if (window.XMLHttpRequest) {

    331. 

  331. 					var objHTTP=new XMLHttpRequest();

    332. 

  332. 				} else if (window.ActiveXObject) {

    333. 

  333. 					var objHTTP = new ActiveXObject("Microsoft.XMLHTTP");

    334. 

  334. 				}

    335. 

  335. 				objHTTP.open('GET','../accounting/xml_GLAccount.asp?id='+src.value,false)

    336. 

  336. 				objHTTP.send()

    337. 

  337. 				tmpStr = unescape( objHTTP.responseText)

    338. 

  338. 				invTable.getElementsByTagName("tr")[rowNo].getElementsByTagName("td")[2].getElementsByTagName("Input")[0].value= tmpStr

    339. 

  339. 				

    340. 

  340. 				if (tmpStr=="   ")

    341. 

  341. 				{

    342. 

  342. 					if (rowNo == 0 && rowsCount == 1) {

    343. 

  343. 						src.focus();

    344. 

  344. 					}

    345. 

  345. 					else{

    346. 

  346. 						if (confirm("          Ͽ")){

    347. 

  347. 							delRow(rowNo);

    348. 

  348. 							return false;

    349. 

  349. 						}

    350. 

  350. 						else{

    351. 

  351. 							src.focus();

    352. 

  352. 						}

    353. 

  353. 					}

    354. 

  354. 				}

    355. 

  355. 			}

    356. 

  356. 		}

    357. 

  357. 	}

    358. 

  358. }

    359. 

  359. 

    360. 

  360. //===================================================

    361. 

  361. function delRow(rowNo){

    362. 

  362. 	chqTable=document.getElementById("ChequeLines");

    363. 

  363. 	theRow=chqTable.getElementsByTagName("tr")[rowNo];

    364. 

  364. 	chqTable.removeChild(theRow);

    365. 

  365. 

    366. 

  366. 	for (rowNo=0; rowNo < document.getElementsByName("ChequeNos").length; rowNo++){

    367. 

  367. 		chqTable.getElementsByTagName("tr")[rowNo].getElementsByTagName("td")[0].innerText= rowNo+1;

    368. 

  368. 	}

    369. 

  369. }

    370. 

  370. 

    371. 

  371. //===================================================

    372. 

  372. function addRow(rowNo){

    373. 

  373. 	chqTable=document.getElementById("ChequeLines");

    374. 

  374. 	theRow=chqTable.getElementsByTagName("tr")[rowNo];

    375. 

  375. 	newRow=document.createElement("tr");

    376. 

  376. 	newRow.setAttribute("bgColor", '#f0f0f0');

    377. 

  377. 

    378. 

  378. 	tempTD=document.createElement("td");

    379. 

  379. 	tempTD.innerHTML=rowNo+1

    380. 

  380. 	tempTD.setAttribute("align", 'center');

    381. 

  381. 	tempTD.setAttribute("width", '25');

    382. 

  382. 	newRow.appendChild(tempTD);

    383. 

  383. 

    384. 

  384. 	tempTD=document.createElement("td");

    385. 

  385. 	tempTD.setAttribute("dir", 'LTR');

    386. 

  386. 	tempTD.innerHTML='<INPUT class="RcpRowInput" TYPE="text" NAME="Items" maxlength="5" size="5" onKeyPress="return mask(this);" tabIndex="2"  onBlur="check(this);">'

    387. 

  387. 	newRow.appendChild(tempTD);

    388. 

  388. 

    389. 

  389. 	tempTD=document.createElement("td");

    390. 

  390. 	tempTD.setAttribute("dir", 'RTL');

    391. 

  391. 	tempTD.innerHTML='<INPUT class="RcpRowInput" TYPE="text" NAME="accTitles" size="14" onKeyPress="return mask(this);" tabIndex="9999" readonly>'

    392. 

  392. 	newRow.appendChild(tempTD);

    393. 

  393. 

    394. 

  394. 	tempTD=document.createElement("td");

    395. 

  395. 	tempTD.setAttribute("dir", 'LTR');

    396. 

  396. 	tempTD.innerHTML='<INPUT class="RcpRowInput" TYPE="text" NAME="ChequeNos" size="10" onKeyPress="return mask(this);" tabIndex="2" >'

    397. 

  397. 	newRow.appendChild(tempTD);

    398. 

  398. 

    399. 

  399. 	tempTD=document.createElement("td");

    400. 

  400. 	tempTD.setAttribute("dir", 'LTR');

    401. 

  401. 	tempTD.innerHTML='<INPUT class="RcpRowInput" TYPE="text" NAME="ChequeDates" maxlength="10" size="10"  onKeyPress="return maskDate(this);" onblur="acceptDate(this)" tabIndex="2">'

    402. 

  402. 	newRow.appendChild(tempTD);

    403. 

  403. 

    404. 

  404. 	tempTD=document.createElement("td");

    405. 

  405. 	tempTD.setAttribute("dir", 'RTL');

    406. 

  406. 	tempTD.innerHTML=chqTable.getElementsByTagName("tr")[0].getElementsByTagName("td")[5].innerHTML

    407. 

  407. 	newRow.appendChild(tempTD);

    408. 

  408. 

    409. 

  409. 	tempTD=document.createElement("td");

    410. 

  410. 	tempTD.setAttribute("dir", 'RTL');

    411. 

  411. 	tempTD.innerHTML='<INPUT class="RcpRowInput" TYPE="text" NAME="shobe" size="8" tabIndex="2">'

    412. 

  412. 	newRow.appendChild(tempTD);

    413. 

  413. 				

    414. 

  414. 	tempTD=document.createElement("td");

    415. 

  415. 	tempTD.setAttribute("dir", 'RTL');

    416. 

  416. 	tempTD.innerHTML='<INPUT class="RcpRowInput" TYPE="text" NAME="jaari" size="8" tabIndex="2">'

    417. 

  417. 	newRow.appendChild(tempTD);

    418. 

  418. 				

    419. 

  419. 	tempTD=document.createElement("td");

    420. 

  420. 	tempTD.setAttribute("dir", 'RTL');

    421. 

  421. 	tempTD.innerHTML='<INPUT class="RcpRowInput" TYPE="text" NAME="Description" size="16" tabIndex="2">'

    422. 

  422. 	newRow.appendChild(tempTD);

    423. 

  423. 				

    424. 

  424. 	tempTD=document.createElement("td");

    425. 

  425. 	tempTD.setAttribute("dir", 'LTR');

    426. 

  426. 	tempTD.innerHTML='<INPUT class="RcpRowInput" TYPE="text" NAME="Amounts" size="10" onKeyPress="return mask(this);" onBlur="setPrice(this);" tabIndex="2">'

    427. 

  427. 	newRow.appendChild(tempTD);

    428. 

  428. 				

    429. 

  429. 

    430. 

  430. 	chqTable.insertBefore(newRow,theRow);

    431. 

  431. 

    432. 

  432. 	chqTable.getElementsByTagName("tr")[rowNo].getElementsByTagName("td")[1].getElementsByTagName("Input")[0].focus();

    433. 

  433. }

    434. 

  434. 

    435. 

  435. 

    436. 

  436. //===================================================

    437. 

  437. function setPrice(src){

    438. 

  438. 	myRow=src.parentNode.parentNode.rowIndex

    439. 

  439. 

    440. 

  440. 	if (src.name=="Amounts" && document.getElementsByName("ChequeNos")[myRow].value==''){

    441. 

  441. 		src.value=0;

    442. 

  442. 	}

    443. 

  443. 	else{

    444. 

  444. 		src.value=val2txt(txt2val(src.value));

    445. 

  445. 	}

    446. 

  446. 	//cashAmount=parseInt(txt2val(document.getElementsByName("CashAmount")[0].value));

    447. 

  447. 	//totalAmount = cashAmount;

    448. 

  448. 	totalAmount = 0;

    449. 

  449. 

    450. 

  450. 	for (rowNo=0; rowNo < document.getElementsByName("Amounts").length; rowNo++){

    451. 

  451. 		totalAmount += parseInt(txt2val(document.getElementsByName("Amounts")[rowNo].value));

    452. 

  452. 	}

    453. 

  453. 	document.all.TotalAmount.value = val2txt(totalAmount);

    454. 

  454. }

    455. 

  455. 

    456. 

  456. //===================================================

    457. 

  457. function CheckAndSubmit()

    458. 

  458. {

    459. 

  459. document.forms[0].submit()

    460. 

  460. invTable=document.getElementById("ChequeLines");

    461. 

  461. 

    462. 

  462. document.all.sss.value=document.forms[0].innerHTML

    463. 

  463. //document.forms[0].submit()

    464. 

  464. 

    465. 

  465. /*alert(joindocument.all.Items.value)

    466. 

  466. return false

    467. 

  467. 	if (document.all.Items.value=="" )

    468. 

  468. 		{

    469. 

  469. 		alert("  ")

    470. 

  470. 		return false

    471. 

  471. 		}

    472. 

  472. 	else

    473. 

  473. 	{

    474. 

  474. 	document.forms[0].submit()

    475. 

  475. 	return true

    476. 

  476. 	}

    477. 

  477. 	*/

    478. 

  478. }

    479. 

  479. 

    480. 

  480. //-->

    481. 

  481. </SCRIPT>

    482. 

  482. <%

    483. 

  483. end if

    484. 

  484. %>

    485. 

  485. 

    486. 

  486. <!--#include file="tah.asp" -->
    487.