Private Function diretel.frm_marcar.Form_Load.2.txt

Calls out:


IsNull

Incoming calls for diretel.frm_marcar.Form_Load.2.txt


Decompiled source code follows:

Global4304916.Fields.Item("puerto").Value
frm_marcar.6.MSComm1.CommPort = #STACKVAR-UNINITIALISED-4264
Global4304916.Fields.Item("settings").Value
frm_marcar.6.MSComm1.Settings = 2
If (IsNull(frm_principal.Data1.Recordset.Fields.Item("telefono1")) != 0)
      opt_telefono1.Caption = "Teléfono 1 - "
      opt_telefono1.Enabled = False
Else
      opt_telefono1.Caption = (4232336 + frm_principal.Data1.Recordset.Fields.Item("telefono1").Value)
End If
If (IsNull(frm_principal.Data1.Recordset.Fields.Item("telefono2")) != 0)
      opt_telefono2.Caption = "Teléfono 2 - "
      opt_telefono2.Enabled = False
Else
      opt_telefono2.Caption = (4232368 + frm_principal.Data1.Recordset.Fields.Item("telefono2").Value)
End If
End Sub