System{
   Info{
      NazwaProgramu ='Sage Symfonia Handel 2011.1.a' Symfonia Handel 2011.1.a
      WersjaSzablonu =3
   }
   Firma{
      nazwa =X
      miejscowosc =Kraków
      ulica =X
      kodpocz =X
      nip =X
      telefon =X
      email =X , X
      bank =BNP Paribas Bank Polska SA
      konto =PL X
   }
}
KategorieTowarow{
   KategoriaTowarow{
      nazwa =Towary
   }
}
Towar{
   kategoria =Towary
   kod =FQZn 1013/3009 LP
   nazwa =Podajnik automatyczny na sprezone powietrze PRESS QW FQZn 1013/3009 LP
   jm =szt
   stawkaVAT =23.00
   cenaA =75.00
   cenaAwal =
   cenaB =75.00
   cenaBwal =
   cenaC =75.00
   cenaCwal =
   cenaD =92.25
}
Towar{
   kategoria =Towary
   kod =FQZn 1013/8019 LP
   nazwa =Podajnik automatyczny na sprezone powietrze PRESS QW FQZn 1013/8019 LP
   jm =szt
   stawkaVAT =23.00
   cenaA =75.00
   cenaAwal =
   cenaB =75.00
   cenaBwal =
   cenaC =75.00
   cenaCwal =
   cenaD =91.50
}
Towar{
   kategoria =Towary
   kod =FQZn 1014/9007 LP
   nazwa =Podajnik automatyczny na sprezone powietrze PRESS QW FQZn 1014/9007 LP
   jm =szt
   stawkaVAT =23.00
   cenaA =75.00
   cenaAwal =
   cenaB =75.00
   cenaBwal =
   cenaC =75.00
   cenaCwal =
   cenaD =91.50
}

#format "AMS"
#Disable  "2"  //poziom ostrzeżeń 1 (m.in. bez ostrzeżenia "Pole nie znalezione")
#RodzajDokumentu ""


// Czy umieszczać dane we właściwym katalogu i rodzaju (tworząc je jeśli takich nie było)?
// 1 - tak, 2 - nie, 3 - zadaj pytanie
#DoKataloguKH 2
#DoKataloguTW 2
#DoKataloguWR 2
#DoKataloguUR 2
#DoKataloguSP 2
#DoKataloguZK 2
#DoKataloguMG 2

#DoRodzajuKH 2
#DoRodzajuTW 2
#DoRodzajuWR 2
#DoRodzajuUR 2
#DoRodzajuSP 2
#DoRodzajuZK 2
#DoRodzajuMG 2



Section( "INFO", "INFO")
{
   switch ( [Wersja szablonu] )
   {
   case "3"
   case "3.1"
      break
   case else
      if (  equal(ASK("Wskazany plik danych wymaga innej wersji szablonu importowego. Czy przerwać import danych? {{icon=? buttons=[&Tak:t](&Nie:n)}}"), 6) )
         ERROR("Operacja importu została przerwana.")
   }

   $Nazwa_programu = [Nazwa programu]   

   Section( "Kontrahent", "Kontrahent")
   {
      $id = [id]
      $kod = [kod]
      $nazwa = [nazwa]
      $miejscowosc = [miejscowosc]
      $ulica = [ulica]
      $dom = [dom]
      $lokal = [lokal]
      $kodpocz = [kodpocz]
      $rejon = [rejon]
      $nip = [nip]
      $tel1 = [tel1]
      $tel2 = [tel2]
      $fax = [fax]
      $email = [email]
      $www = [www]
   }
}


