fix bug use credit Duplicate

xml/page_payment_credit2.xml

@@ -68,6 +68,7 @@
 
 	Var ReqAdddata22 = 0
 	Var timeout_Adddata22 = 0
+	GenHashWithTimeStamp PointCrm
 	
 </EventOpen>
 <Timeout> 1000 </Timeout>
@@ -161,6 +162,8 @@
 				Open "ROOT/taobin_project/xml/page_thankyou.xml" 
 			EndIf
 
+			Var ReqAdddata22 = 0
+
 		EndIf
     
 			
@@ -193,6 +196,12 @@
    Var ShowErrorText = "Enable"
    Refresh
 
+   If ReqAdddata22 = 1 Then 
+	
+		Var ReqAdddata22 = 0
+		
+	EndIf
+
 
 </EventActionError>
 
@@ -620,9 +629,9 @@
    
 
 	Var BmiYear = ""
-	Var PointCrm = ""
+	Var PointCrm1 = ""
 	Var GetScore = ""
-    AddData 13 TelephoneNumber  BmiYear PointCrm GetScore
+    AddData 13 TelephoneNumber  BmiYear PointCrm1 GetScore
 
 
 	Var ShowTextNumber1 = "Invisible"
@@ -769,12 +778,12 @@
 
 			If SumCreditAmount >= PayAmount Then 
 
-				GenHashWithTimeStamp PointCrm
-
-				Var BmiYear = PayAmount
-				Var GetScore = "useCredit"
-				AddData 22 TelephoneNumber  BmiYear PointCrm GetScore
-				Var ReqAdddata22 = 1
+				If ReqAdddata22 = 0 Then 
+					Var BmiYear = PayAmount
+					Var GetScore = "useCredit"
+					AddData 22 TelephoneNumber  BmiYear PointCrm GetScore
+					Var ReqAdddata22 = 1
+				EndIf
 
 				
 			Else