...

xml/page_check_member.xml

@@ -19,13 +19,25 @@
 
 	Var GetCreditFlag = 0
 
+	Var Xtext19 = 260
+	
+
     If show_eng = "true" Then 
 		Var DirImage = "ROOT/taobin_project/image/collectiing_en"
+		Var Xtext19 = 154
 	Else
 		Var DirImage = "ROOT/taobin_project/image/collectiing"
 	EndIf
 
-	Var FlagWaitUpdateCoinAmount = 0
+	
+
+	Var number7 = ""
+	Var number8 = ""
+	Var number9 = ""
+	Var number10 = ""
+
+	Var StepX = 0
+
 </EventOpen>
 <Timeout> 1000 </Timeout>
 <EventTimeout> 
@@ -48,19 +60,58 @@
 
 
 <EventActionOk>
-	
-	If Ext1a = "ok" Then
 
-		Open "ROOT/taobin_project/xml/page_check_memeber2.xml" 
+	If StepX = 0 Then
+
+		If Ext1a = "ok" Then
+
+			Var TaobinName = Ext1d
+			Var TaobinCoupons = Ext1g
+			Var TaobinExpire = Ext1f
+			Var TaobinLevel = Ext1e
+
+			Var TNumberTaobinMemberXXX = TelephoneNumber
+
+			Trim TNumberTaobinMemberXXX 3
+			Var TNumberTaobinMemberXXX = TNumberTaobinMemberXXX + "-XXX-"
+			Var TNumberTaobinMemberXXX = TNumberTaobinMemberXXX + number7
+			Var TNumberTaobinMemberXXX = TNumberTaobinMemberXXX + number8
+			Var TNumberTaobinMemberXXX = TNumberTaobinMemberXXX + number9
+			Var TNumberTaobinMemberXXX = TNumberTaobinMemberXXX + number10
+
+
+			Var CoffeePointRank = Ext1b
+			INT CoffeePointRank
+
+
+
+			GETACCEXT TelephoneNumber 15
+
+			Var StepX = 1 
+
+		Else
+
+			Var ShowErrorText = "Enable"
+
+
+		EndIf
+	
 
 	Else
 
-		Var ShowErrorText = "Enable"
+		Var PolygonST1 = "Invisible"
+    	Var PolygonST2 = "Invisible"
+		Var CouponSTA =  "Invisible"
+    	Var CouponSTB =  "Invisible"
 
+		Var CouponPage = 1 
+		Var MakeDrinkState = 0
+		Open "ROOT/taobin_project/xml/page_check_member2.xml" 
 
 	EndIf
 	
 
+
 	
 	Refresh
   
@@ -94,6 +145,23 @@
 		Var Tel_Confirm_State = "Enable"
 	EndIf
 	Var ShowErrorText = "Invisible"
+
+	If TelNumLen = 7 Then
+		Var number7 = "1"
+	EndIf
+
+	If TelNumLen = 8 Then
+		Var number8 = "1"
+	EndIf
+
+	If TelNumLen = 9 Then
+		Var number9 = "1"
+	EndIf
+
+	If TelNumLen = 10 Then
+		Var number10 = "1"
+	EndIf
+
 </EventClick>
 </Button>
 
@@ -116,6 +184,23 @@
 		Var Tel_Confirm_State = "Enable"
 	EndIf
 	Var ShowErrorText = "Invisible"
+
+	If TelNumLen = 7 Then
+		Var number7 = "2"
+	EndIf
+
+	If TelNumLen = 8 Then
+		Var number8 = "2"
+	EndIf
+
+	If TelNumLen = 9 Then
+		Var number9 = "2"
+	EndIf
+
+	If TelNumLen = 10 Then
+		Var number10 = "2"
+	EndIf
+
 </EventClick>
 </Button>
 
@@ -138,6 +223,23 @@
 		Var Tel_Confirm_State = "Enable"
 	EndIf
 	Var ShowErrorText = "Invisible"
+
+	If TelNumLen = 7 Then
+		Var number7 = "3"
+	EndIf
+
+	If TelNumLen = 8 Then
+		Var number8 = "3"
+	EndIf
+
+	If TelNumLen = 9 Then
+		Var number9 = "3"
+	EndIf
+
+	If TelNumLen = 10 Then
+		Var number10 = "3"
+	EndIf
+
 </EventClick>
 </Button>
 
