Section("Dokument", "")
{
   if ( !Def("RodzajDokumentu"))
   {
      Def("RodzajDokumentu", "MG")
      info("Import dokumentˇw do bufora karototeki dokumentˇw magazynowych.")
   }

   Info("Dokument: ", [kod])

   if ( equal(Def("RodzajDokumentu"), "MG") )
   {
      MakeSec("DokumentMG")
      {
         $kod    = [kod]
         $nazwa    = [nazwa]
//         $rezerwacja    = [rozlmg]
         $kodMag = [kodMag]
         $data_wystawienia = [datasp]   
         $data_operacji = [data]
         $typ_dokumentu = [typ_dk]
         $seria = [seria]
         $serianr = [serianr]
         $termin = [termin]

         $khkod = [kodKH]
         $khnazwa = [khnazwa]
         $khadres = [khadres]
         $khdom = [khdom]
         $khlokal = [khlokal]
         $khnip = [khnip]
         $khkodpocz = [khkodpocz]
         $khmiasto = [khmiasto]

         $odebrane = [odebrane]
         $opis = [opis]
         $rejestr_vat = [rejestr_vat]

         Section("", "", "REPEAT")
         {
            switch( Translate( Name(), "L") )
            {
            case "pozycja dokumentu"
               if ( !equal([typ_pozycji], "1") )   // jeťli nie jest to komplet
               {
                  MakeSec("Pozycja dokumentu")
                  {
                     $kod = [kod]
                     $ilosc_ewid = [ilosc]
                     //$wartosc = [wartNetto]
                     Section( "Nazwa_Dl", "Nazwa_Dl", "REPEAT")
                     {
                        $opis = [opis]
                     }
                  }
               }
               break

            case "notatka_dl"
               MakeSec("Notatka_Dl")
               {
                  $opis      = [opis]
               }
               break
            }
         }
      }
   }
}

Dokument{
   Notatka_Dl{
      opis =
   }
   rodzaj_dok =magazynowy
   nazwa =Wydanie z magazynu
   kodMag =MAG
//   flag =0
   datasp =2008-01-23
   data =2008-01-23
   typ_dk =WZ
   seria =mojWZ
   serianr =10
   termin =2008-01-23
   kodKH =Warski sc.
   khnazwa =Warski sc.
   khadres =Niska
   khdom =54
   khlokal =
   khmiasto =Szczebrzeszyn
   khkodpocz =22-450
   khnip =725-234-10-10
   odebrane =Aleksander Warski
   opis =
   Pozycja dokumentu{
      kod =Atlas 14 silnik
      opis_pozycji =Silnik odkurzacza Atlas 14
      jm =szt
      jmwp =szt
      ilosc =1.000000000000
      iloscwp =1.000000000000
      cena =100.000000000000
      wartNetto =100.000000000000
      typ_pozycji =0
   }
}