mess_init.c

这是一个使用 informix esql/c 技术开发的银行程序的部分代码。

#include <stdio.h>
main()
  {
    FILE *pf1,*pf2;
    char s[80];
    short i=0;
    pf1=fopen("/u/ebcsav/data/mess.txt","r");
    pf2=fopen("/u/ebcsav/data/mess.dat","w");
    while(1)
      {
        if(fgets(s,78,pf1)==NULL) break;
        fseek(pf2,i*80,0);
        fprintf(pf2,"%s",s);
        i++;
      }
    fclose(pf1);
    fclose(pf2);
  }