fix digit phone malay and 0x

This commit is contained in:
pichet 2023-05-23 11:26:26 +07:00
parent f3e583b26a
commit c5fa318d1d
5 changed files with 20 additions and 67 deletions

View file

@ -58,7 +58,7 @@
Var MaxNumber = 10
If CountryName = "Malaysia" Then
Var MaxNumber = 11
EndIf
If CountryName = "Indonesia" Then
@ -545,26 +545,17 @@
<Volume> SoundVolume </Volume>
<EventClick>
DEBUGVAR "PICHET"
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 2
Trim Tel2D 1
If Tel2D = "06" Then
If Tel2D = "0" 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
GETACCEXT TelephoneNumber 19

View file

@ -135,7 +135,7 @@
Var MaxNumber = 10
If CountryName = "Malaysia" Then
Var MaxNumber = 11
EndIf
If CountryName = "Indonesia" Then
@ -566,20 +566,12 @@
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 2
Trim Tel2D 1
If Tel2D = "06" Then
If Tel2D = "0" 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

View file

@ -134,7 +134,7 @@
Var MaxNumber = 10
If CountryName = "Malaysia" Then
Var MaxNumber = 11
EndIf
If CountryName = "Indonesia" Then
@ -556,24 +556,11 @@
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 2
Trim Tel2D 1
If Tel2D = "06" Then
If Tel2D = "0" 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

View file

@ -66,7 +66,7 @@
Var PosX_Cancel = 397
If CountryName = "Malaysia" Then
Var MaxNumber = 11
EndIf
If CountryName = "Indonesia" Then
@ -662,21 +662,13 @@
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 2
Trim Tel2D 1
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
If Tel2D = "0" Then
Var Tel2DFlag = 1
EndIf
If Tel2DFlag = 1 Then

View file

@ -38,7 +38,7 @@
Var MaxNumber = 10
If CountryName = "Malaysia" Then
Var MaxNumber = 11
EndIf
If CountryName = "Indonesia" Then
@ -541,21 +541,12 @@
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 2
Trim Tel2D 1
If Tel2D = "06" Then
If Tel2D = "0" 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