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 |