Section( "Kontrahent", "Kontrahent")
{
   Info("Kontrahent: ", [kod])

   $id = [id]
   $flag = [flag]
   $subtyp = [subtyp]
   $znacznik = [znacznik]
   $info = [info]
   $osoba = [osoba]
   $kod = [kod]
   $nazwa = [nazwa]
   $miejscowosc = [miejscowosc]
   $ulica = [ulica]
   $dom = [dom]
   $lokal = [lokal]
   $kodpocz = [kodpocz]
   $rejon = [rejon]
   $nip = [nip]
   $statusUE = [statusUE]
   $regon = [regon]
   $pesel = [pesel]
   $osfiz = [osfiz]
   $tel1 = [tel1]
   $tel2 = [tel2]
   $fax = [fax]
   $email = [email]
   $www = [www]
   $naglowek = [naglowek]
   $nazwisko = [nazwisko]
   $imie = [imie]
   $bnazwa = [bnazwa]
   $bkonto = [bkonto]
   $negoc = [negoc]
   $grupacen = [grupacen]
   $upust = [upust]
   $limit = [limit]
   $limitkwota = [limitkwota]
   $limitwaluta = [limitwaluta]
//   $plattyp = [plattyp]
//   $plattermin = [plattermin]

   $rejestr_platnosci = [rejestr_platnosci]
   $forma_platnosci = [forma_platnosci]

   $stanpl = [stanpl]
   $stannl = [stannl]
   $khfk = [khfk]
   $zapas = [zapas]
   $krajKod = [krajKod]
   $krajNazwa = [krajNazwa]

   if ( exist("NazwaKatalogu") )
   {
      if ( equal(Def("DoKataloguKH"), 3) )
      {
         Def("DoKataloguKH", Ask("Czy importować katalogi kontrahentów?",
            "{{icon=? buttons=[Tak:o](Nie:c)}}") )
      }
      if ( equal(Def("DoKataloguKH"), 1) )
         $NazwaKatalogu =[NazwaKatalogu]
   }

   if ( exist("NazwaRodzaju") )
   {
      if ( equal(Def("DoRodzajuKH"), 3) )
      {
         Def("DoRodzajuKH", Ask("Czy importować rodzaje kontrahentów?",
            "{{icon=? buttons=[Tak:o](Nie:c)}}") )
      }
      if ( equal(Def("DoRodzajuKH"), "1") )
         $NazwaRodzaju = [NazwaRodzaju]
   }
   
   $poledod1 = [poledod1]
   $poledod2 = [poledod2]
   $poledod3 = [poledod3]
   $poledod4 = [poledod4]
   $poledod5 = [poledod5]
   $poledod6 = [poledod6]
   $poledod7 = [poledod7]
   $poledod8 = [poledod8]

   Section( "Notatka_Dl", "Notatka_Dl", "REPEAT")
   {
      $opis = [opis]
   }
}


Section( "StawkaVAT", "StawkaVAT")
{
   Info("Stawka VAT: ", [nazwa])

   $aktywny = [aktywny]
   $wartosc = [wartosc]
   $nazwa = [nazwa]
   $opis = [opis]
   $stawka = [stawka]
   $dataod = [dataod]
   $datado = [datado]
   $vatrr = [vatrr]
   $long = [long]
   $subtyp = [subtyp]
}


