MakeSec("pracownik")
   {
                $klucz = [5]
   @@prac=$klucz   
   }

MakeSec("pracownik")
    {
                $klucz = [5]
                $imie_do_podgladu = [91]
                $nazwisko_do_podgladu = [92]


    @@prac=$klucz   
    }

#format  "COMMA2" 
#symbol_LP   "LP"   
         
Section("", "dokument")
{       
    @sname = [2]   
    $klucz = Def("Symbol_LP")
    $obslugujJak= "DP"
   $dataWpr = Date()
   $dataDok = Date()   
   $dataoper = Date()

    Exit()
       
    @poz = 0

    Section( @sname, "", "REPEAT" )
    {
if (not(equal([3],0)))
{
   MakeSec("pracownik")
   {
      $klucz = [4]
      $Nazwisko_do_podgladu = [1]
   }

        MakeSec("zapis")
        {
            $pozycja = @@poz
            $rozbicie = 0
            $strona = 0
            $kwota = [3]
            $konto = ...
        }
        MakeSec("zapis")
        {
            $pozycja = @@poz
            $rozbicie = 1
            $strona = 1
            $kwota = [3]
            $konto = ....
        }
        @@poz = SUM0(@@poz, 1)
}
    }
}

if (!(equal([3],"0")))