VAFCPTED ;ISA/RJS,Zoltan-EDIT EXISTING PATIENT ;4/15/22 16:30
Source file <VAFCPTED.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EDIT(DGDFN,ARRAY,STRNGDR) | ;-- Edits existing patient
|
|
LOAD | ; -- Loads fields to patient file
|
|
UPDNC(DGDFN,NAME) | ;
|
|
ALIAS | ;update Alias multiple **756
|
|
ALIASNC(ARRAY,DGDFN,RGER) | ;Compare incoming Alias Name Components with existing Alias Name Components and add or delete as necessary
|
|
BLDERR(MSGROOT) | ;Build an error from the error message array
|
|
FMTNAME(ARRAY,LEN) | ;Return a formatted name from cleaned Name Components that doesn't exceed LEN characters in length.
|
|
GETFLAG() | ;Get the value of the name components flag
|
|
UPDSEXOR(ARRAY,DGDFN,RGER) | ;**1059, VAMPI-11114 (dri) compare incoming sexual orientation multiple with existing and add/update
|
|
UPDPRON(ARRAY,DGDFN,RGER) | ;**1059, VAMPI-11118 (dri) compare incoming pronoun multiple with existing and add/update
; Input: ; ARRAY = ARAY(2) ; ARAY(2,.2406,n) = pronoun code ; DGDFN = patient's dfn |
FileNo | Call Tags |
---|---|
^DPT - [#2] | Classic Fileman Calls |