DG53342P ;BPFO/JRP;POST INIT FOR PATCH 342;1-FEB-2001
Source file <DG53342P.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
POST | ;Main entry point of post init routine
|
|
EN1 | ;Queue seeding of new field
; Queue time is post install question POS1 (use NOW if not defined) ; If queued using entry point QUEUE, queue time will be prompted for |
|
SET | ; This is the post-init to make sure all patients claiming
; exposure to agent orange have a selected location for the ; exposure. The initial setting is Vietnam. |
|
QUEUE | ;Line tag for field to use to requeue seeding
|
Name | Field # of Occurrence |
---|---|
^%ZTLOAD | EN1+33 |
$$S^%ZTLOAD | SET+15, SET+21 |
DELIX^DDMOD | POST+8 |
FILE^DIE | POST+27, POST+59 |
UPDATE^DIE | POST+28, POST+58 |
$$DT^XLFDT | SET+4 |
$$FMADD^XLFDT | SET+5 |
$$FMTE^XLFDT | EN1+24, SET+31, SET+35 |
$$FMTH^XLFDT | EN1+31 |
$$HTE^XLFDT | EN1+34 |
$$NOW^XLFDT | SET+18 |
^XMD | SET+41 |
MES^XPDUTL | POST+7, POST+13, POST+40, POST+45, POST+71, EN1+11, EN1+20, EN1+29, EN1+34, EN1+35 |
FileNo | Call Tags |
---|---|
^DPT - [#2] | DELIX^DDMOD |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGIN(38.6 - [#38.6] | POST+16, POST+48 |
^DPT - [#2] | SET+10, SET+13, SET+14* |
^TMP($J | SET+27!, SET+28*, SET+29*, SET+30*, SET+31*, SET+32*, SET+33*, SET+35*, SET+36*, SET+37* , SET+42! |
^XTMP("DG53342P" | EN1+12, EN1+21, EN1+24, SET+5*, SET+6*, SET+8, SET+16*, SET+17!, SET+23* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AOCNT | SET+3~, SET+9*, SET+14*, SET+16 |
DATIM | SET+3~, SET+4*, SET+5, SET+18*, SET+23, SET+31, SET+35 |
DFN | SET+3~, SET+9*, SET+10*, SET+12, SET+13, SET+14, SET+15 |
DFNCNT | SET+3~, SET+9*, SET+11*, SET+15, SET+16 |
DG53342P | EN1+31, QUEUE+1~, QUEUE+2* |
DUZ | SET+40 |
ERR | POST+30~, POST+32*, POST+33*, POST+36, POST+37, POST+61~, POST+63*, POST+64*, POST+67, POST+68 |
FDAROOT | POST+1~, POST+14!, POST+46! |
FDAROOT( | POST+17*, POST+18*, POST+19*, POST+20*, POST+21*, POST+22*, POST+49*, POST+50*, POST+51*, POST+52* , POST+53*, POST+54* |
FDAWP | POST+1~, POST+14!, POST+46! |
FDAWP(1 | POST+23*, POST+55* |
FDAWP(2 | POST+24*, POST+56* |
FDAWP(3 | POST+25* |
IENROOT | POST+1~, POST+14!, POST+46! |
IENROOT(1 | POST+26*, POST+57* |
IENS | POST+1~, POST+14!, POST+15*, POST+16*, POST+17, POST+18, POST+19, POST+20, POST+21, POST+22 , POST+27, POST+46!, POST+47*, POST+48*, POST+49, POST+50, POST+51, POST+52, POST+53, POST+54 , POST+58 |
LASTDFN | SET+3~, SET+9*, SET+12*, SET+16, SET+21 |
LINE | POST+30~, POST+35*, POST+36*, POST+37, POST+61~, POST+66*, POST+67*, POST+68 |
MSGROOT | POST+1~, POST+14!, POST+46! |
MSGROOT("DIERR" | POST+29, POST+33, POST+36, POST+37, POST+60, POST+64, POST+67, POST+68 |
QFLG | SET+3~, SET+7*, SET+10, SET+15*, SET+19, SET+26, SET+34 |
SPOT | POST+30~, POST+31*, POST+34*, POST+37, POST+38*, POST+39, POST+61~, POST+62*, POST+65*, POST+68 , POST+69*, POST+70 |
U | SET+14 |
X | POST+1~, POST+7!, POST+13!, POST+40!, POST+45!, POST+71!, EN1+11!, EN1+20!, EN1+29!, EN1+31* , QUEUE+1~ |
X( | POST+34*, POST+37*, POST+39*, POST+65*, POST+68*, POST+70* |
X(1 | POST+3*, POST+10*, POST+39*, POST+42*, POST+70*, EN1+4*, EN1+13*, EN1+22* |
X(2 | POST+4*, POST+11*, POST+43*, EN1+5*, EN1+14*, EN1+23* |
X(3 | POST+5*, POST+12*, POST+44*, EN1+6*, EN1+15*, EN1+24* |
X(4 | POST+6*, EN1+7*, EN1+16*, EN1+25* |
X(5 | EN1+8*, EN1+17*, EN1+26* |
X(6 | EN1+9*, EN1+18*, EN1+27* |
X(7 | EN1+10*, EN1+19*, EN1+28* |
XMDUZ | SET+3~, SET+38* |
XMSUB | SET+3~, SET+25*, SET+26* |
XMTEXT | SET+3~, SET+39* |
XMY | SET+3~ |
XMY( | SET+40* |
>> XPDQUES("POS1" | EN1+31 |
Y | SET+3~, SET+8*, SET+9, SET+13*, SET+14, SET+21* |
ZTDESC | EN1+3~, EN1+32* |
ZTDTH | EN1+3~, EN1+31*! |
ZTIO | EN1+3~, EN1+30* |
>> ZTREQ | SET+24*, SET+43* |
ZTRTN | EN1+3~, EN1+30* |
ZTSK | EN1+3~, EN1+34 |
ZTSK("D" | EN1+34 |
>> ZTSTOP | SET+20* |