---
title: "PS_KOD()"
url: "https://gidas.rivile.lt/sistemos_programavimas/funkcijos/kitos_funkcijos/ps_kod"
updated: "2023-07-09"
parent: "https://gidas.rivile.lt/sistemos_programavimas/funkcijos/kitos_funkcijos.md"
---

# PS_KOD()

Lauko reikšmės pasirinkimas

**Sintaksė**

`PS_KOD(ss_tip,ss_lpav,ss_kod,ss_ilg,ss_ilgt,ss_ltip,ss_med_tik,ss_srit,ss_tarpas,ss_masyvas)`

**Grąžina**

pasirinktą kodą (reikšmę)

**Parametrai**

| Parametras | Aprašymas                                                    | Formatas |
| :--------- | :----------------------------------------------------------- | -------- |
| ss_tip     | sąrašo tipas (gali būti tuščias)                             | C(2)     |
| ss_lpav    | lauko pavadinimas                                            | C        |
| ss_kod     | lange rodoma reikšmė (pagal nutylėjimą)                      |          |
| ss_ilg     | lauko ilgis (pagal nutylėjimą 12)                            | N        |
| ss_ilgt    | lauko ilgis po klablelio, jei laukas Numeric t.y.  ss_ltip="N" | N        |
| ss_ltip    | lauko tipas C,N,D,T,P (pagal nutylėjimą "C")                 | C(1)     |
| ss_med_tik | jei .t. - medžio tipo sąrašuose netikrinti ar įvestas laukas detalus ar ne | L        |
| ss_srit    | norint, kad tikrintų, ar sąraše yra toks kodas, reikia nurodyti lentelės pirmus tris ženklus | C        |
| ss_tarpas  | jei .t. -  tarpo klavišas nedirbs kaip pasirinkimo klavišas, ir jį bus galima įvesti į tekstą | L        |
| ss_masyvas | jei lauko tipas P t.y. ss_ltip="P" , tada pasirinkimas iš suformuoto masyvo SS_MASYVAS(x)="..." |          |

**Pavyzdžiai :**

```
padalinio_kodas=PS_KOD("IS","Padalinys",)

data=PS_KOD("","Data nuo",DATE(),,,"D")

suma=PS_KOD("","Suma ?",999.9999,12,4,"N")
```

```
Dimension mano_pasirinimo_masyvas(3)
mano_pasirinimo_masyvas(1)="Pirma reikšmė"
mano_pasirinimo_masyvas(2)="Antra reikšmė"
mano_pasirinimo_masyvas(3)="Trečia reikšmė"

mano_pasirinkta_reiksme=ps_kod(,"Pasirinkite reikiamą reikšmę",,,,"P",,,,@mano_pasirinimo_masyvas)
wait window iif(mano_pasirinkta_reiksme>0,mano_pasirinimo_masyvas(mano_pasirinkta_reiksme),"Reikšmės neparinkote")
```