AYUDA PARA DESARROLLADORES

Contador Datos

Determina la cantidad de Datos Supletorios de una cuenta determinada o de un grupo de cuentas.

EXCN.AbrirEmpresa "" 
EXCN.LeerDatos "4100000043" 
MsgBox EXCN.ContadorDatos

EXCN.AbrirEmpresa "" 
EXCN.LeerDatos "410*" 
For x = 1 To EXCN.ContadorDatos 
MsgBox EXCN.Datos(x).Direccion 
'etc. 
Next

Crear Datos

Con este comando se puede crear una ficha de datos supletorios de una cuenta del plan contable de ContaNet. Si la cuenta no existe la crea. En caso de no existir se actualizará la cuenta si el valor de Actualizar es verdadero.
En caso de que no queramos actualizar un campo, debemos poner "-1" en ese campo. En caso de que lo dejemos vacío "" se borrara de los datos supletorios de la cuenta.

Cuenta: Código Contable de hasta 10 dígitos como máximo.
Titulo: Nombre asociado a la cuenta contable de 35 caracteres.
NIF: Campo de 18 caracteres para el NIF.
Direccion: Campo de 40 caracteres para la dirección.
CP: Código postal.
Municipio: Campo de 40 caracteres para el municipio.
Provincia: Campo de 30 caracteres para la provincia.
CVP: Campo de 1 caracter para (C)ompras, (V)entas y (P)agos.
Importe_347: Importe acumulado para 347.
Telefono: Campo de 15 caracteres para el teléfono.
Fax: Campo de 15 caracteres para el fax.
Riesgo: Campo para determinar el importe del riesgo que se contraerá con el cliente o proveedor.
TipoIva: Tipo de IVA de la tabla de ContaNet. No es el porcentaje.
Notas: Notas asociadas a la ficha que se esta creando de 80 caracteres.

Campos Opcionales

Actualizar:Para que actualice la ficha si esta creada debemos poner en este campo "True".
Pais: Se debe poner las siglas del pais según ISO 6391.
Vencimientos: Información de como gestionar los documentos de cartera.
DiasDePago: Día de pago para Clientes/Proveedores.
Email: Campo de 80 caracteres para el email.
PaginaWeb: Campo de 80 caracteres para la Página Web.

EXCN.AbrirEmpresa "" 
EXCN.CrearDatos Cuenta: = "4300000001", Titulo: = "Jose Perez",NIF:="XXXX",Direccion:="C/. XXX",CP:= "38205",Municipio:= "La Laguna",Provincia:= "Tenerife",CVP:= "V",Importe_347:=0,Telefono:="922 657572",Fax:="922 657388",Riesgo:= 0,TipoIva:= "02",Notas:="" 
EXCN.CerrarEmpresa

EXCN.AbrirEmpresa "" 
EXCN.CrearDatos Cuenta: = "4300000001", Titulo: = "-1",NIF:="-1",Direccion:="-1",CP:= "-1",Municipio:= "",Provincia:= "-1",CVP:= "",Importe_347:=0,Telefono:="-1",Fax:="-1",Riesgo:= 0,TipoIva:="03",Notas:="Notas de pruebas", Actualizar:=True, Pais:="ES", Vencimientos:="",DiasdePago:"30 60 90",Email:="lg@ContaNet.es",Paginaweb:="www.ContaNet.es"
EXCN.CerrarEmpresa

Datos

Con esta función podremos analizar diversas propiedades de los datos supletorios usando el método de LeerDatos.

EXCN.Datos(x).CP: Codigo postal asignado a esta cuenta.
EXCN.Datos(x).Cuenta: Codigo contable de la cuenta analizada.
EXCN.Datos(x).CVP: La letra de si son Compras, Ventas o Patrimonio lo que se declara en el modelo de hacienda 347 con esta cuenta..
EXCN.Datos(x).DiasDePago: EL número de dias de pago que se ha especificado con esta cuenta.
EXCN.Datos(x).Dirección: La dirección asociada a esta cuenta.
EXCN.Datos(x).Email: El E-Mail asociado a esta cuenta.
EXCN.Datos(x).Fax: El Fax asociado a esta cuenta.
EXCN.Datos(x).Importe_347: El Importe del model347 de hacienda asociado a esta cuenta.
EXCN.Datos(x).Municipio: El Municipio asociado a esta cuenta.
EXCN.Datos(x).NIF: El NIF asociado a esta cuenta.
EXCN.Datos(x).Notas: Las notas de datos supletorios asociado a esta cuenta.
EXCN.Datos(x).PaginaWeb: La página web asociado a esta cuenta.
EXCN.Datos(x).Pais: El País asociado a esta cuenta.
EXCN.Datos(x).Provincia: La Provincia asociado a esta cuenta.
EXCN.Datos(x).Riesgo: El Riesgo que se ha asociado a esta cuenta.
EXCN.Datos(x).Telefono: El Teléfono asociado a esta cuenta.
EXCN.Datos(x).TipoIva: El Tipo de IVA que asociamos a esta cuenta, como ejemplo, le asignamos el tipo 6 que contiene el 21%.
EXCN.Datos(x).Titulo: El Titulo asociado a esta cuenta contable.
EXCN.Datos(x).Vencimientos: Los días de Vencimiento asociados a esta cuenta.

EXCN.AbrirEmpresa "" 
EXCN.LeerDatos "4000000001"
For x = 1 To EXCN.ContadorDatos
MsgBox EXCN.Datos(x).Titulo
MsgBox EXCN.Datos(x).Direccion
 ... 
Next

EXCN.AbrirEmpresa "" 
EXCN.LeerDatos " 
For x = 1 To EXCN.ContadorDatos 
MsgBox EXCN.Datos(x).Titulo 
MsgBox EXCN.Datos(x).Direccion 
 ... 
Next

Leer Datos

Mediante esta función podremos leer los datos supletorios de un Código contable o de un grupo de ellos

Cuenta: Nos identifica la cuenta contable del apunte examinado. Variable de 1 a 10 dígitos, siendo como minimo, los tres primeros dígitos cuentas del mayor y los siguientes según la configuración de la empresa.

Campos Opcionales

Titulo:Nombre de la cuenta límite de 35 caracteres.

Se pueden utilizar las siguientes propiedades con este metodo:

EXCN.AbrirEmpresa  "" 
 EXCN.LeerDatos "4000000001" 
For x = 1 To EXCN.ContadorDatos 
MsgBox EXCN.Datos(x).Titulo 
MsgBox EXCN.Datos(x).Direccion 
... 
Next

EXCN.AbrirEmpresa  "" 
 EXCN.LeerDatos "" 
For x = 1 To EXCN.ContadorDatos 
MsgBox EXCN.Datos(x).Titulo 
MsgBox EXCN.Datos(x).Direccion 
... 
Next