DGNAME ;SFISC/MKO-PATIENT NAME UTILITIES ; 12/10/23 11:20pm
Source file <DGNAME.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Registration | 1 | DG UPDATE NAME COMPONENTS |
Name | Comments | DBIA/ICR reference |
---|---|---|
UPDNC(RETURN,FLAG,IEN,NEWNC) | ;Remote Procedure DG UPDATE NAME COMPONENTS
; FLAG : "G" - "GET" mode, Name and Aliases should be returned, not updated ; Otherwise, the Name Components entry IEN will be updated with values in NEWNC array ; IEN : If FLAG["G", IEN is the DFN of the Patient whose name and alias should be returned ; If FLAG'["G", IEN is the IEN of the Name Components entry to update ; NEWNC : Array of name components, with subscripts: "FAMILY", "GIVEN", "MIDDLE", and "SUFFIX" |
|
GETNAMES(RETURN,PATIEN) | ;Get the Name and Aliases
|
|
GETCOMP(RETURN,NCIEN) | ;Get the Name Components into the RETURN array
|
|
BLDERR(MSGROOT) | ;Build an error from the error message array
|
|
FNDNCIEN(IENS) | ;
|
|
CREATENC(IEN) | ;
|
RPC Name | Call Tags |
---|---|
DG UPDATE NAME COMPONENTS | UPDNC |
FileNo | Call Tags |
---|---|
^DPT - [#2] | Classic Fileman Calls |
^VA(20 - [#20] | FIND1^DIC, GETS^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | GETNAMES+5, GETNAMES+8, GETNAMES+17, GETNAMES+18 |
^VA(20 - [#20] | UPDNC+13 |
Name | Line Occurrences |
---|---|
$$BLDERR | UPDNC+25, GETCOMP+4 |
$$CREATENC | GETNAMES+12, GETNAMES+13 |
$$FNDNCIEN | GETNAMES+12, CREATENC+4, CREATENC+12 |
GETCOMP | GETNAMES+14, GETNAMES+19 |
GETNAMES | UPDNC+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ALSIEN | GETNAMES+1~, GETNAMES+17*, GETNAMES+18 |
DA | CREATENC+2~, CREATENC+6* |
DIERR | UPDNC+6~, UPDNC+25, GETCOMP+1~, GETCOMP+4, FNDNCIEN+2~, CREATENC+9~ |
DIHELP | UPDNC+6~, GETCOMP+1~, FNDNCIEN+2~, CREATENC+9~ |
DIK | CREATENC+2~, CREATENC+6* |
DIK(1 | CREATENC+6* |
DIMSG | UPDNC+6~, GETCOMP+1~, FNDNCIEN+2~, CREATENC+9~ |
DIRUT | UPDNC+6~ |
DTOUT | UPDNC+6~ |
DUOUT | UPDNC+6~ |
ERRARR | UPDNC+6~, BLDERR+1~, BLDERR+2 |
ERRARR( | BLDERR+3 |
ERRMSG | UPDNC+6~, BLDERR+1~, BLDERR+3*, BLDERR+4 |
FDA | UPDNC+6~, CREATENC+9~ |
FDA(2 | CREATENC+10* |
FDA(20 | UPDNC+17*, UPDNC+18*, UPDNC+19*, UPDNC+20*, UPDNC+21* |
FLAG | UPDNC~, UPDNC+7*, UPDNC+10 |
I | BLDERR+1~, BLDERR+3* |
IEN | UPDNC~, UPDNC+10, UPDNC+12, UPDNC+13, UPDNC+16, UPDNC+27, CREATENC~, CREATENC+3, CREATENC+6, CREATENC+10 |
IENS | UPDNC+6~, UPDNC+16*, UPDNC+17, UPDNC+18, UPDNC+19, UPDNC+20, UPDNC+21, FNDNCIEN~, FNDNCIEN+3, CREATENC+2~ , CREATENC+3*, CREATENC+4, CREATENC+12 |
MSG | UPDNC+6~, GETCOMP+1~, FNDNCIEN+2~, CREATENC+9~ |
MSGROOT | BLDERR~, BLDERR+2 |
NCIEN | GETNAMES+1~, GETNAMES+8*, GETNAMES+12*, GETNAMES+13*, GETNAMES+14, GETNAMES+18*, GETNAMES+19, GETCOMP~, GETCOMP+2, GETCOMP+5 , CREATENC+2~, CREATENC+4*, CREATENC+5, CREATENC+10 |
NCIENS | GETCOMP+1~, GETCOMP+2*, GETCOMP+3, GETCOMP+5 |
NEWNC | UPDNC~ |
NEWNC("FAMILY" | UPDNC+17 |
NEWNC("GIVEN" | UPDNC+18 |
NEWNC("MIDDLE" | UPDNC+19 |
NEWNC("SUFFIX" | UPDNC+20 |
PATIEN | GETNAMES~, GETNAMES+4, GETNAMES+5, GETNAMES+8, GETNAMES+12, GETNAMES+13, GETNAMES+17, GETNAMES+18 |
RETURN | UPDNC~, UPDNC+10, UPDNC+12*, UPDNC+13*, UPDNC+25*, UPDNC+27*, GETNAMES~, GETNAMES+2!, GETNAMES+4*, GETNAMES+5* , GETNAMES+14, GETNAMES+17, GETNAMES+19, GETCOMP~, GETCOMP+4* |
RETURN( | GETCOMP+5* |
RETURN("" | GETCOMP+5 |
TARG | GETCOMP+1~ |
TARG(20 | GETCOMP+5 |
U | UPDNC+13, GETNAMES+5, GETNAMES+8, GETNAMES+18, GETCOMP+5 |
VAL | FNDNCIEN+2~, FNDNCIEN+4 |
VAL(1 | FNDNCIEN+3* |
VAL(2 | FNDNCIEN+3* |
VAL(3 | FNDNCIEN+3* |