add xendit and debug telnum

This commit is contained in:
miggaze 2022-09-19 11:48:38 +07:00
parent 4232f8669e
commit 49a688cb9f
18 changed files with 406 additions and 59 deletions

View file

@ -16,6 +16,7 @@
Var ShowTextNumber = "Enable"
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
Var Tel_Confirm_State = "Invisible"
Var GetCreditFlag = 0
@ -218,6 +219,7 @@
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
If TelNumLen = 7 Then
Var number7 = "1"
@ -259,6 +261,7 @@
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
If TelNumLen = 7 Then
Var number7 = "2"
@ -300,6 +303,7 @@
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
If TelNumLen = 7 Then
Var number7 = "3"
@ -341,6 +345,7 @@
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
If TelNumLen = 7 Then
Var number7 = "4"
@ -383,6 +388,7 @@
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
If TelNumLen = 7 Then
Var number7 = "5"
@ -424,6 +430,7 @@
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
If TelNumLen = 7 Then
Var number7 = "6"
@ -465,6 +472,7 @@
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
If TelNumLen = 7 Then
Var number7 = "7"
@ -506,6 +514,7 @@
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
If TelNumLen = 7 Then
Var number7 = "8"
@ -547,6 +556,7 @@
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
If TelNumLen = 7 Then
Var number7 = "9"
@ -589,6 +599,7 @@
TimerReset
Refresh
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
If TelNumLen = 7 Then
Var number7 = "0"
@ -629,6 +640,7 @@
EndIf
;Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
TimerReset
Refresh
@ -680,8 +692,38 @@
<Volume> SoundVolume </Volume>
<EventClick>
Var GetAccFlag = 1
GETACCEXT TelephoneNumber 13
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 2
If Tel2D = "06" Then
Var Tel2DFlag = 1
EndIf
If Tel2D = "07" Then
Var Tel2DFlag = 1
EndIf
If Tel2D = "08" Then
Var Tel2DFlag = 1
EndIf
If Tel2D = "09" Then
Var Tel2DFlag = 1
EndIf
If Tel2DFlag = 1 Then
Var GetAccFlag = 1
GETACCEXT TelephoneNumber 13
Else
Var ShowErrorText2 = "Enable"
;Var TelephoneNumber = ""
Var Tel_Confirm_State = "Invisible"
Refresh
EndIf
</EventClick>
</Button>
@ -736,7 +778,15 @@
<Y> 942 </Y>
<State> ShowErrorText </State>
<Refresh> "Enable" </Refresh>
<Filename> "ROOT/taobin_project/image/collectiing/text_show_notfound.png" </Filename>
<Filename> Var( DirImage + "/text_show_notfound.png") </Filename>
</Image>
<Image>
<X> 152 </X>
<Y> 920 </Y>
<State> ShowErrorText2 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_show_error5.png") </Filename>
</Image>