Failų iškėlimas į MS Sharepoint - konfigūravimas

  1. Procedūros FAILU_SAUGYKLA parametrų informacija.
  2. Sistemos INIT.
  3. Galimos konfigūracijos.
  4. Tarpinė failų pavadinimų programa.

Procedūros FAILU_SAUGYKLA parametrų informacija

FAILU_SAUGYKLA(lcAction, lShowError, lcKodas_fl01, lnDateFrom, lnDateTo, lcModul, lcOpNo, lcKey2, lcKey3, lcKey4, lcKey5)

  • lcAction - veiksmo kodas. Failų perkėlimui naudojamas "UPLOAD"
  • lShowError - ar išvesti klaidas į f_info langą. Galimos reikšmės: .t. arba .f.. Reikšmė pagal nutylėjmą .f.
  • lcKodas_fl01 - katalogo nustatymų kodas iš Rivile GAMA "Katalogų nustatymai" . Galimos reikšmės: katalogo nustatymų kodas arba "*"
  • lnDateFrom - data nuo, tipas "date".
  • lnDateTo - data iki, tipas "date".
  • lcModul - Rivile GAMA modulio kodas. Galimos reikšmės: modulio kodas arba "*"
  • lcOpNo (lcKey1) - Rivile GAMA operacijos kodas. Galimos reikšmės: operacijos kodas arba "*"
  • lcKey2 - operacijos antras raktas (neprivalomas)
  • lcKey3 - operacijos trečias raktas (neprivalomas)
  • lcKey4 - operacijos ketvirtas raktas (neprivalomas)
  • lcKey5 - operacijos penktas raktas (neprivalomas)

Sistemos INIT aprašymas

m.loFile_upload=FAILU_SAUGYKLA()
FAILU_SAUGYKLA('MENIU') && meniu atvaizdavimas

FAILU_SAUGYKLA('MENIU') - Rivile GAMA programoje rodomas menių punktas "Failų saugykla".

Papildomi parametrai aprašant INIT:

  • test - nurodžius šį parametrą su reikšme .t. traktuojama, kad bus atliekamas testinis failų perkėlimas su nurodytu failų kiekiu, todėl privaloma nurodyti test_file parametrą.
  • test_file - nurodome kiek failų norėsime perkelti atlikdami testavimą.
m.loFile_upload=FAILU_SAUGYKLA()
m.loFile_upload.test=.t. && test perkėlimas (skirta perkelti tik nurodytą failų kiekį)
m.loFile_upload.test_file=10 && perkeliamų failų maksimalus kiekis
FAILU_SAUGYKLA('MENIU') && meniu atvaizdavimas

Galimos konfigūracijos

  1. Perkeliami visi failai, pagal katalogų nustatymuose aprašytą logiką ir prioritetą:
lcKodas_fl01="*"
lcDateFrom=.f.
lcDateTo=.f.
lcModul="*"
lcOpNo="*"
lShowError=.t.
FAILU_SAUGYKLA("UPLOAD",lShowError,lcKodas_fl01, lcDateFrom, lcDateTo, lcModul, lcOpNo)
  1. Perkeliami visi failai, pagal katalogų nustatymų kodą ir katalogo nustatymuose aprašytą logiką:
lcKodas_fl01="RO_B00_1_D"
lcDateFrom=.f.
lcDateTo=.f.
lcModul="*"
lcOpNo="*"
lShowError=.t.
FAILU_SAUGYKLA("UPLOAD",lShowError,lcKodas_fl01, lcDateFrom, lcDateTo, lcModul, lcOpNo)
  1. Perkeliami visi failai, pagal modulio kodą, katalogų nustatymuose aprašytą logiką ir prioritetą:
lcKodas_fl01="*"
lcDateFrom=.f.
lcDateTo=.f.
lcModul="RO"
lcOpNo="*"
lShowError=.t.
FAILU_SAUGYKLA("UPLOAD",lShowError,lcKodas_fl01, lcDateFrom, lcDateTo, lcModul, lcOpNo)
  1. Perkeliami visi failai, pagal modulio kodą, katalogo kodą ir katalogo nustatymuose aprašytą logiką:
lcKodas_fl01="RO_B00_1_D"
lcDateFrom=.f.
lcDateTo=.f.
lcModul="RO"
lcOpNo="*"
lShowError=.t.
FAILU_SAUGYKLA("UPLOAD",lShowError,lcKodas_fl01, lcDateFrom, lcDateTo, lcModul, lcOpNo)
  1. Perkeliami visi failai, pagal modulio kodą, datą nuo, datą iki, katalogo kodą ir katalogo nustatymuose aprašytą logiką:
lcKodas_fl01="RO_B00_1_D"
lcDateFrom=DATE(2023,2,28)
lcDateTo=DATE(2024,4,10)
lcModul="RO"
lcOpNo="*"
lShowError=.t.
FAILU_SAUGYKLA("UPLOAD",lShowError,lcKodas_fl01, lcDateFrom, lcDateTo, lcModul, lcOpNo)
  1. Perkeliami visi failai, pagal modulio kodą, katalogo kodą, katalogo nustatymuose aprašytą logiką ir operacijos raktus:
lcKodas_fl01="RO_B00_1_D"
lcDateFrom=.f.
lcDateTo=.f.
lcModul="RO"
lcOpNo="010000000002"
lShowError=.t.
lnKey2=1
FAILU_SAUGYKLA("UPLOAD",lShowError,lcKodas_fl01, lcDateFrom, lcDateTo, lcModul, lcOpNo, lnKey2)
  1. BAT failo pavyzdys: 
C:\RIV_GAMA\RIV_GAMA.EXE .f. .f. 2 AUTO auto XXF "FAILU_SAUGYKLA('UPLOAD', .f., '*', DATE(2023,2,28), DATE(2024,4,10), '*', '*')"
  1. Saugyklos katalogo aprašymo pavyzdys, kai perkeliamas dokumentas, prisegtas prie tam tikros grupės prekių:

konf_01

Klavišas:

lcKodas_fl01="PREKES"
lcDateFrom=.f.
lcDateTo=.f.
lcModul="*"
lcOpNo="*"
lShowError=.t.
FAILU_SAUGYKLA("UPLOAD",lShowError,lcKodas_fl01, lcDateFrom, lcDateTo, lcModul, lcOpNo)
  1. Saugyklos katalogo aprašymo pavyzdys, kai perkeliamas dokumentas, prisegtas prie tam tikros grupės klientų:

konf_02

b00_modul='KS' and rtrim(i39_modul_nr) in (select n08_kodas_ks from n08_klij where N08_KODAS_GS='VEZEJAI')

Klavišas:

lcKodas_fl01="KLIENTAI"
lcDateFrom=.f.
lcDateTo=.f.
lcModul="*"
lcOpNo="*"
lShowError=.t.
FAILU_SAUGYKLA("UPLOAD",lShowError,lcKodas_fl01, lcDateFrom, lcDateTo, lcModul, lcOpNo)

Tarpinė failų pavadinimų programa

Konsultantams ir atstovams

Pasinaudojant tarpine programa galima sugeneruoti failo pavadinimą pagal jūsų logiką. Programos pavyzdys "pavadinimas.prg" pridėtas prie atsisiuntimo failų. Tarpinėje programoje galima pasiekti keturis privačius kintamuosius:

  • pcPrefix - lentelės prefiksas B00 arba K00
  • pcKodas - lentelės įrašo unikalus kodas
  • pcModul - Rivile GAMA modulio kodas
  • pcTable - Rivile GAMA lentelė