DGRNCVNC ;HDSO/RTW - Run Patient Name Standardization ; 25 OCT 2023 10:21
Source file <DGRNCVNC.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;
|
|
DIRHL7 | ;
|
|
RUN(DGFLAG) | ;Convert PATIENT file names;
|
|
LOOP | ||
DIR | ;
|
|
LOOP2 | ;
|
|
UPDATE(DGFLAG,DGFIL,DGIENS,DGFLD,DGNAM,DGNMSP,DPTMAX,DPTA,DGMPI) | ;Process name field
|
|
RECORD(DGFIL,DGFLD,DGREC,DGNAM,DGAUD,DGNMSP,DGDFN,DGOLD) | ;file changes in ^XTMP
|
|
INV(DGIENS) | ;Invert the IENS CALL FROM UPDATE
|
|
FIELD | ||
XRARY | ;Gather xref kills and sets
|
|
CONFIRM | ; SEND A CONFIRMATION MAILMAN MESSAGE
|
|
RESULTS | ;
|
|
SENDMSG(XMDUZ,XMSUBJ,XMBODY,XMTO,XMINSTR,XMZ,XMATTACH) | ; Send a msg
; In: User, basket (if you are recipient), all msg parts, ; priority?, closed?, (info?,cc?), send now or later (when?), ; (KIDS,MIME,text,PackMan), delete date (if to shared,mail) ; XMINSTR("RCPT BSKT") |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DD("IX" - [#.11] | FIND^DIC, GETS^DIQ |