Section( "Pracownik", "Pracownik")
{
   Info("Pracownik: ", [kod])

   $id = [id]
   $flag = [flag]
   $subtyp = [subtyp]
   $znacznik = [znacznik]
   $info = [info]
   $kod = [kod]
   $nazwa = [nazwa]
   $miejscowosc = [miejscowosc]
   $ulica = [ulica]
   $dom = [dom]
   $lokal = [lokal]
   $kodpocz = [kodpocz]
   $rejon = [rejon]
   $osfiz = [osfiz]
   $tel1 = [tel1]
   $tel2 = [tel2]
   $fax = [fax]
   $email = [email]
   $nazwisko = [nazwisko]
   $imie = [imie]
   $imie2 = [naglowek]   //imie2
   $bnazwa = [bnazwa]
   $bkonto = [bkonto]
   $khfk = [khfk]
   $zapas = [zapas]

   if ( exist("NazwaKatalogu") )
   {
      if ( equal(Def("DoKataloguWR"), 3) )
      {
         Def("DoKataloguWR", Ask("Czy importować katalogi pracowników?",
            "{{icon=? buttons=[Tak:o](Nie:c)}}") )
      }
      if ( equal(Def("DoKataloguWR"), 1) )
         $NazwaKatalogu =[NazwaKatalogu]
   }

   if ( exist("NazwaRodzaju") )
   {
      if ( equal(Def("DoRodzajuWR"), 3) )
      {
         Def("DoRodzajuWR", Ask("Czy importować rodzaje pracowników?",
            "{{icon=? buttons=[Tak:o](Nie:c)}}") )
      }
      if ( equal(Def("DoRodzajuWR"), "1") )
         $NazwaRodzaju = [NazwaRodzaju]
   }

   Section( "Notatka_Dl", "Notatka_Dl", "REPEAT")
   {
      $opis = [opis]
   }
}


Section( "Urząd", "Urząd")
{
   Info("Urząd: ", [kod])

   $id = [id]
   $flag = [flag]
   $subtyp = [subtyp]
   $znacznik = [znacznik]
   $info = [info]
   $kod = [kod]
   $nazwa = [nazwa]
   $miejscowosc = [miejscowosc]
   $ulica = [ulica]
   $dom = [dom]
   $lokal = [lokal]
   $kodpocz = [kodpocz]
   $rejon = [rejon]
   $tel1 = [tel1]
   $tel2 = [tel2]
   $fax = [fax]
   $email = [email]
   $www = [www]
   $bnazwa = [bnazwa]
   $bkonto = [bkonto]
   $khfk = [khfk]
   $zapas = [zapas]

   if ( exist("NazwaKatalogu") )
   {
      if ( equal(Def("DoKataloguUR"), 3) )
      {
         Def("DoKataloguUR", Ask("Czy importować katalogi urzędów?",
            "{{icon=? buttons=[Tak:o](Nie:c)}}") )
      }
      if ( equal(Def("DoKataloguUR"), 1) )
         $NazwaKatalogu =[NazwaKatalogu]
   }

   if ( exist("NazwaRodzaju") )
   {
      if ( equal(Def("DoRodzajuUR"), 3) )
      {
         Def("DoRodzajuUR", Ask("Czy importować rodzaje urzędów?",
            "{{icon=? buttons=[Tak:o](Nie:c)}}") )
      }
      if ( equal(Def("DoRodzajuUR"), "1") )
         $NazwaRodzaju = [NazwaRodzaju]
   }

   Section( "Notatka_Dl", "Notatka_Dl", "REPEAT")
   {
      $opis = [opis]
   }
}


