From cc169b233b1fa07fab1d09cf2253d8babc62d847 Mon Sep 17 00:00:00 2001
From: Pakin <pakin.t@forth.co.th>
Date: Fri, 29 Sep 2023 11:31:51 +0700
Subject: [PATCH] add send data coupon discount

---
 xml/event/pepween/page_pepween_random.xml | 125 ++++++++++++++++++++++
 xml/event/pepween/page_pepween_result.xml |  25 +----
 2 files changed, 128 insertions(+), 22 deletions(-)

diff --git a/xml/event/pepween/page_pepween_random.xml b/xml/event/pepween/page_pepween_random.xml
index 02c5262e..75eb2bb8 100644
--- a/xml/event/pepween/page_pepween_random.xml
+++ b/xml/event/pepween/page_pepween_random.xml
@@ -168,6 +168,31 @@
 
             ; Send to server
 
+            Var CodeType = ""
+            Var var2 = "X"
+            Var var3 = "X"
+
+            If UserCouponReward = "dis30 Then
+                Var CodeType = "115"
+            EndIf
+
+            If UserCouponReward = "dis50" Then
+                Var CodeType = "116"
+            EndIf
+
+            If UserCouponReward = "dis100" Then
+                Var CodeType = "114"
+            EndIf
+
+            ; Empty Random 
+            ;If CodeType = "" Then
+            ;    ; TODO: Handle just in case
+            ;Else
+            ;    
+            ;EndIf
+
+            AddData 36 TelephoneNumber CodeType var2 var3
+
             Open "ROOT/taobin_project/xml/event/pepween/page_pepween_result.xml"
         </EventOnClick>
     </Button>
@@ -189,6 +214,31 @@
 
             ; Send to server
 
+            Var CodeType = ""
+            Var var2 = "X"
+            Var var3 = "X"
+
+            If UserCouponReward = "dis30 Then
+                Var CodeType = "115"
+            EndIf
+
+            If UserCouponReward = "dis50" Then
+                Var CodeType = "116"
+            EndIf
+
+            If UserCouponReward = "dis100" Then
+                Var CodeType = "114"
+            EndIf
+
+            ; Empty Random 
+            ;If CodeType = "" Then
+            ;    ; TODO: Handle just in case
+            ;Else
+            ;    
+            ;EndIf
+
+            AddData 36 TelephoneNumber CodeType var2 var3
+
             Open "ROOT/taobin_project/xml/event/pepween/page_pepween_result.xml"
         </EventOnClick>
     </Button>
@@ -210,6 +260,31 @@
 
             ; Send to server
 
+            Var CodeType = ""
+            Var var2 = "X"
+            Var var3 = "X"
+
+            If UserCouponReward = "dis30 Then
+                Var CodeType = "115"
+            EndIf
+
+            If UserCouponReward = "dis50" Then
+                Var CodeType = "116"
+            EndIf
+
+            If UserCouponReward = "dis100" Then
+                Var CodeType = "114"
+            EndIf
+
+            ; Empty Random 
+            ;If CodeType = "" Then
+            ;    ; TODO: Handle just in case
+            ;Else
+            ;    
+            ;EndIf
+
+            AddData 36 TelephoneNumber CodeType var2 var3
+
             Open "ROOT/taobin_project/xml/event/pepween/page_pepween_result.xml"
         </EventOnClick>
     </Button>
@@ -231,6 +306,31 @@
 
             ; Send to server
 
+            Var CodeType = ""
+            Var var2 = "X"
+            Var var3 = "X"
+
+            If UserCouponReward = "dis30 Then
+                Var CodeType = "115"
+            EndIf
+
+            If UserCouponReward = "dis50" Then
+                Var CodeType = "116"
+            EndIf
+
+            If UserCouponReward = "dis100" Then
+                Var CodeType = "114"
+            EndIf
+
+            ; Empty Random 
+            ;If CodeType = "" Then
+            ;    ; TODO: Handle just in case
+            ;Else
+            ;    
+            ;EndIf
+
+            AddData 36 TelephoneNumber CodeType var2 var3
+
             Open "ROOT/taobin_project/xml/event/pepween/page_pepween_result.xml"
         </EventOnClick>
     </Button>
@@ -252,6 +352,31 @@
 
             ; Send to server
 
+            Var CodeType = ""
+            Var var2 = "X"
+            Var var3 = "X"
+
+            If UserCouponReward = "dis30 Then
+                Var CodeType = "115"
+            EndIf
+
+            If UserCouponReward = "dis50" Then
+                Var CodeType = "116"
+            EndIf
+
+            If UserCouponReward = "dis100" Then
+                Var CodeType = "114"
+            EndIf
+
+            ; Empty Random 
+            ;If CodeType = "" Then
+            ;    ; TODO: Handle just in case
+            ;Else
+            ;    
+            ;EndIf
+
+            AddData 36 TelephoneNumber CodeType var2 var3
+
             Open "ROOT/taobin_project/xml/event/pepween/page_pepween_result.xml"
         </EventOnClick>
     </Button>
diff --git a/xml/event/pepween/page_pepween_result.xml b/xml/event/pepween/page_pepween_result.xml
index 94ec2a6b..67c382cd 100644
--- a/xml/event/pepween/page_pepween_result.xml
+++ b/xml/event/pepween/page_pepween_result.xml
@@ -29,35 +29,16 @@
     <EventTimeout>
         DEBUGVAR Timeout
 
-        If PayOfflineMode = 1 Then
-            Var ServerRespond = 0
-            Var CouponResponeFailed = 1
-        EndIf
 
-        If Timeout > 60 Then
+
+        If Timeout > 5 Then
             ; Check and return Error
-            Var CouponResponeFailed = 1
-            Open "ROOT/taobin_project/xml/event/pepween/page_pepween_error.xml"
+            Open "ROOT/taobin_project/xml/page_lid_straw.xml"
         EndIf
 
         Var Timeout = Timeout + 1
         TimerReset
     </EventTimeout>
-    
-    <EventActionOk>
-        If CouponResponeFailed = 0 Then
-            ; TODO:
-            ;Open "ROOT/taobin_project/xml/event/pepween/page_pepween_error.xml"
-        EndIf
-
-    </EventActionOk>
-
-    <EventActionError>
-        ; TODO: open coupon send error page
-        If CouponResponeFailed = 1 Then
-            Open "ROOT/taobin_project/xml/event/pepween/page_pepween_error.xml"
-        EndIf
-    </EventActionError>
 
     <Video>
         <X> 0 </X>