DVS_FOR()

Funkcija suformuoja DVS operaciją

Sintaksė

DVS_FOR(cf_kodas_rd,[cf_data],[cf_pav],[cf_kodas_ks],[cf_kodas_ms],[cf_kodas_is,cf_kodas_tb],[cf_kodas_4a],[cf_pastabos],[cf_file],[cf_file_nuoroda],[cf_rysys_modulis],[cf_rysys_operacija],[cf_kodas_ls_1],[cf_kodas_ls_2],[cf_kodas_ls_3],[cf_kodas_ls_4],[cf_aprasymas1],[cf_aprasymas2],[cf_aprasymas3],[cf_aprasymas4],[cf_tevas],[cf_dok_nr],[cf_dok_reg],[cf_arch_nr],[cf_dok_data],[cf_kodas_rs])

Grąžina

Simbolinę reikšmę - suformuotos DVS operacijos numerį

Parametrai

Parametras Aprašymas Formatas
cf_kodas_rd DVS rūšies kodas C(10)
cf_data DVS operacijos data (pagal nutylėjimą imama sistemos data) D
cf_pav operacijos pavadinimas C(150)
cf_kodas_ks kliento kodas C(12)
cf_kodas_ms menedžerio kodas C(12)
cf_kodas_is padalinio kodas C(12)
cf_kodas_tb tabelinis numeris C(12)
cf_kodas_4a personalo kodas C(12)
cf_pastabos pastabos M
cf_file PDF, DOC, XLS ar kitas failas, kurį norima įkelti prie DVS operacijos C
cf_file_nuoroda požymis, ar bus įkeltas pats failas, ar nuoroda į jį ;
jei reikšmė 0 (pagal nutylėjimą)- įkeliamas failas,
jei reikšmė 1 - nuoroda į failą
N(1)
cf_rysys_modulis modulis, su kuriuo norima suformuoti informacijos ryšį su suformuota DVS operacija, (privalomas, jei nurodomas cf_rysys_operacija) C
cf_rysys_operacija operacijos numeris, su kuria norima suformuoti informacijos ryšį su suformuota DVS operacija, (privalomas, jei nurodomas cf_rysys_modulis) C(12)
cf_kodas_ls_1 logistikos kodas 1 C(12)
cf_kodas_ls_2 logistikos kodas 2 C(12)
cf_kodas_ls_3 logistikos kodas 3 C(12)
cf_kodas_ls_4 logistikos kodas 4 C(12)
cf_aprasymas1 aprašymas 1 C(150)
cf_aprasymas2 aprašymas 2 C(150)
cf_aprasymas3 aprašymas 3 C(150)
cf_aprasymas4 aprašymas 4 C(150)
cf_tevas tėvinės DVS operacijos numeris C(12)
cf_dok_nr dokumento numeris C(20)
cf_dok_reg registro numeris C(20)
cf_arch_nr archyvo numeris C(20)
cf_dok_data dokumento data (pagal nutylėjimą imama sistemos data) D
cf_kodas_rs vartotojas - jei priskiriama simbolinė reikšmė, būklė (aktyvus, archyvuotas, anuliuotas) - jei priskiriamas skaičius

Pavyzdžiai

Užprogramavimas sąskaitos-faktūros formos INIT-e, kad suformuotą PDF failą padėtų į katalogą C:\ARCHYVAS\PARDAVIMAI, suformuotų DVS operaciją ir prie jos prisegtų nuorodą į kataloge padėtą failą.

        *titi_pagr.SS_DVS_REPORT_FILE=alltrim(Wi06k.i06_dok_nr) && formuojamo failo vardas (pagal nutylėjimą ATASKAITA)
        titi_pagr.SS_DVS_REPORT_KAT="C:\ARCHYVAS\PARDAVIMAI"    && formuojamų failų katalogas (pagal nutylėjimą C:\Users\vardas\Desktop)
        titi_pagr.SS_DVS_REPORT_FOR=[]
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_kodas_rd='PARDAVIMAI']+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_data=Wi06k.i06_op_data]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_pav="Pardavimo S/F"]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_kodas_ks=Wi06k.i06_kodas_ks]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_kodas_ms=Wi06k.i06_kodas_ms]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[go top in Wi07k]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_kodas_is=Wi07k.i07_kodas_is]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_kodas_tb=.f.]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_kodas_4a=.f.]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_pastabos=Wi06k.i06_pastabos]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_file=m.SS_DVS_FILE]+[+',2,S/F Nr. ]+alltrim(Wi06k.i06_dok_nr)+[;']+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_file_nuoroda=.f.]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_rysys_modulis="RO"]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_rysys_operacija=Wi06k.i06_kodas_po]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_kodas_ls_1=f_nulls(Wi06k.i06_kodas_ls_1,"")]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_kodas_ls_2=f_nulls(Wi06k.i06_kodas_ls_2,"")]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_kodas_ls_3=f_nulls(Wi06k.i06_kodas_ls_3,"")]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_kodas_ls_4=f_nulls(Wi06k.i06_kodas_ls_4,"")]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_aprasymas1=f_nulls(Wi06k.i06_aprasymas1,"")]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_aprasymas2=f_nulls(Wi06k.i06_aprasymas2,"")]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_aprasymas3=f_nulls(Wi06k.i06_aprasymas3,"")]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_aprasymas4=.f.]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_tevas=.f.]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_dok_nr=Wi06k.i06_dok_nr]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_dok_reg=.f.]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_arch_nr=.f.]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_dok_data=Wi06k.i06_dok_data]+chr(13)
        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_bukle=.f.]+chr(13)
        *titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[m.cf_bukle=titi_pagr.useris]+chr(13)

        titi_pagr.SS_DVS_REPORT_FOR=titi_pagr.SS_DVS_REPORT_FOR+[DVS_for(m.cf_kodas_rd,m.cf_data,m.cf_pav,m.cf_kodas_ks,m.cf_kodas_ms,m.cf_kodas_is,m.cf_kodas_tb,m.cf_kodas_4a,]+;
        [m.cf_pastabos,m.cf_file,m.cf_file_nuoroda,m.cf_rysys_modulis,m.cf_rysys_operacija,]+;
                [m.cf_kodas_ls_1,m.cf_kodas_ls_2,m.cf_kodas_ls_3,m.cf_kodas_ls_4,m.cf_aprasymas1,m.cf_aprasymas2,m.cf_aprasymas3,m.cf_aprasymas4,]+;
                [m.cf_tevas, m.cf_dok_nr,m.cf_dok_reg,m.cf_arch_nr, m.cf_dok_data, m.cf_bukle)]