DG884P ;PD-REMOTE/DDA,KCL,FT - DG*5.3*884 INSTALL UTILITIES ;6/18/15 3:34pm
Source file <DG884P.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ENV | ;Main entry point for Environment check items
|
|
ICDCHK | ;Check entry count in some DRG files
|
|
;send MailMan message if file counts don't match
|
||
COUNT | ;count the number entries in the file, put in 4th piece
|
|
PRE | ;Main entry point for Pre-init items
|
|
PTF125 | ;Item 2 - Update PTF125 entry in TRANSMISSION ROUTER (#407.7)
|
|
TURNOFF | ;set TRANSMIT field (FILE 407.71, Field 2) to NO
|
|
TURNON | ;set TRANSMIT field (FILE 407.71, Field 2) to YES
|
|
NEWRU | ;Create new RECEIVING USER
|
|
CREATE | ;create a PTF125 entry in FILE 407.7
|
|
STOP | ;display message and set XPDABORT=1 (stop patch install)
|
|
NEWMG | ;Create new 'PTI' mail group in FILE #3.8. Add PTT members to PTI.
; Input: None ; Output: None |
|
MEMBER | ;find MAIL GROUP (3.8) MEMBERs and set DGXMY array
|
|
POST | ;Main entry point for Post-init items
|
|
PROGCHK(XPDABORT) | ;
|
|
REINDEX | ;Rebuild the PTF portion of the Clinical Reminders Global Index
|
|
RECOMP | ;Recompile input templates
|
Name | Field # of Occurrence |
---|---|
^%ZTLOAD | REINDEX+20 |
DELIX^DDMOD | PRE+5, PRE+6, PRE+7, PRE+8, PRE+9 |
$$FIND1^DIC | NEWMG+14 |
UPDATE^DIE | TURNOFF+4, TURNON+4, NEWRU+5, CREATE+5 |
DIEZ^DIKCUTL3 | RECOMP+34 |
GETS^DIQ | PTF125+27, MEMBER+4 |
$$SITE^VASITE | MAIL+3 |
$$NOW^XLFDT | REINDEX+18 |
$$MG^XMBGRP | NEWMG+27 |
^XMD | MAIL+8 |
$$INSTALDT^XPDUTL | REINDEX+6 |
BMES^XPDUTL | ICDCHK+9, ICDCHK+30, PRE+3, PTF125+10, STOP+1, NEWMG+11, REINDEX+3, REINDEX+13, RECOMP+10, RECOMP+37 |
MES^XPDUTL | ICDCHK+35, ICDCHK+38, PRE+12, NEWMG+15, NEWMG+16, NEWMG+28, NEWMG+29, NEWMG+30, NEWMG+31, NEWMG+32 , NEWMG+33, NEWMG+34, NEWMG+35, NEWMG+36, NEWMG+38, NEWMG+39, REINDEX+23 |
$$PROD^XUPROD | ICDCHK+39 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^XMB(3.8 - [#3.8] | FIND1^DIC, GETS^DIQ |
^VAT(407.7 - [#407.7] | GETS^DIQ |
^DGPT - [#45] | DIEZ^DIKCUTL3 |
45.01 | DELIX^DDMOD |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(4.2 - [#4.2] | ENV+21, PTF125+12 |
^PXRMINDX(45 | REINDEX+9 |
^VAT(407.7 - [#407.7] | PTF125+19, PTF125+21 |
^XMB(3.8 - [#3.8] | MEMBER+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DGARRAY | PTF125+6~, MEMBER+1~ |
DGARRAY( | PTF125+34, PTF125+40, PTF125+46, PTF125+47, PTF125+48, PTF125+56, PTF125+57, PTF125+58, MEMBER+5, MEMBER+7 , MEMBER+8 |
DGCNT | ICDCHK+1~, COUNT+1*, COUNT+2*, COUNT+3 |
DGDUZ | MEMBER+1~, MEMBER+8*, MEMBER+9 |
DGERROR | PTF125+6~, PTF125+28, PTF125+50, PTF125+60, PTF125+67, TURNOFF+2!, TURNON+2!, NEWRU+1!, CREATE+1!, MEMBER+1~ |
DGFDA | PTF125+6~, TURNOFF+2!, TURNON+2!, NEWRU+1!, CREATE+1! |
DGFDA( | TURNOFF+3*, TURNON+3*, NEWRU+2*, NEWRU+3*, NEWRU+4*, CREATE+2*, CREATE+3*, CREATE+4* |
DGFLAG | ICDCHK+1~, ICDCHK+20*, ICDCHK+31*, ICDCHK+33, ICDCHK+36, PTF125+6~, PTF125+55*, PTF125+58*, PTF125+65, TURNON+5* , NEWMG+8~, NEWMG+9*, NEWMG+20*, NEWMG+34, NEWMG+35, NEWMG+36 |
DGFLD | RECOMP+8~, RECOMP+14*, RECOMP+15*, RECOMP+16*, RECOMP+17*, RECOMP+21*, RECOMP+25*, RECOMP+26*, RECOMP+27*, RECOMP+31* , RECOMP+34, RECOMP+35! |
DGFLD( | RECOMP+21*, RECOMP+25*, RECOMP+26*, RECOMP+27*, RECOMP+31* |
DGFLD(45 | RECOMP+14*, RECOMP+15*, RECOMP+16*, RECOMP+17* |
DGGNM | NEWMG+5~, NEWMG+9*, NEWMG+14, NEWMG+15, NEWMG+27, NEWMG+28 |
DGI | ICDCHK+1~, COUNT+1*, COUNT+2* |
DGICD | ICDCHK+1~ |
DGICD( | ICDCHK+10*, ICDCHK+11*, ICDCHK+13*, ICDCHK+14*, ICDCHK+15*, ICDCHK+16*, ICDCHK+18, ICDCHK+21, ICDCHK+22, ICDCHK+25 , ICDCHK+29, ICDCHK+31, COUNT+3* |
DGICD(82 | ICDCHK+12* |
DGIEN | PTF125+6~, PTF125+19*, PTF125+20, PTF125+21*, PTF125+22, PTF125+27, NEWRU+2, NEWRU+3, NEWRU+4, NEWMG+4~ |
DGINSTDT | REINDEX+1~, REINDEX+7*, REINDEX+9 |
DGL | ICDCHK+1~, ICDCHK+17*, ICDCHK+31* |
DGLOBAL | ICDCHK+1~, ICDCHK+18*, COUNT+1*, COUNT+2 |
DGLOOP | ICDCHK+1~, ICDCHK+17*, ICDCHK+18*, ICDCHK+20*, ICDCHK+21*, ICDCHK+22, ICDCHK+25, ICDCHK+29, ICDCHK+31, COUNT+3 , PTF125+6~, PTF125+33*, PTF125+34*, PTF125+35, PTF125+40, MEMBER+1~, MEMBER+6*, MEMBER+7*, MEMBER+8 |
DGLOOP1 | PTF125+6~, PTF125+45*, PTF125+46*, PTF125+47, PTF125+48, PTF125+55*, PTF125+56*, PTF125+57, PTF125+58, TURNOFF+3 , TURNON+3 |
DGMG | MEMBER+1~, MEMBER+2*, MEMBER+3, MEMBER+4 |
DGMSG | ICDCHK+1~ |
DGMSG( | ICDCHK+31* |
DGMSG(1 | MAIL+4* |
DGMSG(2 | MAIL+5* |
DGQPTI | ENV+20~, ENV+21*, ENV+22, PTF125+6~, PTF125+12*, PTF125+13, NEWRU+3 |
DGRSLT | REINDEX+1~, REINDEX+6 |
DGRSLT(0 | REINDEX+7 |
DGTEXT | ICDCHK+1~, ICDCHK+9, ICDCHK+27!, ICDCHK+30, ICDCHK+32!, PTF125+6~, PTF125+10, PTF125+11!, STOP+1, REINDEX+1~ , REINDEX+13, REINDEX+23 |
DGTEXT(1 | ICDCHK+6*, ICDCHK+28*, PTF125+7*, PTF125+14*, PTF125+23*, PTF125+29*, PTF125+36*, PTF125+41*, PTF125+51*, PTF125+61* , PTF125+68*, REINDEX+10*, REINDEX+13, REINDEX+21* |
DGTEXT(2 | ICDCHK+7*, ICDCHK+29*, PTF125+8*, PTF125+15*, PTF125+24*, PTF125+30*, PTF125+37*, PTF125+42*, PTF125+52*, PTF125+62* , PTF125+69*, REINDEX+11*, REINDEX+22* |
DGTEXT(3 | ICDCHK+8*, PTF125+9*, PTF125+16* |
DGTXT | NEWMG+6~, NEWMG+27 |
DGTXT(1 | NEWMG+21* |
DGTXT(2 | NEWMG+22* |
DGTXT(3 | NEWMG+23* |
DGTXT(4 | NEWMG+24* |
DGTXT(5 | NEWMG+25* |
DGXMY | NEWMG+7~, NEWMG+27 |
DGXMY( | NEWMG+20*, MEMBER+9* |
DGXMY(0 | NEWMG+20 |
DIFROM | MAIL+1~ |
DT | PROGCHK+13 |
DUZ | MAIL+2, NEWMG+20, NEWMG+27, PROGCHK+13 |
DUZ(0 | PROGCHK+13 |
U | ICDCHK+10, ICDCHK+11, ICDCHK+12, ICDCHK+13, ICDCHK+14, ICDCHK+15, ICDCHK+16, ICDCHK+18, ICDCHK+22, ICDCHK+25 , ICDCHK+29, ICDCHK+31, MAIL+3, COUNT+3, PROGCHK+13 |
XMDUZ | ICDCHK+2~, MAIL+2* |
XMSUB | ICDCHK+2~, MAIL+3* |
XMTEXT | ICDCHK+2~, MAIL+6* |
XMY | ICDCHK+2~ |
XMY("FRANK.TRAXLER@DOMAIN.EXT" | MAIL+7* |
XMY("G.CSADMIN1@DOMAIN.EXT" | MAIL+7* |
XPDABORT | ENV+6*, ENV+10, ENV+11, ENV+26*, ENV+27, ENV+30!, PTF125+18, PTF125+26, PTF125+32, PTF125+39 , PTF125+44, PTF125+54, PTF125+64, PTF125+71, STOP+2*, PROGCHK~, PROGCHK+21* |
>> XPDENV | ICDCHK+3, ICDCHK+5, ICDCHK+23, ICDCHK+26, ICDCHK+34, ICDCHK+35, ICDCHK+37, ICDCHK+38 |
ZTDESC | REINDEX+1~, REINDEX+17* |
ZTDTH | REINDEX+1~, REINDEX+18* |
ZTIO | REINDEX+1~, REINDEX+19* |
ZTRTN | REINDEX+1~, REINDEX+16* |
ZTSK | REINDEX+1~, REINDEX+22 |