@@ -160,6 +262,23 @@
 		Var Tel_Confirm_State = "Enable"
 	EndIf
 	Var ShowErrorText = "Invisible"
+
+		If TelNumLen = 7 Then
+		Var number7 = "4"
+	EndIf
+
+	If TelNumLen = 8 Then
+		Var number8 = "4"
+	EndIf
+
+	If TelNumLen = 9 Then
+		Var number9 = "4"
+	EndIf
+
+	If TelNumLen = 10 Then
+		Var number10 = "4"
+	EndIf
+
 </EventClick>
 </Button>
 
@@ -182,6 +301,23 @@
 		Var Tel_Confirm_State = "Enable"
 	EndIf
 	Var ShowErrorText = "Invisible"
+
+	If TelNumLen = 7 Then
+		Var number7 = "5"
+	EndIf
+
+	If TelNumLen = 8 Then
+		Var number8 = "5"
+	EndIf
+
+	If TelNumLen = 9 Then
+		Var number9 = "5"
+	EndIf
+
+	If TelNumLen = 10 Then
+		Var number10 = "5"
+	EndIf
+
 </EventClick>
 </Button>
 
@@ -204,6 +340,23 @@
 		Var Tel_Confirm_State = "Enable"
 	EndIf
 	Var ShowErrorText = "Invisible"
+
+	If TelNumLen = 7 Then
+		Var number7 = "6"
+	EndIf
+
+	If TelNumLen = 8 Then
+		Var number8 = "6"
+	EndIf
+
+	If TelNumLen = 9 Then
+		Var number9 = "6"
+	EndIf
+
+	If TelNumLen = 10 Then
+		Var number10 = "6"
+	EndIf
+
 </EventClick>
 </Button>
 
@@ -226,6 +379,23 @@
 		Var Tel_Confirm_State = "Enable"
 	EndIf
 	Var ShowErrorText = "Invisible"
+
+		If TelNumLen = 7 Then
+		Var number7 = "7"
+	EndIf
+
+	If TelNumLen = 8 Then
+		Var number8 = "7"
+	EndIf
+
+	If TelNumLen = 9 Then
+		Var number9 = "7"
+	EndIf
+
+	If TelNumLen = 10 Then
+		Var number10 = "7"
+	EndIf
+
 </EventClick>
 </Button>
 
@@ -248,6 +418,22 @@
 		Var Tel_Confirm_State = "Enable"
 	EndIf
 	Var ShowErrorText = "Invisible"
+
+	If TelNumLen = 7 Then
+		Var number7 = "8"
+	EndIf
+
+	If TelNumLen = 8 Then
+		Var number8 = "8"
+	EndIf
+
+	If TelNumLen = 9 Then
+		Var number9 = "8"
+	EndIf
+
+	If TelNumLen = 10 Then
+		Var number10 = "8"
+	EndIf
 </EventClick>
 </Button>
 
@@ -270,6 +456,23 @@
 		Var Tel_Confirm_State = "Enable"
 	EndIf
 	Var ShowErrorText = "Invisible"
+
+	If TelNumLen = 7 Then
+		Var number7 = "9"
+	EndIf
+
+	If TelNumLen = 8 Then
+		Var number8 = "9"
+	EndIf
+
+	If TelNumLen = 9 Then
+		Var number9 = "9"
+	EndIf
+
+	If TelNumLen = 10 Then
+		Var number10 = "9"
+	EndIf
+
 </EventClick>
 </Button>
 
@@ -293,6 +496,22 @@
 	TimerReset
 	Refresh
 	Var ShowErrorText = "Invisible"
+
+	If TelNumLen = 7 Then
+		Var number7 = "0"
+	EndIf
+
+	If TelNumLen = 8 Then
+		Var number8 = "0"
+	EndIf
+
+	If TelNumLen = 9 Then
+		Var number9 = "0"
+	EndIf
+
+	If TelNumLen = 10 Then
+		Var number10 = "0"
+	EndIf
 </EventClick>
 </Button>
 
@@ -399,7 +618,7 @@
 	
 
 <Image>
-<X> 260 </X>
+<X> Xtext19 </X>
 <Y> 521 </Y>
 <Filename> Var( DirImage + "/text_19.png" )</Filename>
 </Image>