DG53754B ;ALB/TDM - POST-INSTALL DG*5.3*754 ; 12/16/10 9:53am
Source file <DG53754B.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ADDPTID | ; DBIA #4139 - This is a one-time agreement to allow Registration to
; set the IDENTIFIER node as follows for the PATIENT (#2) file: ; ^DD(2,0,"ID",.03)="D EN^DDIOL($TR($$DOB^DPTLK1(Y,1),""/"",""-""),,""?$X+2"")" ; ; This api will add the IDENTIFIER parameter back to the PATIENT ; file (#2). It was an unknown fact that the IDENTIFIER parameter ; would be removed when the DG*5.3*754 pre-init routine (DG53754P) ; initialized the field definition for the DATE OF BIRTH field (#.03) ; from the PATIENT file (#2). |
|
RECOMP(ZTMP,X) | ;Recompile Input Templates
|
|
EN | ;Post-install entry point
|
FileNo | Call Tags |
---|---|
^DIE - [#.402] | FIND1^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD(2 | ADDPTID+10* |
Name | Line Occurrences |
---|---|
ADDPTID | EN+4 |
RECOMP | EN+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DMAX | EN+1~, EN+2* |
X | EN+1~, RECOMP~, RECOMP+1 |
Y | EN+1~, RECOMP+2*, RECOMP+3 |
ZTMP | EN+1~, RECOMP~, RECOMP+1, RECOMP+2, RECOMP+3, RECOMP+5 |