ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

Forum AtoutFox : Re: transfert de données de VFP vers Postgresql   

Sujet

rss Flux RSS des derniers messages

Vous devez vous identifier pour pouvoir poser une question ou répondre.

jeu. 07 septembre 2017, 14h06
alahem1
Algérie Algérie

atoutfox.public.association

Re: transfert de données de VFP vers Postgresql

Bonjour,

Dans VFP, j'ai mis un point d'arrêt et récupéré le message d'erreur.
le message concerne un champ que j'ai oublié d'ajouter dans l'insertion (idetude Integer NOT NULL,)

la structure de la table etudiant de PG est :

idetudiant integer NOT NULL DEFAULT nextval('idetudiant_seq'::regclass),
 nomfr character(30),
 prenomfr character(30),
 datenaissance date NOT NULL,
 wilnaissance Integer NOT NULL,
 sexe  Integer NOT NULL,
 nationalite Integer NOT NULL,
 idetude Integer NOT NULL&& champ qui manquait dans cinsert
......


Le transfert des données de VFP vers PG :

LOCAL cinsert
cinsert = ''
**--
IF HandleConnect > 0
  i = 0
  Wait Window "connection a été réeussit"
  USE gfe005
  SELECT gfe005
  SCAN
    ......
    cinsert = "insert into etudiant ;
(nomfr, prenomfr, datenaissance, wilnaissance, sexe, nationionalite, idetude);
values (?nnom, ?nprenom, ?ndate, ?nwilaya, ?nsexe, ?nnation, ?netude)"

    nbre = SQLEXEC(lnHandleConnect, cinsert)
    IF nbre < 0
      Wait Window "l'insertion de l'enr. n° " + ALLTRIM(STR(i)) + " a échoué!!!"
    ENDIF
    SELECT gfe005
  ENDSCAN
Else
  Wait Window "la connection a échoué"
ENDIF


la table nationalite de PG est mise à jour correctement.

Désolé pour le dérangement.
Merci pour votre écoute et bonne journée.

Alain

Permalink : http://www.atoutfox.org/nntp.asp?ID=0000018430
18 388 messages dans le forum • Liste complète des messages

Publicité

Les pubs en cours :

www.atoutfox.org - Site de la Communauté Francophone des Professionnels FoxPro - v3.4.0 - © 2004-2017.
Cette page est générée par un composant COM+ développé en Visual FoxPro 9.0