The Easiest Way to Save and Share Code Snippets on the web

wof/wof_my_basket_2

asp

posted: Feb, 2nd 2012 | jump to bottom

  1. <%
  2. '' -------------------------------------------------------------
  3. '' -------------------------------------------------------------
  4. '' Client: Women of Faith
  5. '' Site ID: 21775
  6. '' Customization: Custom my_basket_1.asp page
  7. '' Note: Place in the wof sub-folder located under the main PEO site folder
  8. '' Replaces: my_basket_1.asp
  9. ''
  10. '' Updated by Uri Nizan on 11/21/2006
  11. '' Created by Uri Nizan on 11/21/2006
  12. '' -------------------------------------------------------------
  13. '' -------------------------------------------------------------
  14. '' eSRO Basket Site
  15. '' Version 3.2.2
  16. '' August 1, 2005
  17. '' Powered by: TopTix LTD.
  18. '' -------------------------------------------------------------
  19. '' my_basket_1.asp - the main screen part for the full
  20. '' basket page.
  21. '' -------------------------------------------------------------
  22. %>
  23. <!-- #include file = '../global_functions.asp' -->
  24. <%
  25.  
  26. Session("objESRO2").Basket.Load_Basket Session("UID") , True
  27.  
  28. %>
  29.  
  30. <TABLE border=0 WIDTH=100% CELLSPACING=0 CELLPADDING=0>
  31. <% if Session("CurrentFile") = "my_basket.asp" then %>
  32. <TR>
  33. <TD class="general_caption"><% = GetString(4,"string","My Basket") %></TD>
  34. </TR>
  35. <TR>
  36. <TD class="item_separator"><IMG height=100% width=100% src="images/shakuf.gif" alt=""></TD>
  37. </TR>
  38. <TR>
  39. <TD class="small_text_a"><% = GetString(75,"string","This is a summary of your reservations during this session...") %></TD>
  40. </TR>
  41. <TR>
  42. <TD class="item_separator"><IMG height=100% width=100% src="images/shakuf.gif" alt=""></TD>
  43. </TR>
  44. <% end if %>
  45. <% if Session("objESRO2").Basket.Tickets.count > 0 then %>
  46. <TR>
  47. <TD class="general_caption"><% = GetString(74,"string","My Tickets Basket") %></TD>
  48. </TR>
  49. <TR>
  50. <TD height=3px><IMG height=3px width=100% src="images/shakuf.gif" alt=""></TD>
  51. </TR>
  52. <TR>
  53. <TD class="item_background" style="padding:0px;" width=100%>
  54. <TABLE align=center class="small_text_a" border=0 WIDTH=98% height=100% CELLSPACING=0 CELLPADDING=1>
  55. <TR WIDTH=100%>
  56. <TD colspan=7 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  57. </TR
  58. ><%
  59. LastEventCode = 0
  60. for i=1 to Session("objESRO2").Basket.Tickets.count
  61. if LastEventCode <> Session("objESRO2").Basket.Tickets(i).eSRO_EventCode then
  62. LastEventCode = Session("objESRO2").Basket.Tickets(i).eSRO_EventCode
  63. if i<>1 then
  64. %>
  65. <TR WIDTH=100%>
  66. <TD colspan=7 height=15 ><IMG src="images/shakuf.gif" alt=""></TD>
  67. </TR>
  68. <%
  69. end if
  70. %>
  71. <TR WIDTH=100%>
  72. <TD colspan=6 class="basket_border">
  73. <SPAN class="small_text_c"><B><% = GetString(39,"string","Event") %>:&nbsp;</B></SPAN>
  74. <SPAN class="small_text_a"><% = Session("objESRO2").Basket.Tickets(i).ShowName %></SPAN>
  75. &nbsp;
  76. <SPAN class="small_text_c"><B><% = GetString(40,"string","On") %></B></SPAN>
  77. &nbsp;
  78. <SPAN class="small_text_a"><% = Session("objESRO2").Common.MyFormat.Format_DateTime( Session("objESRO2").Basket.Tickets(i).EventDateTime ) %></SPAN>
  79. &nbsp;
  80. <SPAN class="small_text_c"><B><% = GetString(16,"string","at") %>:&nbsp</B></SPAN>
  81. <% = Session("objESRO2").Basket.Tickets(i).HallName %>
  82. </TD>
  83. <TD align=right nowrap class="basket_border" style="display:none;">
  84. <% if Session("CurrentFile") = "my_basket.asp" then %>
  85. <SPAN class="basket_action" onclick="javascript: open_url('catch.asp?action_type=free_basket&items_list=Tickets;<% = Get_Tickets_Unique_IDs( Session("objESRO2").Basket.Tickets(i).eSRO_EventCode , 0 ) %>');" title="<% = GetString(77,"title","Click here to cancel reserved tickets to this event") %>&nbsp;: ( <% = Session("objESRO2").Basket.Tickets(i).ShowName & " " & GetString(40,"string","On") & " " & Session("objESRO2").Common.MyFormat.Format_DateTime( Session("objESRO2").Basket.Tickets(i).EventDateTime ) %> )"><% = GetString(77,"string","Remove Item") %></SPAN>
  86. <SPAN class="basket_action">&nbsp;|&nbsp;</SPAN>
  87. <SPAN class="basket_action" onclick="javascript: open_url('hall.asp?event=<% = Session("objESRO2").Basket.Tickets(i).eSRO_EventCode %>&open_map=no&area=<% = Session("objESRO2").Basket.Tickets(i).AreaCode %>');" title="<% = GetString(78,"title","View the seats for") %>&nbsp;:( <% = Session("objESRO2").Basket.Tickets(i).ShowName & " " & GetString(40,"string","On") & " " & Session("objESRO2").Common.MyFormat.Format_DateTime( Session("objESRO2").Basket.Tickets(i).EventDateTime ) %> )"><% = GetString( 78 ,"string","View Seats" ) %></SPAN>
  88. <SPAN class="basket_action">&nbsp;|&nbsp;</SPAN>
  89. <SPAN class="basket_action" onclick="javascript: open_url('show_events_list.asp?shcode=<% = Session("objESRO2").Basket.Tickets(i).ShowCode %>&shName=<% = Session("objESRO2").Basket.Tickets(i).ShowName %>');" title="<% = "Revise Order" %>"><% = "Revise Order" %></SPAN>
  90. <% else %>
  91. &nbsp;
  92. <% end if %>
  93. </TD>
  94. </TR>
  95. <TR WIDTH=100%>
  96. <TD colspan=7 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  97. </TR>
  98. <TR WIDTH=100%>
  99. <TD colspan=7>
  100. <TABLE class="small_text_a" CELLSPACING=0 CELLPADDING=0>
  101. <TR>
  102. <TD width=80 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(79,"string","Row/Box") %></SPAN></TD>
  103. <TD width=70 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(80,"string","Seat") %></SPAN></TD>
  104. <% if CLng( Get_Global_Param("eSRO Site","Show Sector") ) = 1 then %>
  105. <TD width=100 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(270,"string","Sector") %></SPAN></TD>
  106. <% end if%>
  107. <TD width=120 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(41,"string","Area") %></SPAN></TD>
  108. <TD width=120 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(58,"string","Ticket Type") %></SPAN></TD>
  109. <TD width=70 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(68,"string","Price") %></SPAN></TD>
  110. </TR>
  111. <TR>
  112. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.Tickets(i).RowName %></SPAN></TD>
  113. <TD width=70 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.Tickets(i).ColName %></SPAN></TD>
  114. <% if CLng( Get_Global_Param("eSRO Site","Show Sector") ) = 1 then %>
  115. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.Tickets(i).SectorName %></SPAN></TD>
  116. <% end if%>
  117. <TD width=120 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.Tickets(i).AreaName %></SPAN></TD>
  118. <TD width=120 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.Tickets(i).PriceTypeName %></SPAN></TD>
  119. <TD width=70 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Get_Global_Param("My Settings", "Currency Sign") %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.Tickets(i).FullPrice ) %></SPAN></TD>
  120. </TR>
  121. </TABLE>
  122. </TD>
  123. </TR>
  124. <% else %>
  125. <TR WIDTH=100%>
  126. <TD colspan=7>
  127. <TABLE class="small_text_a" CELLSPACING=0 CELLPADDING=0>
  128. <TR>
  129. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.Tickets(i).RowName %></SPAN></TD>
  130. <TD width=70 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.Tickets(i).ColName %></SPAN></TD>
  131. <% if CLng( Get_Global_Param("eSRO Site","Show Sector") ) = 1 then %>
  132. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.Tickets(i).SectorName %></SPAN></TD>
  133. <% end if%>
  134. <TD width=120 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.Tickets(i).AreaName %></SPAN></TD>
  135. <TD width=120 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.Tickets(i).PriceTypeName %></SPAN></TD>
  136. <TD width=70 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Get_Global_Param("My Settings", "Currency Sign") %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.Tickets(i).FullPrice ) %></SPAN></TD>
  137. </TR>
  138. </TABLE>
  139. </TD>
  140. </TR>
  141. <%
  142. end if
  143. next
  144. %>
  145. <TR WIDTH=100%>
  146. <TD colspan=7 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  147. </TR>
  148. </TABLE>
  149. </TD>
  150. </TR>
  151. <% end if %>
  152.  
  153. <% if Session("objESRO2").Basket.MerchandiseItems.Count > 0 then %>
  154. <TR>
  155. <TD height=10px><IMG height=10px width=100% src="images/shakuf.gif" alt=""></TD>
  156. </TR>
  157. <TR>
  158. <TD class="general_caption"><% = GetString(295,"string","My Merchandise Basket") %></TD>
  159. </TR>
  160. <TR>
  161. <TD height=3px><IMG height=3px width=100% src="images/shakuf.gif" alt=""></TD>
  162. </TR>
  163. <TR>
  164. <TD class="item_background" style="height:10px;padding:0px;" width=100%>
  165. <TABLE align=center class="small_text_a" border=0 WIDTH=98% height=100% CELLSPACING=0 CELLPADDING=1>
  166. <TR WIDTH=100%>
  167. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  168. </TR>
  169. <TR>
  170. <TD width=80 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(296,"string","QTY") %></SPAN></TD>
  171. <TD width=120 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(297,"string","Item") %></SPAN></TD>
  172. <TD width=80 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(68,"string","Price") %></SPAN></TD>
  173. <TD width=80 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(63,"string","Total") %></SPAN></TD>
  174. <TD class="basket_border" style="border-width:2px;border-top:;">&nbsp;</TD>
  175. </TR>
  176. <% for i=1 to Session("objESRO2").Basket.MerchandiseItems.Count %>
  177. <TR>
  178. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.MerchandiseItems(i).Qty %></SPAN></TD>
  179. <TD width=120 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.MerchandiseItems(i).Name %></SPAN></TD>
  180. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Common.MyFormat.CurrencySign %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.MerchandiseItems(i).Price ) %></SPAN></TD>
  181. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Common.MyFormat.CurrencySign %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.MerchandiseItems(i).TotalAmount ) %></SPAN></TD>
  182. <TD class="basket_border" style="border-size:1px;border-top:;">
  183. &nbsp;
  184. <% if Session("CurrentFile") = "my_basket.asp" then %>
  185. <SPAN class="basket_action" onclick="javascript: open_url('catch.asp?action_type=free_basket&items_list=Merchandise;<% = Session("objESRO2").Basket.MerchandiseItems(i).UniqueID %>');"><% = GetString(77,"string","Remove Item") %></SPAN>
  186. <% end if %>
  187. </TD>
  188. </TR>
  189. <% next %>
  190. <TR WIDTH=100%>
  191. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  192. </TR>
  193. </TABLE>
  194. </TD>
  195. </TR>
  196. <% end if %>
  197.  
  198. <% if Session("objESRO2").Basket.Donations.Count > 0 then %>
  199. <TR>
  200. <TD height=10px><IMG height=10px width=100% src="images/shakuf.gif" alt=""></TD>
  201. </TR>
  202. <TR>
  203. <TD class="general_caption"><% = GetString(299,"string","My Donations Basket") %></TD>
  204. </TR>
  205. <TR>
  206. <TD height=3px><IMG height=3px width=100% src="images/shakuf.gif" alt=""></TD>
  207. </TR>
  208. <TR>
  209. <TD class="item_background" style="height:10px;padding:0px;" width=100%>
  210. <TABLE align=center class="small_text_a" border=0 WIDTH=98% height=100% CELLSPACING=0 CELLPADDING=1>
  211. <TR WIDTH=100%>
  212. <TD colspan=3 height=3 ><IMG src="images/shakuf.gif" alt=""></TD>
  213. </TR>
  214. <TR>
  215. <TD width=200 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(300,"string","Campaign") %></SPAN></TD>
  216. <TD width=80 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(63,"string","Total") %></SPAN></TD>
  217. <TD class="basket_border" style="border-width:2px;border-top:;">&nbsp;</TD>
  218. </TR>
  219. <% for i=1 to Session("objESRO2").Basket.Donations.Count %>
  220. <TR>
  221. <TD width=200 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.Donations(i).CampaignName %></SPAN></TD>
  222. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Common.MyFormat.CurrencySign %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.Donations(i).TotalAmount ) %></SPAN></TD>
  223. <TD class="basket_border" style="border-size:1px;border-top:;">
  224. &nbsp;
  225. <% if Session("CurrentFile") = "my_basket.asp" then %>
  226. <SPAN class="basket_action" onclick="javascript: open_url('catch.asp?action_type=free_basket&items_list=Donation;<% = Session("objESRO2").Basket.Donations(i).UniqueID %>');"><% = GetString(77,"string","Remove Item") %></SPAN>
  227. <% end if %>
  228. </TD>
  229. </TR>
  230. <% next %>
  231. <TR WIDTH=100%>
  232. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  233. </TR>
  234. </TABLE>
  235. </TD>
  236. </TR>
  237. <% end if %>
  238.  
  239. <% if Session("objESRO2").Basket.Memberships.count > 0 then %>
  240. <TR>
  241. <TD height=10px><IMG height=10px width=100% src="images/shakuf.gif" alt=""></TD>
  242. </TR>
  243. <TR>
  244. <TD class="general_caption"><% = GetString(301,"string","My Memberships Basket") %></TD>
  245. </TR>
  246. <TR>
  247. <TD height=3px><IMG height=3px width=100% src="images/shakuf.gif" alt=""></TD>
  248. </TR>
  249. <TR>
  250. <TD class="item_background" style="padding:0px;" width=100%>
  251. <TABLE align=center class="small_text_a" border=0 WIDTH=98% height=100% CELLSPACING=0 CELLPADDING=1>
  252. <TR WIDTH=100%>
  253. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  254. </TR
  255. ><%
  256. LastGroupCode = 0
  257. for i=1 to Session("objESRO2").Basket.Memberships.count
  258. if LastGroupCode <> Session("objESRO2").Basket.Memberships(i).UniqueGroupID then
  259. LastGroupCode = Session("objESRO2").Basket.Memberships(i).UniqueGroupID
  260. if i<>1 then
  261. %>
  262. <TR WIDTH=100%>
  263. <TD colspan=5 height=10 ><IMG src="images/shakuf.gif" alt=""></TD>
  264. </TR>
  265. <%
  266. end if
  267. %>
  268. <TR WIDTH=100%>
  269. <TD colspan=4 class="basket_border">
  270. <SPAN class="small_text_c"><B><% = GetString(256,"string","Membership") %>:&nbsp;</B></SPAN>
  271. <SPAN class="small_text_a"><% = Session("objESRO2").Basket.Memberships(i).SeriesGroupName %></SPAN>
  272. </TD>
  273. <TD align=right nowrap class="basket_border">
  274. &nbsp;
  275. <% if Session("CurrentFile") = "my_basket.asp" then %>
  276. <SPAN class="basket_action" onclick="javascript: open_url('catch.asp?action_type=free_basket&items_list=Memberships;<% = Get_Programs_Unique_IDs( Session("objESRO2").Basket.Memberships(i).UniqueGroupID , "memberships" ) %>');"><% = GetString(77,"string","Remove Item") %></SPAN>
  277. <% else %>
  278.  
  279. <% end if %>
  280. </TD>
  281. </TR>
  282. <TR WIDTH=100%>
  283. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  284. </TR>
  285. <TR WIDTH=100%>
  286. <TD colspan=5>
  287. <TABLE CELLSPACING=0 CELLPADDING=0>
  288. <TR>
  289. <TD width=230 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(188,"string","Program") %></SPAN></TD>
  290. <TD width=100 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(302,"string","From Date") %></SPAN></TD>
  291. <TD width=100 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(303,"string","To Date") %></SPAN></TD>
  292. <TD width=80 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(63,"string","Total") %></SPAN></TD>
  293. </TR>
  294. <TR>
  295. <TD width=230 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.Memberships(i).Name %></SPAN></TD>
  296. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Common.MyFormat.Format_Date( Session("objESRO2").Basket.Memberships(i).FromDate ) %></SPAN></TD>
  297. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Common.MyFormat.Format_Date( Session("objESRO2").Basket.Memberships(i).ToDate ) %></SPAN></TD>
  298. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Get_Global_Param("My Settings", "Currency Sign") %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.Memberships(i).TotalAmount ) %></SPAN></TD>
  299. </TR>
  300. </TABLE>
  301. </TD>
  302. </TR>
  303. <% else %>
  304. <TR WIDTH=100%>
  305. <TD colspan=5>
  306. <TABLE class="small_text_a" CELLSPACING=0 CELLPADDING=0>
  307. <TR>
  308. <TD width=230 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.Memberships(i).Name %></SPAN></TD>
  309. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Common.MyFormat.Format_Date( Session("objESRO2").Basket.Memberships(i).FromDate ) %></SPAN></TD>
  310. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Common.MyFormat.Format_Date( Session("objESRO2").Basket.Memberships(i).ToDate ) %></SPAN></TD>
  311. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Get_Global_Param("My Settings", "Currency Sign") %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.Memberships(i).TotalAmount ) %></SPAN></TD>
  312. </TR>
  313. </TABLE>
  314. </TD>
  315. </TR>
  316. <%
  317. end if
  318. next
  319. %>
  320. <TR WIDTH=100%>
  321. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  322. </TR>
  323. </TABLE>
  324. </TD>
  325. </TR>
  326. <% end if %>
  327.  
  328. <% if Session("objESRO2").Basket.MembershipsRenew.count > 0 then %>
  329. <TR>
  330. <TD height=10px><IMG height=10px width=100% src="images/shakuf.gif" alt=""></TD>
  331. </TR>
  332. <TR>
  333. <TD class="general_caption"><% = GetString(305,"string","My Memberships Renew Basket") %></TD>
  334. </TR>
  335. <TR>
  336. <TD height=3px><IMG height=3px width=100% src="images/shakuf.gif" alt=""></TD>
  337. </TR>
  338. <TR>
  339. <TD class="item_background" style="padding:0px;" width=100%>
  340. <TABLE align=center class="small_text_a" border=0 WIDTH=98% height=100% CELLSPACING=0 CELLPADDING=1>
  341. <TR WIDTH=100%>
  342. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  343. </TR
  344. ><%
  345. LastGroupCode = 0
  346. for i=1 to Session("objESRO2").Basket.MembershipsRenew.count
  347. if LastGroupCode <> Session("objESRO2").Basket.MembershipsRenew(i).UniqueGroupID then
  348. LastGroupCode = Session("objESRO2").Basket.MembershipsRenew(i).UniqueGroupID
  349. if i<>1 then
  350. %>
  351. <TR WIDTH=100%>
  352. <TD colspan=5 height=15 ><IMG src="images/shakuf.gif" alt=""></TD>
  353. </TR>
  354. <%
  355. end if
  356. %>
  357. <TR WIDTH=100%>
  358. <TD colspan=4 class="basket_border">
  359. <SPAN class="small_text_c"><B><% = GetString(256,"string","Membership") %>:&nbsp;</B></SPAN>
  360. <SPAN class="small_text_a"><% = Session("objESRO2").Basket.MembershipsRenew(i).SeriesGroupName %></SPAN>
  361. </TD>
  362. <TD align=right nowrap class="basket_border">
  363. <% if Session("CurrentFile") = "my_basket.asp" then %>
  364. <SPAN class="basket_action" onclick="javascript: open_url('catch.asp?action_type=free_basket&items_list=RenewableMemberships;<% = Get_Programs_Unique_IDs( Session("objESRO2").Basket.MembershipsRenew(i).UniqueGroupID , "membershipsrenew" ) %>');"><% = GetString(77,"string","Remove Item") %></SPAN>
  365. <% else %>
  366. &nbsp;
  367. <% end if %>
  368. </TD>
  369. </TR>
  370. <TR WIDTH=100%>
  371. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  372. </TR>
  373. <TR WIDTH=100%>
  374. <TD colspan=5>
  375. <TABLE class="small_text_a" CELLSPACING=0 CELLPADDING=0>
  376. <TR>
  377. <TD width=230 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(188,"string","Program") %></SPAN></TD>
  378. <TD width=100 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(302,"string","From Date") %></SPAN></TD>
  379. <TD width=100 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(303,"string","To Date") %></SPAN></TD>
  380. <TD width=80 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(63,"string","Total") %></SPAN></TD>
  381. </TR>
  382. <TR>
  383. <TD width=230 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.MembershipsRenew(i).Name %></SPAN></TD>
  384. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Common.MyFormat.Format_Date( Session("objESRO2").Basket.MembershipsRenew(i).FromDate ) %></SPAN></TD>
  385. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Common.MyFormat.Format_Date( Session("objESRO2").Basket.MembershipsRenew(i).ToDate ) %></SPAN></TD>
  386. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Get_Global_Param("My Settings", "Currency Sign") %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.MembershipsRenew(i).TotalAmount ) %></SPAN></TD>
  387. </TR>
  388. </TABLE>
  389. </TD>
  390. </TR>
  391. <% else %>
  392. <TR WIDTH=100%>
  393. <TD colspan=5>
  394. <TABLE class="small_text_a" CELLSPACING=0 CELLPADDING=0>
  395. <TR>
  396. <TD width=230 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.MembershipsRenew(i).Name %></SPAN></TD>
  397. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Common.MyFormat.Format_Date( Session("objESRO2").Basket.MembershipsRenew(i).FromDate ) %></SPAN></TD>
  398. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Common.MyFormat.Format_Date( Session("objESRO2").Basket.MembershipsRenew(i).ToDate ) %></SPAN></TD>
  399. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Get_Global_Param("My Settings", "Currency Sign") %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.MembershipsRenew(i).TotalAmount ) %></SPAN></TD>
  400. </TR>
  401. </TABLE>
  402. </TD>
  403. </TR>
  404. <%
  405. end if
  406. next
  407. %>
  408. <TR WIDTH=100%>
  409. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  410. </TR>
  411. </TABLE>
  412. </TD>
  413. </TR>
  414. <% end if %>
  415.  
  416.  
  417. <% if Session("objESRO2").Basket.PrepaidSubscription.count > 0 then %>
  418. <TR>
  419. <TD height=10px><IMG height=10px width=100% src="images/shakuf.gif" alt=""></TD>
  420. </TR>
  421. <TR>
  422. <TD class="general_caption"><% = GetString(336,"string","Prepaid Waiting Lists Basket") %></TD>
  423. </TR>
  424. <TR>
  425. <TD height=3px><IMG height=3px width=100% src="images/shakuf.gif" alt=""></TD>
  426. </TR>
  427. <TR>
  428. <TD class="item_background" style="padding:0px;" width=100%>
  429. <TABLE align=center class="small_text_a" border=0 WIDTH=98% height=100% CELLSPACING=0 CELLPADDING=1>
  430. <TR WIDTH=100%>
  431. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  432. </TR
  433. ><%
  434. LastGroupCode = 0
  435. for i=1 to Session("objESRO2").Basket.PrepaidSubscription.count
  436. if LastGroupCode <> Session("objESRO2").Basket.PrepaidSubscription(i).UniqueGroupID then
  437. LastGroupCode = Session("objESRO2").Basket.PrepaidSubscription(i).UniqueGroupID
  438. if i<>1 then
  439. %>
  440. <TR WIDTH=100%>
  441. <TD colspan=5 height=10 ><IMG src="images/shakuf.gif" alt=""></TD>
  442. </TR>
  443. <%
  444. end if
  445. %>
  446. <TR WIDTH=100%>
  447. <TD colspan=4 class="basket_border">
  448. <SPAN class="small_text_c"><B><% = GetString(188,"string","Program") %>:&nbsp;</B></SPAN>
  449. <SPAN class="small_text_a"><% = Session("objESRO2").Basket.PrepaidSubscription(i).SeriesGroupName %></SPAN>
  450. </TD>
  451. <TD align=right nowrap class="basket_border">
  452. &nbsp;
  453. <% if Session("CurrentFile") = "my_basket.asp" then %>
  454. <SPAN class="basket_action" onclick="javascript: open_url('catch.asp?action_type=free_basket&items_list=Subs;<% = Get_Programs_Unique_IDs( Session("objESRO2").Basket.PrepaidSubscription(i).UniqueGroupID , "prepaid subscription" ) %>');"><% = GetString(77,"string","Remove Item") %></SPAN>
  455. <% else %>
  456.  
  457. <% end if %>
  458. </TD>
  459. </TR>
  460. <TR WIDTH=100%>
  461. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  462. </TR>
  463. <TR WIDTH=100%>
  464. <TD colspan=5>
  465. <TABLE CELLSPACING=0 CELLPADDING=0>
  466. <TR>
  467. <TD width=230 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(188,"string","Program") %></SPAN></TD>
  468. <TD width=100 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(25,"string","Venue") %></SPAN></TD>
  469. <TD width=100 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(189,"string","No of Events") %></SPAN></TD>
  470. <TD width=80 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(63,"string","Total") %></SPAN></TD>
  471. </TR>
  472. <TR>
  473. <TD width=230 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.PrepaidSubscription(i).Name %></SPAN></TD>
  474. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.PrepaidSubscription(i).HallName %></SPAN></TD>
  475. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.PrepaidSubscription(i).NumberOfEvents %></SPAN></TD>
  476. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Get_Global_Param("My Settings", "Currency Sign") %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.PrepaidSubscription(i).TotalAmount ) %></SPAN></TD>
  477. </TR>
  478. </TABLE>
  479. </TD>
  480. </TR>
  481. <% else %>
  482. <TR WIDTH=100%>
  483. <TD colspan=5>
  484. <TABLE class="small_text_a" CELLSPACING=0 CELLPADDING=0>
  485. <TR>
  486. <TD width=230 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.PrepaidSubscription(i).Name %></SPAN></TD>
  487. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.PrepaidSubscription(i).HallName %></SPAN></TD>
  488. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.PrepaidSubscription(i).NumberOfEvents %></SPAN></TD>
  489. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Get_Global_Param("My Settings", "Currency Sign") %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.PrepaidSubscription(i).TotalAmount ) %></SPAN></TD>
  490. </TR>
  491. </TABLE>
  492. </TD>
  493. </TR>
  494. <%
  495. end if
  496. next
  497. %>
  498. <TR WIDTH=100%>
  499. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  500. </TR>
  501. </TABLE>
  502. </TD>
  503. </TR>
  504. <% end if %>
  505.  
  506. <% if Session("objESRO2").Basket.SubscriptionRenew.count > 0 then %>
  507. <TR>
  508. <TD height=10px><IMG height=10px width=100% src="images/shakuf.gif" alt=""></TD>
  509. </TR>
  510. <TR>
  511. <TD class="general_caption"><% = GetString(337,"string","Subscription Renewal Basket") %></TD>
  512. </TR>
  513. <TR>
  514. <TD height=3px><IMG height=3px width=100% src="images/shakuf.gif" alt=""></TD>
  515. </TR>
  516. <TR>
  517. <TD class="item_background" style="padding:0px;" width=100%>
  518. <TABLE align=center class="small_text_a" border=0 WIDTH=98% height=100% CELLSPACING=0 CELLPADDING=1>
  519. <TR WIDTH=100%>
  520. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  521. </TR
  522. ><%
  523. LastGroupCode = 0
  524. for i=1 to Session("objESRO2").Basket.SubscriptionRenew.count
  525. if LastGroupCode <> Session("objESRO2").Basket.SubscriptionRenew(i).UniqueGroupID then
  526. LastGroupCode = Session("objESRO2").Basket.SubscriptionRenew(i).UniqueGroupID
  527. if i<>1 then
  528. %>
  529. <TR WIDTH=100%>
  530. <TD colspan=5 height=10 ><IMG src="images/shakuf.gif" alt=""></TD>
  531. </TR>
  532. <%
  533. end if
  534. %>
  535. <TR WIDTH=100%>
  536. <TD colspan=4 class="basket_border">
  537. <SPAN class="small_text_c"><B><% = GetString(188,"string","Program") %>:&nbsp;</B></SPAN>
  538. <SPAN class="small_text_a"><% = Session("objESRO2").Basket.SubscriptionRenew(i).SeriesGroupName %></SPAN>
  539. </TD>
  540. <TD align=right nowrap class="basket_border">
  541. &nbsp;
  542. <% if Session("CurrentFile") = "my_basket.asp" then %>
  543. <SPAN class="basket_action" onclick="javascript: open_url('catch.asp?action_type=free_basket&items_list=RenewableSubs;<% = Get_Programs_Unique_IDs( Session("objESRO2").Basket.SubscriptionRenew(i).UniqueGroupID , "subscriptionsrenew" ) %>');"><% = GetString(77,"string","Remove Item") %></SPAN>
  544. <% else %>
  545.  
  546. <% end if %>
  547. </TD>
  548. </TR>
  549. <TR WIDTH=100%>
  550. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  551. </TR>
  552. <TR WIDTH=100%>
  553. <TD colspan=5>
  554. <TABLE CELLSPACING=0 CELLPADDING=0>
  555. <TR>
  556. <TD width=230 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(188,"string","Program") %></SPAN></TD>
  557. <TD width=100 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(25,"string","Venue") %></SPAN></TD>
  558. <TD width=100 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(189,"string","No of Events") %></SPAN></TD>
  559. <TD width=80 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(63,"string","Total") %></SPAN></TD>
  560. </TR>
  561. <TR>
  562. <TD width=230 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.SubscriptionRenew(i).Name %></SPAN></TD>
  563. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.SubscriptionRenew(i).HallName %></SPAN></TD>
  564. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.SubscriptionRenew(i).NumberOfEvents %></SPAN></TD>
  565. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Get_Global_Param("My Settings", "Currency Sign") %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.SubscriptionRenew(i).TotalAmount ) %></SPAN></TD>
  566. </TR>
  567. </TABLE>
  568. </TD>
  569. </TR>
  570. <% else %>
  571. <TR WIDTH=100%>
  572. <TD colspan=5>
  573. <TABLE class="small_text_a" CELLSPACING=0 CELLPADDING=0>
  574. <TR>
  575. <TD width=230 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.SubscriptionRenew(i).Name %></SPAN></TD>
  576. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.SubscriptionRenew(i).HallName %></SPAN></TD>
  577. <TD width=100 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.SubscriptionRenew(i).NumberOfEvents %></SPAN></TD>
  578. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Get_Global_Param("My Settings", "Currency Sign") %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.SubscriptionRenew(i).TotalAmount ) %></SPAN></TD>
  579. </TR>
  580. </TABLE>
  581. </TD>
  582. </TR>
  583. <%
  584. end if
  585. next
  586. %>
  587. <TR WIDTH=100%>
  588. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  589. </TR>
  590. </TABLE>
  591. </TD>
  592. </TR>
  593. <% end if %>
  594.  
  595. <% if Session("objESRO2").Basket.Commissions.Count > 0 then %>
  596. <TR>
  597. <TD height=10px><IMG height=10px width=100% src="images/shakuf.gif" alt=""></TD>
  598. </TR>
  599. <TR>
  600. <TD class="general_caption"><% = GetString(306,"string","My Commissions") %></TD>
  601. </TR>
  602. <TR>
  603. <TD height=3px><IMG height=3px width=100% src="images/shakuf.gif" alt=""></TD>
  604. </TR>
  605. <TR>
  606. <TD class="item_background" style="height:10px;padding:0px;" width=100%>
  607. <TABLE align=center class="small_text_a" border=0 WIDTH=98% height=100% CELLSPACING=0 CELLPADDING=1>
  608. <TR WIDTH=100%>
  609. <TD colspan=3 height=3 ><IMG src="images/shakuf.gif" alt=""></TD>
  610. </TR>
  611. <TR>
  612. <TD width=230 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(307,"string","Commission") %></SPAN></TD>
  613. <TD width=80 class="basket_border" style="border-width:2px;border-top:;">&nbsp;<SPAN class="basket_caption"><% = GetString(63,"string","Total") %></SPAN></TD>
  614. <TD class="basket_border" style="border-width:2px;border-top:;">&nbsp;</TD>
  615. </TR>
  616. <% for i=1 to Session("objESRO2").Basket.Commissions.Count %>
  617. <TR>
  618. <TD width=230 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Basket.Commissions(i).Name %></SPAN></TD>
  619. <TD width=80 class="basket_border" style="border-size:1px;border-top:;">&nbsp;<SPAN class="small_text_a"><% = Session("objESRO2").Common.MyFormat.CurrencySign %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.Commissions(i).CalculatedValue ) %></SPAN></TD>
  620. <TD class="basket_border" style="border-size:1px;border-top:;">&nbsp;
  621.  
  622. </TD>
  623. </TR>
  624. <% next %>
  625. <TR WIDTH=100%>
  626. <TD colspan=5 height=5 ><IMG src="images/shakuf.gif" alt=""></TD>
  627. </TR>
  628. </TABLE>
  629. </TD>
  630. </TR>
  631. <% end if %>
  632. <TR>
  633. <TD height=10px><IMG height=10px width=100% src="images/shakuf.gif" alt=""></TD>
  634. </TR>
  635. <TR>
  636. <TABLE WIDTH=100% CELLSPACING=0 CELLPADDING=0>
  637. <TR>
  638. <TD WIDTH=100%>
  639. <SPAN class="small_text_c"><B><% = GetString(63,"string","Total") %>&nbsp;:&nbsp;</B></SPAN>
  640. <SPAN class="small_text_a"><% = Session("objESRO2").Basket.TotalItemsNumber("") %>&nbsp;<% = GetString(298,"string","Items") %>,&nbsp;<% = Session("objESRO2").Common.MyFormat.CurrencySign %><% = Session("objESRO2").Common.MyFormat.Format_Currency( Session("objESRO2").Basket.TotalAmount("") ) %></SPAN>
  641. </TD>
  642. <TD nowrap>
  643. <% if Session("CurrentFile") = "my_basket.asp" then %>
  644. <INPUT class="small_button_b" type="button" onmouseover="javascript: this.className='small_button_b_hover';" onmouseout="javascript: this.className='small_button_b';" value="<% = GetString(81,"string","Cancel Order") %>" title="<% = GetString(81,"title","Cancel Order") %>" id=btnCancel name=btnCancel onclick="javascript: open_url('catch.asp?action_type=free_basket');" >&nbsp;
  645. <INPUT style="display:none;" class="small_button_c" type="button" onmouseover="javascript: this.className='small_button_c_hover';" onmouseout="javascript: this.className='small_button_c';" value="<% = GetString(82,"string","Continue Shopping") %>" title="<% = GetString(82,"title","Continue Shopping") %>" id=btnContinue name=btnContinue onclick="javascript: open_url('default.asp');" >&nbsp;
  646. <INPUT class="small_button_a" type="button" onmouseover="javascript: this.className='small_button_a_hover';" onmouseout="javascript: this.className='small_button_a';" value="<% = GetString(83,"string","Proceed To Checkout") %>" title="<% = GetString(83,"title","Proceed To Checkout") %>" id=btnOrder name=btnOrder onclick="javascript: open_url('user_data.asp');" >
  647. <% end if %>
  648. </TD>
  649. </TR>
  650. </TR>
  651. <TR>
  652. <TD height=10px><IMG height=10px width=100% src="images/shakuf.gif" alt=""></TD>
  653. </TR>
  654. </TABLE>
  655.  
  656.  
  657.  
  658.  
  659.  
50 views