Section( "Towar", "Towar")
{
   Info("Towar: ", [kod])

   $id = [id]
   $flag = [flag]
   $subtyp = [subtyp]
   $znacznik = [znacznik]
   $info = [info]
   $osoba = [osoba]
   $kod = [kod]
   $nazwa = [nazwa]
   $kodpaskowy = [kodpaskowy]
   $pcn = [pcn]
   $przelkg = [przelkg]
   $przeluz = [przeluz]
   $stawkaVAT = [stawkaVAT]
   $sww = [sww]
   $cbazowa = [cbazowa]
   $cbazowawal = [cbazowawal]
   $zaokrag = [zaokrag]
   $marzaa = [marzaa]
   $cenaa = [cenaa]
   $cenaawal = [cenaawal]
   $marzab = [marzab]
   $cenab = [cenab]
   $cenabwal = [cenabwal]
   $marzac = [marzac]
   $cenac = [cenac]
   $cenacwal = [cenacwal]
   $marzad = [marzad]
   $cenad = [cenad]

   $jm = [jm]

   $jmdod1 = [jmdod1]
   $przeljmdod1 = [przeljmdod1]
   $jmdod2 = [jmdod2]
   $przeljmdod2 = [przeljmdod2]
   $cenazak = [cenazak]
   $datazak = [datazak]
   $cenawzak = [cenawzak]
   $cenawzakwal = [cenawzakwal]
   $metoda = [metoda]
   $przelicz = [przelicz]
   $kalkclo = [kalkclo]
   $kalkclowal = [kalkclowal]
   $kalkakc = [kalkakc]
   $kalkakcwal = [kalkakcwal]
   $kalkinn = [kalkinn]
   $kalkinnwal = [kalkinnwal]
   $szablon = [szablon]
   $nazwafisk = [nazwafisk]
   $stanmin = [stanmin]
   $stanmax = [stanmax]

   $kontofk = [kontofk]
   $typks = [typks]
   $jmdef = [jmdef]
   $negoc = [negoc]

   if ( exist("NazwaKatalogu") )
   {
      if ( equal(Def("DoKataloguTW"), 3) )
      {
         Def("DoKataloguTW", Ask("Czy importować katalogi towarów?",
            "{{icon=? buttons=[Tak:o](Nie:c)}}") )
      }
      if ( equal(Def("DoKataloguTW"), 1) )
         $NazwaKatalogu =[NazwaKatalogu]
   }

   if ( exist("NazwaRodzaju") )
   {
      if ( equal(Def("DoRodzajuTW"), 3) )
      {
         Def("DoRodzajuTW", Ask("Czy importować rodzaje towarów?",
            "{{icon=? buttons=[Tak:o](Nie:c)}}") )
      }
      if ( equal(Def("DoRodzajuTW"), "1") )
         $NazwaRodzaju = [NazwaRodzaju]
   }

   $poledod1 = [poledod1]
   $poledod2 = [poledod2]
   $poledod3 = [poledod3]
   $poledod4 = [poledod4]
   $poledod5 = [poledod5]
   $poledod6 = [poledod6]
   $poledod7 = [poledod7]
   $poledod8 = [poledod8]
   $funduszPR_kod = [funduszPR_kod]

   if ( !equal([flagcen], "") )
      $flagcen = [flagcen]

   Section( "Nazwa_Dl", "Nazwa_Dl", "REPEAT")
   {
      $opis = [opis]
   }
   Section( "Notatka_Dl", "Notatka_Dl", "REPEAT")
   {
      $opis = [opis]
   }
   Section( "Składnik zestawu", "Składnik zestawu", "REPEAT")
   {
      $id = [id]
      $kod = [kod]
      $ilosc = [ilosc]
   }
   Section( "Składnik kompletu", "Składnik kompletu", "REPEAT")
   {
      $id = [id]
      $kod = [kod]
      $ilosc = [ilosc]
   }
}

/*
Section( "Magazyn", "Magazyn")
{
   Info("Magazyn: ", [kod])

   $kod = [kod]
   $nazwa = [nazwa]
   $miejscowosc = [miejscowosc]
   $ulica = [ulica]
   $dom = [dom]
   $lokal = [lokal]
   $kodpocz = [kodpocz]
   $rejon = [rejon]
   $nip = [nip]
   $tel1 = [tel1]
   $tel2 = [tel2]
   $fax = [fax]

   $oddzial = 0
}
*/

Section("Magazyn", "")
{
}

Section( "Waluta", "Waluta")
{
   $kod = [kod]
   $nazwa = [nazwa]
   $przelicznik = [przelicznik]
}

