Pom22: Porovnání verzí

Z Prirucky
(stránka vyprázdněna)
značky: ruční vrácení zpět vyprázdnění
 
(Není zobrazeno 71 mezilehlých verzí od stejného uživatele.)
Řádek 1: Řádek 1:
'''Nastavení parametrů pro pracovní pomůcky (jednorázová funkce 50)'''


{{jednorázové funkce}}
''Riziko:'' <br>
Funkce je určena '''jen k jednorázovému nastavení před používáním''' modulu Pracovní pomůcky. <br>
'''Pozdější spuštění se zásadně nedoporučuje''' - došlo by ke znehodnocení užití dříve používaných dat. 
== Spuštění ==
Spuštěním funkce provede systém nastavení parametrů dle tabulky níže. Po provedení (časově trvá okamžik), je zobrazena informativní hláška: [[Image: Parametry-byly-nastaveny-jednorazova-funkce-50.png|250px]]
{|class="wikitable sortable" border="1" cellpadding="3" cellspacing="0"
|+ <small>Hodnoty parametrů nastavené po provedení funkce </small>
| Parametr || Nastavená hodnota
|-
| * pomucky_privyd ||<center> n</center>
|-
| *pomucky_cispr ||<center> n</center>
|-
|*pomucky_sklady ||<center> n</center>
|-
|*pomucky_cena||<center> n</center>
|-
|*pomucky_exp||<center> n</center>
|-
|*pomucky_ediper||<center> n</center>
|-
|*pomucky_zpvyd||<center> 1</center>
|-
|pomucky_evidvel (sk.10)||<center> a</center>
|-
|pomucky_beznar (sk.10)||<center> a</center>
|}
<small> Pozn. Někteří zákazníci mají výjimky v provedení funkce - parametry u nich systém nastaví na jiné než uvedené hodnoty. </small>
== Odkazy ==
* [[Jednorázové funkce]]
* [[Pracovní pomůcky]]
<!-- by Tomáš V., 07/2016
las_Par[]={"*pomucky_privyd","*pomucky_cispr","*pomucky_sklady","*pomucky_cena","*pomucky_exp","*pomucky_ediper","*pomucky_zpvyd","pomucky_evidvel","pomucky_beznar"}
if not gf_Modul("POMUCKY") then
    Oznameni("Oznámení","Nemáte přístup k modulu 'Pracovní pomůcky'. Nastavení se neprovede.")
    return
end if
if Zakaznik("BONATRANS") then
    las_Hod[1]="n"        //*pomucky_privyd
    las_Hod[2]="a"        //*pomucky_cispr
    las_Hod[3]="a"        //*pomucky_sklady
    las_Hod[4]="n"        //*pomucky_cena
    las_Hod[5]="n"        //*pomucky_exp
    las_Hod[6]="n"        //*pomucky_ediper
    las_Hod[7]="1"        //*pomucky_zpvyd
    las_Hod[8]="n"        //pomucky_evidvel
    las_Hod[9]="n"        //pomucky_beznar
elseif Zakaznik("GILLETTE") then
    las_Hod[1]="n"        //*pomucky_privyd
    las_Hod[2]="n"        //*pomucky_cispr
    las_Hod[3]="n"        //*pomucky_sklady
    las_Hod[4]="n"        //*pomucky_cena
    las_Hod[5]="n"        //*pomucky_exp
    las_Hod[6]="n"        //*pomucky_ediper
    las_Hod[7]="2"        //*pomucky_zpvyd
    las_Hod[8]="a"        //pomucky_evidvel
    las_Hod[9]="n"        //pomucky_beznar
elseif Zakaznik("SAINT-GOBAIN") then
    las_Hod[1]="n"        //*pomucky_privyd
    las_Hod[2]="n"        //*pomucky_cispr
    las_Hod[3]="n"        //*pomucky_sklady
    las_Hod[4]="n"        //*pomucky_cena
    las_Hod[5]="n"        //*pomucky_exp
    las_Hod[6]="n"        //*pomucky_ediper
    las_Hod[7]="1"        //*pomucky_zpvyd
    las_Hod[8]="a"        //pomucky_evidvel
    las_Hod[9]="n"        //pomucky_beznar
elseif Zakaznik("DSV") then    //TV 27.7.2012
    update atributy set
        dddw='dddw_pomucky',
        datacolumn='cis_pomucky',
        displaycolumn='zobr_text',
        printcolumn='zobr_text'
    where cis_atributu=67;
    if SQLCA.SQLCode<0 then
        Oznameni("SQL Chyba - update atributy (67)",string(SQLCA.SQLDBCode)+" - "+SQLCA.SQLErrText)
    end if
    las_Hod[1]="a"        //*pomucky_privyd
    las_Hod[2]="n"        //*pomucky_cispr
    las_Hod[3]="a"        //*pomucky_sklady
    las_Hod[4]="n"        //*pomucky_cena
    las_Hod[5]="n"        //*pomucky_exp
    las_Hod[6]="n"        //*pomucky_ediper
    las_Hod[7]="1"        //*pomucky_zpvyd
    las_Hod[8]="a"        //pomucky_evidvel
    las_Hod[9]="a"        //pomucky_beznar
else
    las_Hod[1]="n"        //*pomucky_privyd
    las_Hod[2]="n"        //*pomucky_cispr
    las_Hod[3]="n"        //*pomucky_sklady
    las_Hod[4]="n"        //*pomucky_cena
    las_Hod[5]="n"        //*pomucky_exp
    las_Hod[6]="n"        //*pomucky_ediper
    las_Hod[7]="1"        //*pomucky_zpvyd
    las_Hod[8]="a"        //pomucky_evidvel
    las_Hod[9]="a"        //pomucky_beznar
end if
for ll_Ind=1 to UpperBound(las_Par[])
   
    if left(las_Par[ll_Ind],1)="*" then li_SysKod=0 else li_SysKod=1
   
    if parametr_pis(las_Par[ll_Ind],las_Hod[ll_Ind]) = false then
        DBRollBack()
        return
    end if
   
    DBCommit()
next
-->

Aktuální verze z 23. 2. 2023, 17:46