home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 September / PCWK996.iso / polskie / orhmet / dfdisk / przrapok.sam < prev    next >
Text File  |  1996-03-01  |  832b  |  39 lines
  1. ORHMET Warszawa
  2. 02-466 Warszawa
  3. ul. Stajena 1/3
  4. tel. 23-93-85
  5.      23-89-03
  6.  
  7. Ten plik zawiera przykladowy program w przykladowym jezyku ( podobny do C ),
  8. ktory z wykorzystaniem blibliotek rlibc/clipface
  9. realizuje przesylanie raportu okresowego do komputera.
  10.  
  11.  
  12. // Zlecenie przesylania raportu okresowego
  13. // paramatery:
  14. //  data_od - data poczatkowa, 6 znakow w formacie RRMMDD
  15. //  data_do - data koncowa, 6 znakow w formacie RRMMDD
  16.  
  17. kod_zwr = DFSendPeriodStart();
  18. if ( !kod_zwr_ok( kod_zwr, id_rozkazu ) )
  19. {
  20.   // cos zle 
  21.   exit;
  22. }
  23.  
  24. do
  25. {
  26.   // linia - 1 wiersz raportu ( 18 zankow )
  27.   kod_zwr = DFSendPeriodCont( linia )
  28.   if ( !kod_zwr_ok( kod_zwr, id_rozkazu ) )
  29.   {
  30.     // cos zle 
  31.     exit;
  32.   }
  33.   if ( kod_zwr==WE )
  34.   {
  35. // Zapisz do pliku/wyswietl linie raportu
  36.   }
  37. } while ( kod_zwr==WE );
  38.  
  39.