Section("DokumentRW", "DokumentMG")
{
   Info("Dokument: ", [kod])

// typ dokumentu jest pobierany z parametru pracy o podanej nazwie,
// po znaku $ podajemy wartość domyślną parametru:

   $typ_dokumentu_parametr = "Typ dokumentu - Import towarów z innego oddziału$PRW"

   $nadawca_jako_kh = 1

   $opis = CAT([opis], " według: ", [kod])

   Section("", "", "REPEAT")
   {
      switch( Translate( Name(), "L") )
      {
      case "pozycja dokumentu"

         if ( !equal([typ_pozycji], "1") )   // jeśli nie jest to element kompletu
         {
            MakeSec("Pozycja dokumentu")
            {
               $kod = [kod]
               //$SWW = [opisdod]
               $ilosc_ewid = [ilosc]
               $wartosc = [wartNetto]

               Section("Dostawa", "")
               {
                  $nazwa_dostawy = [kod]
               }
               Section( "Nazwa_Dl", "Nazwa_Dl", "REPEAT")
               {
                  $opis = [opis]
               }
            }
         }
         break

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

/*
Section("DokumentRW", "DokumentRW")
{
   Info("Dokument: ", [kod])

   $id = [id]
   $kod = [kod]
   $opis = [opis]

   Section("Pozycja dokumentu", "Pozycja dokumentu", "REPEAT")
   {
      $kod = [kod]
      $opisdod = [opisdod]
      $ilosc = [ilosc]
      $wartNetto = [wartNetto]

      
      Section("Dostawa", "Dostawa", "REPEAT")
      {
         $ilosc = [ilosc]
         $wartosc = [wartosc]
         $kod = [kod]
      }

   }
}
*/

Section("Dokument", "")
{
   if ( !Def("RodzajDokumentu"))
   {
      @action = Ask("W pliku wejściowym istnieją dane dokumentów.",
         "Będą one zaimportowane do bufora jednej z kartotek.",
         "",
         "Proszę wybrać kartotekę, do której mają trafić importowane dokumenty.",
         "{{icon=? buttons=[Dokumenty &sprzedaży:p](Dokumenty &zakupu:r)(Dokumenty &magazynowe:i)}}")

      switch( @action )
      {
      case 4 // :p
         Def("RodzajDokumentu", "ZK")
         info("Import dokumentów do bufora karototeki dokumentów zakupu.")
         break
      case 5 // :r
         Def("RodzajDokumentu", "MG")
         info("Import dokumentów do bufora karototeki dokumentów magazynowych.")
         break
      case else // :i
         Def("RodzajDokumentu", "SP")
         info("Import dokumentów do bufora karototeki dokumentów sprzedaży.")
         break
      }
   }

   Info("Dokument: ", [kod])

   switch( Def("RodzajDokumentu") )
   {
   case "ZK"
      MakeSec("DokumentZK")
      {
//         $kod    = [kod]
         $nazwa    = [nazwa]

//         $kodMag = [kodMag]

         $typ_dokumentu = [typ_dk]
         $seria = [seria]

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

//         if ( !equal([kodOdKH], [kodKH]) )
//         {
            $odkod = [kodOdKH]
            $odnazwa = [odnazwa]               
            $odadres = [odadres]               
            $oddom = [oddom]
            $odlokal = [odlokal]
            $odkodpocz = [odkodpocz]            
            $odmiasto = [odmiasto]               
//         }

         switch([grupacen])
         {
            case "2"
            case "4"
            case "6"
            case "8"
            case "12"
               $od_brutto   = 1
               $ceny_brutto= 1
               break

            case "3"
            case "5"
            case "7"
            case "9"
            case "13"
               $od_brutto   = 0
               $ceny_brutto= 0
               break
         }

         $rejestr_platnosci = [rejestr_platnosci]
         $forma_platnosci = [forma_platnosci]

         $data_wystawienia = [data]
         $data_wplywu = [datawpl]
         $data_zakupu = [datasp]
         $numer_obcy = [kod_obcy]

         @przeciw = equal([rodzaj_dok], "sprzedaży")
         
         if ( @przeciw )
         {
            $nadawca_jako_kh = 1
            $nadawca_jako_od = 1
            $numer_obcy = [kod]
            $data_zakupu = [datasp]
         }

         $odebrane = [odebrane]
         $opis = [opis]
         $rejestr_vat = [rejestr_vat]
         if ( !equal([rejestr_vatNal], "") )
         {
            $rejestr_vatNal = [rejestr_vatNal]
         }
         $waluta = [waluta]
         $kurs = [kurs]
         $kursDoch = [kursDoch]

         if ( exist("NazwaKatalogu") )
         {
            if ( equal(Def("DoKataloguZK"), 3) )
            {
               Def("DoKataloguZK", Ask("Czy importować katalogi dokumentów zakupu?",
                  "{{icon=? buttons=[Tak:o](Nie:c)}}") )
            }
            if ( equal(Def("DoKataloguZK"), 1) )
               $NazwaKatalogu =[NazwaKatalogu]
         }

         if ( exist("NazwaRodzaju") )
         {
            if ( equal(Def("DoRodzajuZK"), 3) )
            {
               Def("DoRodzajuZK", Ask("Czy importować rodzaje dokumentów zakupu?",
                  "{{icon=? buttons=[Tak:o](Nie:c)}}") )
            }
            if ( equal(Def("DoRodzajuZK"), "1") )
               $NazwaRodzaju = [NazwaRodzaju]
         }

         Section("", "", "REPEAT")
         {
            switch( Translate( Name(), "L") )
            {
            case "pozycja dokumentu"
               if ( !equal([typ_pozycji], "1") )   // jeśli nie jest to komplet
               {
                  MakeSec("Pozycja dokumentu")
                  {

                     if(equal([kod], ""))
                     {
                        //$sww   = [sww]
                        $jm      = [jm]
                        if (exist("Nazwa_Dl"))
                        {
                           Section( "Nazwa_Dl", "Nazwa_Dl", "REPEAT")
                           {
                              $opis = [opis]
                           }
                        }
                        else
                        {
                           $opis   = [opis]
                        }
                        $stawkaVAT   = [stawkaVAT]
                        $cena   = [cena]
                     }
                     else
                     {
                        $kod = [kod]

//                        if( @@przeciw )
                           $cena = [cena]
                     }

                     $ilosc_ewid = [ilosc]
                  }
               }
               break

            case "notatka_dl"
               MakeSec("Notatka_Dl")
               {
                  $opis      = [opis]
               }
               break
            }
         }
      }
      break
   case "MG"
      MakeSec("DokumentMG")
      {
//         $kod    = [kod]
         $nazwa    = [nazwa]

         $rezerwacja    = [rozlmg]
//         $kodMag = [kodMag]
         $data_wystawienia = [datasp]   
         $data_operacji = [data]
         $typ_dokumentu = [typ_dk]
         $seria = [seria]
         $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]

         if ( exist("NazwaKatalogu") )
         {
            if ( equal(Def("DoKataloguMG"), 3) )
            {
               Def("DoKataloguMG", Ask("Czy importować katalogi dokumentów magazynowych?",
                  "{{icon=? buttons=[Tak:o](Nie:c)}}") )
            }
            if ( equal(Def("DoKataloguMG"), 1) )
               $NazwaKatalogu =[NazwaKatalogu]
         }

         if ( exist("NazwaRodzaju") )
         {
            if ( equal(Def("DoRodzajuMG"), 3) )
            {
               Def("DoRodzajuMG", Ask("Czy importować rodzaje dokumentów magazynowych?",
                  "{{icon=? buttons=[Tak:o](Nie:c)}}") )
            }
            if ( equal(Def("DoRodzajuMG"), "1") )
               $NazwaRodzaju = [NazwaRodzaju]
         }

         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
            }
         }
      }
      break
   case else // "SP"
      MakeSec("DokumentSP")
      {
//         $kod    = [kod]
         $nazwa    = [nazwa]

         $rezerwacja    = [rozlmg]         
//         $kodMag = [kodMag]
         $typ_dokumentu = [typ_dk]
         $seria = [seria]

         $data_wystawienia = [data]
         $data_sprzedazy = [datasp]

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

//         if ( !equal([kodOdKH], [kodKH]) )
//         {
            $odkod = [kodOdKH]
            $odnazwa = [odnazwa]               
            $odadres = [odadres]               
            $oddom = [oddom]
            $odlokal = [odlokal]
            $odkodpocz = [odkodpocz]            
            $odmiasto = [odmiasto]               
//         }

         switch([grupacen])
         {
            case "2"
            case "4"
            case "6"
            case "8"
            case "12"
               $od_brutto   = 1
               $ceny_brutto= 1
               break

            case "3"
            case "5"
            case "7"
            case "9"
            case "13"
               $od_brutto   = 0
               $ceny_brutto= 0
               break
         }

         $rejestr_platnosci = [rejestr_platnosci]
         $forma_platnosci = [forma_platnosci]

         $opis = [opis]

         @sprzedaz = equal([rodzaj_dok], "sprzedaży")

         if ( equal([rodzaj_dok], "zakupu") )
         {
            $nadawca_jako_kh = 1
            $opis = CAT([opis], " według: ", [kod])
         }

         $odebrane = [odebrane]
         
         $rejestr_vat = [rejestr_vat]   
         $waluta = [waluta]
         $kurs = [kurs]
         $kursDoch = [kursDoch]

         if ( exist("NazwaKatalogu") )
         {
            if ( equal(Def("DoKataloguSP"), 3) )
            {
               Def("DoKataloguSP", Ask("Czy importować katalogi dokumentów sprzedaży?",
                  "{{icon=? buttons=[Tak:o](Nie:c)}}") )
            }
            if ( equal(Def("DoKataloguSP"), 1) )
               $NazwaKatalogu =[NazwaKatalogu]
         }

         if ( exist("NazwaRodzaju") )
         {
            if ( equal(Def("DoRodzajuSP"), 3) )
            {
               Def("DoRodzajuSP", Ask("Czy importować rodzaje dokumentów sprzedaży?",
                  "{{icon=? buttons=[Tak:o](Nie:c)}}") )
            }
            if ( equal(Def("DoRodzajuSP"), "1") )
               $NazwaRodzaju = [NazwaRodzaju]
         }

         Section("", "", "REPEAT")
         {
            switch( Translate( Name(), "L") )
            {
            case "pozycja dokumentu"

               if ( !equal([typ_pozycji], "2") )   // jeśli nie jest to element kompletu
               {
                  MakeSec("Pozycja dokumentu")
                  {
                     if(equal([kod], ""))
                     {
                        //$sww   = [sww]
                        $jm      = [jm]
                        if (exist("Nazwa_Dl"))
                        {
                           Section( "Nazwa_Dl", "Nazwa_Dl", "REPEAT")
                           {
                              $opis = [opis]
                           }
                        }
                        else
                        {
                           $opis   = [opis]
                        }
                        $stawkaVAT   = [stawkaVAT]
                        $sww   = [opisdod]
                        $cena   = [cena]
                     }
                     else
                     {
                        $kod = [kod]

//                        if( @@sprzedaz )   //tylko jeśli importujemy dokument sprzedaży
                           $cena = [cena]
                     }

                     $ilosc_ewid = [ilosc]

                  }
               }
               break

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


Section("","")
{
   Warning("Nierozpoznana sekcja: ", Name())
}

Section( "Towar", "Towar")
{

   Section( "Nazwa_Dl", "Nazwa_Dl", "REPEAT")
   {
      $opis = [opis]
   }

   Section( "Nazwa_Dl", "Nazwa_Dl", "REPEAT")
   {
      $opis = [nazwa]
   }

Section( "Towar", "Towar")
{

   Section( "Nazwa_Dl", "Nazwa_Dl", "REPEAT")
   {
      $opis = [opis]
   }

    MakeSec("Nazwa_Dl")
   {
      $opis = [nazwa]
   }