Importación de datos

vForum público de la plataforma de desarrollo Velneo

Moderador: vCoaches

Responder
Avatar de Usuario
TARUGO
vAdviser
vAdviser
Mensajes: 478
Registrado: 12 Ene 2006, 12:02
Ubicación: BIAR-ALICANTE-ESPAÑA

Importación de datos

Mensaje por TARUGO » 22 Nov 2016, 09:31

Tengo una importación que trae datos de un ODBC. La base de datos tiene dos teléfonos, sin diferenciar entre fijo y móvil y nosotros tenemos fijo y móvil por separado, para poder enviar SMS. En la imagen adjunta pongo el proceso para dicriminar entre fijo y móvil, pero hace lo que quiere. A ver si alguien me puede ayudar.

Gracias
Adjuntos
movil.jpg
(52.77 KiB) No descargado aún

Avatar de Usuario
TARUGO
vAdviser
vAdviser
Mensajes: 478
Registrado: 12 Ene 2006, 12:02
Ubicación: BIAR-ALICANTE-ESPAÑA

Re: Importación de datos

Mensaje por TARUGO » 22 Nov 2016, 09:34

Pongo el código por si no se ve el adjunto

Set movil , ""
Set fijo , ""

Set tel1 , fQuitarEspacios( «ODBC-GET-DATO( 'Handle', 11 ) )
Set tel2 , fQuitarEspacios( «ODBC-GET-DATO( 'Handle', 12 ) )

if 'tel1'&(!'tel2')
Set movil , fDecidirDato( (fLeft( 'tel1', 1 )=("6") | fLeft( 'tel1', 1 )=("7")), 'tel1', "" )
Set fijo , fDecidirDato( (fLeft( 'tel1', 1 )!("6") & fLeft( 'tel1', 1 )!("7")), 'tel1', "" )

if 'tel2'&(!'tel1')
Set movil , fDecidirDato( (fLeft( 'tel2', 1 )=("6") | fLeft( 'tel2', 1 )=("7")), 'tel2', "" )
Set fijo , fDecidirDato( (fLeft( 'tel2', 1 )!("6") & fLeft( 'tel2', 1 )!("7")), 'tel2', "" )

if 'tel1'&'tel2'
Set movil , fDecidirDato( (fLeft( 'tel1', 1 )=("6") | fLeft( 'tel1', 1 )=("7")), 'tel1', fDecidirDato( (fLeft( 'tel2', 1 )=("6") |
fLeft( 'tel2', 1 )=("7")), 'tel2', "" ) )
Set fijo , fDecidirDato( (fLeft( 'tel1', 1 )!("6") & fLeft( 'tel1', 1 )!("7")), 'tel1',fDecidirDato( (fLeft( 'tel2', 1 )!("6") &
fLeft( 'tel2', 1 )!("7")), 'tel2', "" ) )

if (fLeft( 'tel1', 1 )=("6") | fLeft( 'tel1', 1 )=("7"))&(fLeft( 'tel2', 1 )=("6") | fLeft( 'tel2', 1 )=("7"))
Set movil , 'tel1'
Set fijo , 'tel2'

if (fLeft( 'tel1', 1 )!("6") & fLeft( 'tel1', 1 )!("7"))&(fLeft( 'tel2', 1 )!("6") & fLeft( 'tel2', 1 )!("7"))
Set movil , 'tel1'
Set fijo , 'tel2'

Responder