pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

fix bug use credit Duplicate

Browse source
This commit is contained in:
miggaze 2022-01-20 19:46:12 +07:00
parent 1d5ef4bcae
commit 65eff408f9
2 changed files with 42 additions and 26 deletions
Download patch file Download diff file Expand all files Collapse all files

43
xml/page_payment_credit3.xml
View file

@ -125,6 +125,7 @@
<EventActionOk>
If ReqAdddata22 = 1 Then
If NotEnoughFlag = 0 Then
Var Seeker.CreditReferenceTmp = "" + PayAmount
@ -185,6 +186,8 @@
EndIf
Var ReqAdddata22 = 0
EndIf
</EventActionOk>
@ -270,32 +273,36 @@
<EventClick>
If ReqAdddata22 = 0 Then
If NotEnoughFlag = 0 Then
If NotEnoughFlag = 0 Then
Var BmiYear = PayAmount
Var GetScore = "useCredit"
AddData 22 TelephoneNumber BmiYear PointCrm GetScore
Var BmiYear = PayAmount
Var GetScore = "useCredit"
AddData 22 TelephoneNumber BmiYear PointCrm GetScore
Var ReqAdddata22 = 1
Var ReqAdddata22 = 1
Else
Else
SAVELOG "payment_credit3-p227."
SAVELOG "payment_credit3-p227."
Var BmiYear = SumCreditAmount
Var GetScore = "useCredit"
AddData 22 TelephoneNumber BmiYear PointCrm GetScore
Var ReqAdddata22 = 1
Var BmiYear = SumCreditAmount
Var GetScore = "useCredit"
AddData 22 TelephoneNumber BmiYear PointCrm GetScore
Var ReqAdddata22 = 1
EndIf
EndIf