API_MARKID()

API_MARKID atsisiuntimas (Konsultantams ir atstovams):

Būtinai reikalinga galiojanti VPS sutartis (kitaip programa nustoja veikti).

Galimi 4 veiksmai:

• Naujo PDF failo išsiuntimas pasirašymui;
• Patikrinimas ar dokumentas pasirašytas visų šalių;
• Pasirašyto PDF failo atsisiuntimas;
• PDF failo išvalymas MARK ID sistemoje.

Naujo PDF failo išsiuntimas pasirašymui.

Sintaksė

API_MARKID(@lcResult, "UPLOAD", lcApiKey, lcVardas1, lcPavarde1, lcEmail1, llEmailSiusti1, lcVardas2, lcPavarde2, lcEmail2, llEmailSiusti2, lcExtraSigners)

Grąžina

.T. jei pavyko išsiųsti, .F. - jei siuntimas nepavyko. Resultatas grąžinamas kintamajame lcResult. Objektą sudaro atributai:

• link - nuoroda darbuotojo pasirašymui (galima iškart atverti naršyklės langą),
• doc_id - unikalus MARK ID dokumento numeris,
• signer_id - darbuotojo id šiame dokumente,
• result - pilnas atsakymas iš MARK ID.

Parametrai

Parametras	Aprašymas	Formatas
lcResult	Funkcijos rezultatas arba klaidos pranešimas	C
lcApiKey	MarkID API raktas	C
lcVardas1	Pasirašančiojo vartotojo vardas (darbuotojo)	C
lcPavarde1	Pasirašančiojo vartotojo pavardė (darbuotojo)	C
lcEmail1	Pasirašančiojo vartotojo el. pašto adresas (darbuotojo)	C
llEmailSiusti1	Ar siųsti vartotojui pasirašymo nuorodą el. paštu (darbuotojo)	C
lcVardas2	Pasirašančiojo vartotojo vardas (kliento)	C
lcPavarde2	Pasirašančiojo vartotojo pavardė (kliento)	C
lcEmail2	Pasirašančiojo vartotojo el. pašto adresas (kliento)	C
llEmailSiusti2	Ar siųsti vartotojui pasirašymo nuorodą el. paštu (kliento)	C
lcExtraSigners	Kiti pasirašantys asmenys (JSON formatu)	C

Pavyzdys

m.lcResult=""
IF !api_markid(@lcResult,"UPLOAD",m.lcApi,"c:\tmp\sutartis.pdf",'Marius','Rubinas','rubinas@rivile.lt',.F.,'Jonas','Jonauskas','klientas@imone.lt',.T.,'')
    l_MESSAGEBOX(lcResult,16,'Klaida!')
    RETURN .F.
ENDIF
m.lcDokumentoId=lcResult.doc_id
m.lcMusuNuoroda=lcResult.link

** Atidarome naršyklę, kad menedžeris pasirašytų iš savo pusės
LOCAL loLink
m.loLink=CREATEOBJECT("hyperlink")
m.loLink.NavigateTo(m.lcMusuNuoroda)

Pavyzdys, kai pasirašo daugiau kaip 2 gavėjai

api_markid(@lcResult,"UPLOAD",m.lcApi,"c:\tmp\sutartis.pdf",'Marius','Rubinas','rubinas@rivile.lt',.F.,'Jonas','Jonauskas','klientas@imone.lt',.T.,'{"name": "Tadas","surname": "Trečias","email": "mail1@mail.com","noEmail": false},{"name": "Antanas","surname": "Ketvirtas","email": "mail2@mail.com","noEmail": false}')

Patikrinimas ar dokumentas pasirašytas visų šalių.

Sintaksė

API_MARKID(lcResult, "CHECK", lcApiKey, lcDocumentId)

Grąžina

.T. failas pasirašytas, .F. - jei dar nepasirašytas arba klaida.

Parametrai

Parametras	Aprašymas	Formatas
lcResult	Funkcijos rezultatas arba klaidos pranešimas	C
lcApiKey	MarkID API raktas	C
lcDocumentId	Unikalus MARK ID dokumento numeris	C

Pavyzdys

api_markid(@lcResult,"CHECK",m.lcApi,m.lcDokumentoId)

Pasirašyto PDF failo atsisiuntimas.

Sintaksė

API_MARKID(lcResult, "DOWNLOAD", lcApiKey, lcDocumentId)

Grąžina

.T. jei failą atsisųsti pavyko, .F. - jei failo atsisiųsti nepavyko arba klaida. Resultatas grąžinamas kintamajame lcResult, jame yra įkeltas visas failas, kurį reikėtų išsaugoti ant disko.

Parametrai

Parametras	Aprašymas	Formatas
lcResult	Funkcijos rezultatas arba klaidos pranešimas	C
lcApiKey	MarkID API raktas	C
lcDocumentId	Unikalus MARK ID dokumento numeris	C

Pavyzdys

IF !api_markid(@lcResult,"DOWNLOAD",m.lcApi,m.lcDokumentoId)
    l_MESSAGEBOX(m.lcResult,16,'Klaida!')
    RETURN .F.
ENDIF
m.lcFile="c:\tmp\sutartis_signed.pdf"
IF FILE(m.lcFile)
    ERASE(m.lcFile)
ENDIF
=STRTOFILE(m.lcResult,m.lcFile)

PDF failo išvalymas MARK ID sistemoje.

Sintaksė

API_MARKID(lcResult, "REMOVE", lcApiKey, lcDocumentId)

Grąžina

.T. failas ištrintas, .F. - jei klaida.

Parametrai

Parametras	Aprašymas	Formatas
lcResult	Funkcijos rezultatas arba klaidos pranešimas	C
lcApiKey	MarkID API raktas	C
lcDocumentId	Unikalus MARK ID dokumento numeris	C

Pavyzdys

=api_markid(@lcResult,"REMOVE",m.lcApi,m.lcDokumentoId)