Received: from postgresql.org.org (webmail.postgresql.org [216.126.85.28])
	by postgresql.org (8.11.3/8.11.1) with SMTP id f63K3xa54800
	for <pgsql-interfaces@postgresql.org>;
	Tue, 3 Jul 2001 16:03:59 -0400 (EDT)
	(envelope-from pgsql-interfaces-owner@postgresql.org)
Received: from news.tht.net (news.hub.org [216.126.91.242])
	by postgresql.org (8.11.3/8.11.1) with ESMTP id f5QEW7a81911
	for <pgsql-interfaces@postgresql.org>;
	Tue, 26 Jun 2001 10:32:07 -0400 (EDT)
	(envelope-from news@news.tht.net)
Received: (from news@localhost) by news.tht.net (8.11.4/8.11.4) id
 f5QEOtu06480
	for pgsql-interfaces@postgresql.org;
	Tue, 26 Jun 2001 10:24:55 -0400 (EDT) (envelope-from news)
From: Gianluigi Roveda <roveda@omega.it>
X-Newsgroups: comp.databases.postgresql.interfaces
Subject: PGresult and for-cycle
Date: Tue, 26 Jun 2001 16:23:09 +0200
Organization: NETTuno
Lines: 55
Message-ID: <3B389ACD.C0824543@omega.it>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Complaints-To: news@nettuno.it
X-Mailer: Mozilla 4.75 [en] (Win98; U)
X-Accept-Language: en
To: pgsql-interfaces@postgresql.org
X-Archive-Number: 200107/15
X-Sequence-Number: 1768

I develop this code:

 PQclear(sol);
 psqlDisconnettiDB(DB);

 ris=(abbonamenti_t **) calloc(nabb,sizeof(abbonamenti_t *));
 sol2=(PGresult **) calloc(nabb,sizeof(PGresult *));

 for (i=0;i<nabb;i++)
 {
    ris[i]=(abbonamenti_t *) calloc(1,sizeof(abbonamenti_t));

    st1=astrcpy("SELECT rivabbval.PrezzoLit, rivabbval.PrezzoEur,
rivabbval.DataInizioValidita, rivabbval.DataFineValidita,
rivtipabb.Descrizione FROM rivabbval, rivtipabb WHERE
rivabbval.IDrav=");
    st2=astrcat(st1,key[i]);
    free(st1);
    st1=astrcat(st2," and rivtipabb.IDrta=rivabbval.IDrta;");
    free(st2);

    DB=(PGconn *) psqlConnettiDB0("mulino_db");
    psqlBeginTransaction(DB);
    psqlLockTable(DB,"rivvalarr","ACCESS EXCLUSIVE MODE");
{FILE *E; E=fopen("problem.txt","a");fprintf(E,"BOOM 2-1 SQL abb
-%s-\n",st1);fclose(E);}

    sol2[i]=PQexec(DB,st1);

    free(st1);
/***/
    ris[i]->lire_abb=atof(PQgetvalue(sol2[i],i,0));
    ris[i]->euro_abb=atof(PQgetvalue(sol2[i],i,1));
    ris[i]->inizio_abb=astrcpy(PQgetvalue(sol2[i],i,2));
    ris[i]->fine_abb=astrcpy(PQgetvalue(sol2[i],i,3));
    ris[i]->abbo=astrcpy(PQgetvalue(sol2[i],i,4));

    PQclear(sol2[i]);
    psqlDisconnettiDB(DB);
 }

the 1st loop is OK, the 2nd produces a core and stops at /***/.
Why ?

Could you help me ?
-----------------------------------
Gianluigi  Roveda
E-mail: roveda@omega.it

Omega Generation S.R.L.
Via Montebello, 2  40121  Bologna
TEL   051/4210311
FAX  051/4211039