#include "stdio.h"
#include "\kurssit\c\ali\mjonot.h"
#include "\kurssit\c\kerho\talletus.2\kerho.h"

/****************************************************************************/
int                       /*                                                */
lisaa_jasen_rivi(         /* 0 = lis„ys onnistui, 1 = lis„ys ep„onnistui    */
  Kerho_tyyppi *kerho    ,/* s,t Kerho johon rivi lis„t„„n                  */
  char *rivi              /* s   Rivi joka sis„lt„„ lis„tt„v„n tiedot       */
)
/* 
** Funktiolla lis„t„„n j„senist””n merkkijonossa rivi oleva j„sen.
** J„senen tiedot t„ytyy olla eroteltuina erotinmerkeill„.
**
** Globaalit: KENTAT,KENTTIA
** Muuttuu:   *rivi
** Kutsuu:    kopioi_jono
**            poista_tyhjat
**            palanen
**            lisaa_jasen
** Esimerkki: rivi  = Ankka Aku          |010245-123U|Ankkakuja 6 |12345|...
**            jasen = Ankka Aku,010245-123U,Ankkakuja 6,12345...
----------------------------------------------------------------------------*/
{
  char st[80];
  int j; /* ENSIMMAINEN ja SEURAAVA tarvitsevat! */
  Jasen_tyyppi jasen;

  ENSIMMAINEN(jasen.nimi,rivi);          
  SEURAAVA(jasen.sotu);
  SEURAAVA(jasen.katuosoite);
  SEURAAVA(jasen.postinumero);
  SEURAAVA(jasen.postiosoite);
  SEURAAVA(jasen.kotipuhelin);
  SEURAAVA(jasen.tyopuhelin);
  SEURAAVA(jasen.autopuhelin);
  SEURAAVA(st);  jasen.liittymisvuosi = jono_intiksi(st,"%d");
  SEURAAVA(st);  jasen.jmaksu         = jono_doubleksi(st,"%lf");
  SEURAAVA(st);  jasen.maksu          = jono_doubleksi(st,"%lf");
  SEURAAVA(jasen.lisatietoja);

  return lisaa_jasen(kerho,&jasen);
}