API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Aug 24th, 2016
190
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
PowerBuilder 16.55 KB | None | 0 0
raw download clone embed print report
  1. /*
  2.                 Pokud se zvětší ochranná lhůta pro maso, volá se messagebox který o změně informuje.
  3.                 Po kliknutí na tlačítko OK se nová lhůta uloží.
  4.                 Po kliknutí na tlačítko Strorno - storno.
  5.                 Po kliknutí na tlačítko Pokračovat se nová hlůta neuloží.
  6.                 */ 
  7.                
  8.                 if ld_zmena_maso > datetime(idw_riz.uf_getitem(idw_riz.getrow(), "d3613datom")) and isnull(ld_zmena_mleko) then
  9.  
  10.                     ls_text1 = "Přidáním použitých léčiv dojde k posunutí lhůty na : "
  11.                     ls_text2 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"), 'dd.mm.yyyy h:mm')
  12.                     ls_text3 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_maso"), 'dd.mm.yyyy h:mm')
  13.                     ls_text4 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"), 'dd.mm.yyyy h:mm')
  14.                     ls_text5 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_mleko"), 'dd.mm.yyyy h:mm')
  15.  
  16.                     ll_volba_msb = integer(messagebox( "Uložit?", ls_text1 + "~r~n~r~nmaso z: '" + ls_text2 + "'  na:  '" + ls_text3 + "'~r~n~r~nChcete jej upravit?", "stopsign!", "$dAno|Ne|Přerušit", 1))
  17.  
  18.  
  19.                     choose case ll_volba_msb
  20.                            
  21.                         case 1 
  22.                             idw_riz.setitem(idw_riz.getrow(), "d3613datom", datetime(idw_riz.uf_getitem(idw_riz.getrow(), "zmena_maso")))
  23.                             li_rc = 1
  24.                         case 2
  25.                             idw_riz.setitem(idw_riz.getrow(), "zmena_maso",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"))
  26.                             li_rc = -1                     
  27.                         case 3 
  28.                             idw_riz.setitem(idw_riz.getrow(), "zmena_maso",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"))
  29.                             li_rc = 1
  30.                     end choose
  31.        
  32.                 /*
  33.                 Pokud se zvětší ochranná lhůta pro mléko, volá se messagebox který o změně informuje.
  34.                 Po kliknutí na tlačítko OK se nová lhůta uloží.
  35.                 Po kliknutí na tlačítko Strorno - storno.
  36.                 Po kliknutí na tlačítko Pokračovat se nová hlůta neuloží.
  37.                 */ 
  38.                 elseif ld_zmena_mleko > datetime(idw_riz.uf_getitem(idw_riz.getrow(), "d3613datol")) and isnull(ld_zmena_maso) then
  39.                    
  40.  
  41.                     ls_text1 = "Přidáním použitých léčiv dojde k posunutí lhůty na : "
  42.                     ls_text2 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"), 'dd.mm.yyyy h:mm')
  43.                     ls_text3 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_maso"), 'dd.mm.yyyy h:mm')
  44.                     ls_text4 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"), 'dd.mm.yyyy h:mm')
  45.                     ls_text5 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_mleko"), 'dd.mm.yyyy h:mm')
  46.  
  47.                     ll_volba_msb = integer(messagebox( "Uložit?", ls_text1 + "~r~n~r~nmléko z: '" + ls_text4 + "'  na:  '" + ls_text5 + "'~r~n~r~nChcete jej upravit?", "stopsign!", "$dAno|Ne|Přerušit", 1))
  48.  
  49.                     choose case ll_volba_msb
  50.                            
  51.                         case 1 
  52.                             idw_riz.setitem(idw_riz.getrow(), "d3613datol", datetime(idw_riz.uf_getitem(idw_riz.getrow(), "zmena_mleko")))
  53.                             li_rc = 1
  54.                         case 2
  55.                             idw_riz.setitem(idw_riz.getrow(), "zmena_mleko",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"))
  56.                             li_rc = -1
  57.                         case 3 
  58.                             idw_riz.setitem(idw_riz.getrow(), "zmena_mleko",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"))
  59.                             li_rc = 1
  60.                     end choose
  61.                    
  62.                 /*
  63.                 Pokud se zvětší ochranná lhůta pro maso, ale ne pro mléko, volá se messagebox který o změně informuje.
  64.                 Po kliknutí na tlačítko OK se nová lhůta uloží.
  65.                 Po kliknutí na tlačítko Strorno - storno.
  66.                 Po kliknutí na tlačítko Pokračovat se nová hlůta neuloží.
  67.                 */ 
  68.                
  69.                 ld_pom_maso = datetime(idw_riz.uf_getitem(idw_riz.getrow(), "d3613datom"))
  70.                
  71.                 elseif ld_zmena_maso > ld_pom_maso and ld_zmena_mleko = datetime(idw_riz.uf_getitem(idw_riz.getrow(), "d3613datol")) then
  72.                      
  73.                     ls_text1 = "Přidáním použitých léčiv dojde k posunutí lhůty na : "
  74.                     ls_text2 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"), 'dd.mm.yyyy h:mm')
  75.                     ls_text3 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_maso"), 'dd.mm.yyyy h:mm')
  76.                     ls_text4 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"), 'dd.mm.yyyy h:mm')
  77.                     ls_text5 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_mleko"), 'dd.mm.yyyy h:mm')
  78.  
  79.                     ll_volba_msb = integer(messagebox( "Uložit?", ls_text1 + "~r~n~r~nmaso z: '" + ls_text2 + "'  na:  '" + ls_text3 + "'~r~n~r~nChcete jej upravit?", "stopsign!", "$dAno|Ne|Přerušit", 1))
  80.  
  81.                      
  82.                      
  83.                     choose case ll_volba_msb
  84.                            
  85.                         case 1 
  86.                             idw_riz.setitem(idw_riz.getrow(), "d3613datom", datetime(idw_riz.uf_getitem(idw_riz.getrow(), "zmena_maso")))
  87.                             li_rc = 1
  88.                         case 2
  89.                             idw_riz.setitem(idw_riz.getrow(), "zmena_maso",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"))
  90.                             li_rc = -1
  91.                         case 3 
  92.                             idw_riz.setitem(idw_riz.getrow(), "zmena_maso",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"))
  93.                             li_rc = 1
  94.                     end choose 
  95.                    
  96.                 /*
  97.                 Pokud se zvětší ochranná lhůta pro mléko, ale ne pro maso, volá se messagebox který o změně informuje.
  98.                 Po kliknutí na tlačítko OK se nová lhůta uloží.
  99.                 Po kliknutí na tlačítko Strorno - storno.
  100.                 Po kliknutí na tlačítko Pokračovat se nová hlůta neuloží.
  101.                 */ 
  102.                
  103.                 ld_pom_mleko = datetime(idw_riz.uf_getitem(idw_riz.getrow(), "d3613datol"))
  104.                
  105.                 elseif ld_zmena_maso = datetime(idw_riz.uf_getitem(idw_riz.getrow(), "d3613datom")) and ld_zmena_mleko > ld_pom_mleko then
  106.                    
  107.                      
  108.                     ls_text1 = "Přidáním použitých léčiv dojde k posunutí lhůty na : "
  109.                     ls_text2 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"), 'dd.mm.yyyy h:mm')
  110.                     ls_text3 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_maso"), 'dd.mm.yyyy h:mm')
  111.                     ls_text4 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"), 'dd.mm.yyyy h:mm')
  112.                     ls_text5 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_mleko"), 'dd.mm.yyyy h:mm')
  113.  
  114.                     ll_volba_msb = integer(messagebox( "Uložit?", ls_text1 + "~r~n~r~nmléko z: '" + ls_text4 + "'  na:  '" + ls_text5 + "'~r~n~r~nChcete jej upravit?", "stopsign!", "$dAno|Ne|Přerušit", 1))
  115.  
  116.                      
  117.                     choose case ll_volba_msb
  118.                            
  119.                         case 1 
  120.                             idw_riz.setitem(idw_riz.getrow(), "d3613datol", datetime(idw_riz.uf_getitem(idw_riz.getrow(), "zmena_mleko")))
  121.                             li_rc = 1
  122.                         case 2
  123.                             idw_riz.setitem(idw_riz.getrow(), "zmena_mleko",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"))
  124.                             li_rc = -1
  125.                         case 3 
  126.                             idw_riz.setitem(idw_riz.getrow(), "zmena_mleko",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"))
  127.                             li_rc = 1
  128.                     end choose     
  129.                    
  130.                    
  131.                    
  132.                 /*
  133.                 Pokud se zvětší ochranná lhůta pro maso i pro mléko, volá se messagebox který o změně informuje.
  134.                 Po kliknutí na tlačítko OK se nová lhůta uloží.
  135.                 Po kliknutí na tlačítko Strorno - storno.
  136.                 Po kliknutí na tlačítko Pokračovat se nová hlůta neuloží.
  137.                 */
  138.                 elseif ld_zmena_maso > datetime(idw_riz.uf_getitem(idw_riz.getrow(), "d3613datom")) and ld_zmena_mleko > datetime(idw_riz.uf_getitem(idw_riz.getrow(), "d3613datol")) then
  139.                    
  140.                     ls_text1 = "Přidáním použitých léčiv dojde k posunutí lhůty na : "
  141.                     ls_text2 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"), 'dd.mm.yyyy h:mm')
  142.                     ls_text3 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_maso"), 'dd.mm.yyyy h:mm')
  143.                     ls_text4 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"), 'dd.mm.yyyy h:mm')
  144.                     ls_text5 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_mleko"), 'dd.mm.yyyy h:mm')
  145.  
  146.                     ll_volba_msb = integer(messagebox( "Uložit?", ls_text1 + "~r~n~r~nmaso z: '" + ls_text2 + "'  na:  '" + ls_text3 + "'~r~na na~r~nmléko z: '" + ls_text4 + "'  na:  '" + ls_text5 + "'~r~n~r~nChcete jej upravit?", "stopsign!", "$dAno|Ne|Přerušit", 1))
  147.                    
  148.                     choose case ll_volba_msb
  149.                            
  150.                         case 1 
  151.                             idw_riz.setitem(idw_riz.getrow(), "d3613datom", datetime(idw_riz.uf_getitem(idw_riz.getrow(), "zmena_maso")))
  152.                             idw_riz.setitem(idw_riz.getrow(), "d3613datol", datetime(idw_riz.uf_getitem(idw_riz.getrow(), "zmena_mleko")))
  153.                             li_rc = 1
  154.                         case 2
  155.                             idw_riz.setitem(idw_riz.getrow(), "zmena_maso",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"))
  156.                             idw_riz.setitem(idw_riz.getrow(), "zmena_mleko",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"))
  157.                             li_rc = -1
  158.                         case 3 
  159.                             idw_riz.setitem(idw_riz.getrow(), "zmena_maso",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"))
  160.                             idw_riz.setitem(idw_riz.getrow(), "zmena_mleko",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"))
  161.                             li_rc = 1
  162.                     end choose
  163.                    
  164.                 /*
  165.                 Pokud je vyplněna ochranná lhůta pouze pro maso
  166.                 */ 
  167.                 elseif not isnull(lds_pod.uf_getitem(lds_pod.getrow(), "c3611ochlm")) and isnull(lds_pod.uf_getitem(lds_pod.getrow(), "c3611ochll")) then
  168.                
  169.                     ls_text1 = "Přidáním použitých léčiv dojde k nastavení lhůty pro : "
  170.                     ls_text2 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"), 'dd.mm.yyyy h:mm')
  171.                     ls_text3 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_maso"), 'dd.mm.yyyy h:mm')
  172.                     ls_text4 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"), 'dd.mm.yyyy h:mm')
  173.                     ls_text5 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_mleko"), 'dd.mm.yyyy h:mm')
  174.  
  175.                     ll_volba_msb = integer(messagebox( "Uložit?", ls_text1 + "~r~n~r~nmaso na '" + ls_text3 + "'~r~n~r~nChcete jej upravit?", "stopsign!", "$dAno|Ne|Přerušit", 1))
  176.    
  177.                     choose case ll_volba_msb
  178.                        
  179.                         case 1 
  180.                             idw_riz.setitem(idw_riz.getrow(), "d3613datom", datetime(idw_riz.uf_getitem(idw_riz.getrow(), "zmena_maso")))
  181.                             li_rc = 1
  182.                         case 2
  183.                             idw_riz.setitem(idw_riz.getrow(), "zmena_maso",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"))
  184.                             li_rc = -1
  185.                         case 3 
  186.                             idw_riz.setitem(idw_riz.getrow(), "zmena_maso",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"))
  187.                             li_rc = 1
  188.                     end choose
  189.                    
  190.                 /*
  191.                 Pokud je vyplněna ochranná lhůta pouze pro mléko
  192.                 */ 
  193.                 elseif isnull(lds_pod.uf_getitem(lds_pod.getrow(), "c3611ochlm")) and not isnull(lds_pod.uf_getitem(lds_pod.getrow(), "c3611ochll")) then
  194.                
  195.                     ls_text1 = "Přidáním použitých léčiv dojde k nastavení lhůty pro : "
  196.                     ls_text2 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"), 'dd.mm.yyyy h:mm')
  197.                     ls_text3 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_maso"), 'dd.mm.yyyy h:mm')
  198.                     ls_text4 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"), 'dd.mm.yyyy h:mm')
  199.                     ls_text5 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_mleko"), 'dd.mm.yyyy h:mm')
  200.  
  201.                     ll_volba_msb = integer(messagebox( "Uložit?", ls_text1 + "~r~n~r~nmléko na '" + ls_text5 + "'~r~n~r~nChcete jej upravit?", "stopsign!", "$dAno|Ne|Přerušit", 1))
  202.    
  203.                     choose case ll_volba_msb
  204.                        
  205.                         case 1 
  206.                             idw_riz.setitem(idw_riz.getrow(), "d3613datol", datetime(idw_riz.uf_getitem(idw_riz.getrow(), "zmena_mleko")))
  207.                             li_rc = 1
  208.                         case 2
  209.                             idw_riz.setitem(idw_riz.getrow(), "zmena_mleko",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"))
  210.                             li_rc = -1
  211.                         case 3 
  212.                             idw_riz.setitem(idw_riz.getrow(), "zmena_mleko",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"))
  213.                             li_rc = 1
  214.                     end choose
  215.                
  216.                
  217.                 /*
  218.                 Pokud není ochranná lhůta u masa i u mléka vyplněna (je rovna null) opět vyskočí messagebox
  219.                 */
  220.                 elseif isnull(idw_riz.uf_getitem(idw_riz.getrow(), "d3613datom")) and isnull(idw_riz.uf_getitem(idw_riz.getrow(), "d3613datol")) then
  221.                                    
  222.                     ls_text1 = "Přidáním použitých léčiv dojde k nastavení lhůty pro : "
  223.                     ls_text2 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"), 'dd.mm.yyyy h:mm')
  224.                     ls_text3 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_maso"), 'dd.mm.yyyy h:mm')
  225.                     ls_text4 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"), 'dd.mm.yyyy h:mm')
  226.                     ls_text5 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_mleko"), 'dd.mm.yyyy h:mm')
  227.  
  228.                     ll_volba_msb = integer(messagebox( "Uložit?", ls_text1 + "~r~n~r~nmaso : " +  ls_text3 + "'~r~na pro~r~nmléko : '" + ls_text5 + "'~r~n~r~nChcete jej upravit?", "stopsign!", "$dAno|Ne|Přerušit", 1))
  229.                    
  230.                     choose case ll_volba_msb
  231.                        
  232.                         case 1 
  233.                             idw_riz.setitem(idw_riz.getrow(), "d3613datom", datetime(idw_riz.uf_getitem(idw_riz.getrow(), "zmena_maso")))
  234.                             idw_riz.setitem(idw_riz.getrow(), "d3613datol", datetime(idw_riz.uf_getitem(idw_riz.getrow(), "zmena_mleko")))
  235.                             li_rc = 1
  236.                         case 2
  237.                             idw_riz.setitem(idw_riz.getrow(), "zmena_maso",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"))
  238.                             idw_riz.setitem(idw_riz.getrow(), "zmena_mleko",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"))
  239.                             li_rc = -1
  240.                         case 3 
  241.                             idw_riz.setitem(idw_riz.getrow(), "zmena_maso",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"))
  242.                             idw_riz.setitem(idw_riz.getrow(), "zmena_mleko",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"))
  243.                             li_rc = 1
  244.                     end choose
  245.  
  246.                
  247.  
  248.                 elseif isnull(idw_riz.uf_getitem(idw_riz.getrow(), "d3613datom")) and not isnull(idw_riz.uf_getitem(idw_riz.getrow(), "d3613datol")) then                      
  249.                        
  250.                     ls_text1 = "Přidáním použitých léčiv dojde k nastavení lhůty pro : "
  251.                     ls_text2 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"), 'dd.mm.yyyy h:mm')
  252.                     ls_text3 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_maso"), 'dd.mm.yyyy h:mm')
  253.                     ls_text4 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"), 'dd.mm.yyyy h:mm')
  254.                     ls_text5 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_mleko"), 'dd.mm.yyyy h:mm')
  255.  
  256.                     ll_volba_msb = integer(messagebox( "Uložit?", ls_text1 + "~r~n~r~nmaso : '" + ls_text3 + "'~r~na dojde ke změně ~r~nmléka z: '" + ls_text4 + "'  na:  '" + ls_text5 + "'~r~n~r~nChcete jej upravit?", "stopsign!", "$dAno|Ne|Přerušit", 1))
  257.                    
  258.                     choose case ll_volba_msb
  259.                            
  260.                         case 1 
  261.                             idw_riz.setitem(idw_riz.getrow(), "d3613datom", datetime(idw_riz.uf_getitem(idw_riz.getrow(), "zmena_maso")))
  262.                             idw_riz.setitem(idw_riz.getrow(), "d3613datol", datetime(idw_riz.uf_getitem(idw_riz.getrow(), "zmena_mleko")))
  263.                             li_rc = 1
  264.                         case 2
  265.                             idw_riz.setitem(idw_riz.getrow(), "zmena_maso",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"))
  266.                             idw_riz.setitem(idw_riz.getrow(), "zmena_mleko",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"))
  267.                             li_rc = -1
  268.                         case 3 
  269.                             idw_riz.setitem(idw_riz.getrow(), "zmena_maso",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"))
  270.                             idw_riz.setitem(idw_riz.getrow(), "zmena_mleko",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"))
  271.                             li_rc = 1
  272.                     end choose
  273.                    
  274.                    
  275.                     elseif not isnull(idw_riz.uf_getitem(idw_riz.getrow(), "d3613datom")) and isnull(idw_riz.uf_getitem(idw_riz.getrow(), "d3613datol")) then                      
  276.                        
  277.                     ls_text1 = "Přidáním použitých léčiv dojde k posunutí lhůty na : "
  278.                     ls_text2 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"), 'dd.mm.yyyy h:mm')
  279.                     ls_text3 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_maso"), 'dd.mm.yyyy h:mm')
  280.                     ls_text4 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"), 'dd.mm.yyyy h:mm')
  281.                     ls_text5 = String(idw_riz.getitemdatetime(idw_riz.getrow(), "zmena_mleko"), 'dd.mm.yyyy h:mm')
  282.  
  283.                     ll_volba_msb = integer(messagebox( "Uložit?", ls_text1 + "~r~n~r~nmaso z: '" + ls_text2 + "'  na:  '" + ls_text3 + "'~r~na dojde k nastavení lhůty ~r~nmléka : '" + ls_text5 + "'~r~n~r~nChcete jej upravit?", "stopsign!", "$dAno|Ne|Přerušit", 1))
  284.                    
  285.                     choose case ll_volba_msb
  286.                            
  287.                         case 1 
  288.                             idw_riz.setitem(idw_riz.getrow(), "d3613datom", datetime(idw_riz.uf_getitem(idw_riz.getrow(), "zmena_maso")))
  289.                             idw_riz.setitem(idw_riz.getrow(), "d3613datol", datetime(idw_riz.uf_getitem(idw_riz.getrow(), "zmena_mleko")))
  290.                             li_rc = 1
  291.                         case 2
  292.                             idw_riz.setitem(idw_riz.getrow(), "zmena_maso",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"))
  293.                             idw_riz.setitem(idw_riz.getrow(), "zmena_mleko",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"))
  294.                             li_rc = -1
  295.                         case 3 
  296.                             idw_riz.setitem(idw_riz.getrow(), "zmena_maso",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datom"))
  297.                             idw_riz.setitem(idw_riz.getrow(), "zmena_mleko",idw_riz.getitemdatetime(idw_riz.getrow(), "d3613datol"))
  298.                             li_rc = 1
  299.                     end choose
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!