20 lines
243 B
Text
20 lines
243 B
Text
|
|
||
|
|
|
||
|
|
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
|