EDPYPST ;SLC/KCM - Post init for facility install ;2/28/12 08:33am
Source file <EDPYPST.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PROXY | ; Create proxy user
|
|
CONVERT | ; set ^XTMP for tracking conversion
|
|
DIV(X) | ; return file 4 ien for Configuration
|
|
FIXSPEC | ; add the display properties to existing spec
|
|
ADDPROP(SPEC) | ; add display properties to spec
|
|
MOVEBRD(AREA) | ; move the display board spec into a multiple
|
|
DP | ; default display properties
|
|
FIXWAIT | ; change the category of waiting room to "waiting"
|
|
FIXDFLT | ; create initial default rooms
|
|
DELBRD | ; delete the DD and data for the old display board spec
|
|
AO | ; build AO index on #230
|
|
CHOICES | ; initialize choices timestamps
|
|
FIXNV | ; convert the "no value" codes to 0
|
|
CHGNV(FN,LOG,SUB,P) | ; convert individual piece, expects NOVAL defined
|
|
FIXAPX | ; fix the AP xref in 230
|
|
FIXPDFN | ; create the DFN xref in 230
|
|
FIXSTA | ; convert the station number field to an institution pointer
|
|
CHGSTA(EDPFILE,EDPIEN) | ; convert station number to institution pointer withing file
|
|
FIXICD | ; convert the ICD Code file to a pointer to the ICD file
|
|
CHGICD(LOG,IEN) | ; convert individual ICD Code to ICD Pointer
|
Name | Field # of Occurrence |
---|---|
$$GET1^DID | DELBRD+3 |
FILE^DIE | CHGSTA+7, CHGICD+8 |
WP^DIE | ADDPROP+12 |
ENALL^DIK | FIXAPX+6, FIXPDFN+6 |
CLEAN^DILF | ADDPROP+13, FIXSTA+8, FIXICD+6 |
EN^DIU2 | DELBRD+6 |
UPDBRD^EDPBCF | MOVEBRD+9 |
$$VERGTE^EDPYPRE | FIXSPEC+1, FIXWAIT+1, DELBRD+1, FIXAPX+1, FIXPDFN+1, FIXSTA+1, FIXICD+1 |
$$SITE^VASITE | DIV+3 |
$$FMADD^XLFDT | CONVERT+2 |
$$IEN^XUAF4 | CHGSTA+3 |
$$CREATE^XUSAP | PROXY+3 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^EDP(230 - [#230] | Classic Fileman Calls |
^EDPB(231.9 - [#231.9] | GET1^DID, WP^DIE |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIZ(172006 | CONVERT+1, CONVERT+10 |
^DIZ(172012 | CONVERT+4, DIV+2 |
^EDP( | CHGNV+2*, CHGSTA+2 |
^EDP(230 - [#230] | AO+1, AO+3, AO+4, AO+5*, FIXNV+5, FIXAPX+3!, FIXPDFN+3!, FIXSTA+4, FIXICD+4, FIXICD+5 , CHGICD+2 |
^EDP(230.1 - [#230.1] | FIXNV+11 |
^EDPB( | CHGSTA+2 |
^EDPB(231.7 - [#231.7] | FIXSTA+5 |
^EDPB(231.8 - [#231.8] | FIXWAIT+4, FIXWAIT+5*, FIXDFLT+6, FIXDFLT+9, FIXSTA+6 |
^EDPB(231.9 - [#231.9] | FIXSPEC+4, ADDPROP+3, ADDPROP+4, MOVEBRD+1, MOVEBRD+2, MOVEBRD+5, MOVEBRD+6, FIXDFLT+2, FIXDFLT+3, FIXDFLT+4 , FIXDFLT+7*, FIXDFLT+10*, CHOICES+2*, FIXSTA+7 |
^EDPB(233.1 - [#233.1] | FIXNV+3 |
^ICD9("BA" | CHGICD+4 |
^TMP("EDP-LAST-VERSION" | EDPYPST+4! |
^VA(200 - [#200] | PROXY+1 |
^XTMP("EDP-CONV" | CONVERT+1, CONVERT+2*, CONVERT+3, CONVERT+5, CONVERT+11* |
Name | Line Occurrences |
---|---|
$$DIV | CONVERT+5 |
ADDPROP | FIXSPEC+4 |
AO | EDPYPST+3 |
CHGICD | FIXICD+5 |
CHGNV | FIXNV+6, FIXNV+7, FIXNV+8, FIXNV+9, FIXNV+10, FIXNV+12, FIXNV+13, FIXNV+14, FIXNV+15, FIXNV+16 |
CHGSTA | FIXSTA+4, FIXSTA+5, FIXSTA+6, FIXSTA+7 |
CHOICES | EDPYPST+3 |
CONVERT | EDPYPST+3 |
DELBRD | EDPYPST+3 |
FIXAPX | EDPYPST+3 |
FIXDFLT | EDPYPST+3 |
FIXICD | EDPYPST+3 |
FIXPDFN | EDPYPST+3 |
FIXSPEC | EDPYPST+3 |
FIXSTA | EDPYPST+3 |
FIXWAIT | EDPYPST+3 |
MOVEBRD | FIXSPEC+4 |
PROXY | EDPYPST+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AMB | FIXDFLT+1~, FIXDFLT+3*, FIXDFLT+5, FIXDFLT+6*, FIXDFLT+7 |
AREA | MOVEBRD~, MOVEBRD+1, MOVEBRD+2, MOVEBRD+5, MOVEBRD+6, MOVEBRD+9, FIXDFLT+1~, FIXDFLT+2*, FIXDFLT+3, FIXDFLT+4 , FIXDFLT+6, FIXDFLT+7, FIXDFLT+9, FIXDFLT+10, CHOICES+1~, CHOICES+2* |
DA | FIXAPX+4~, FIXPDFN+4~ |
DFLT | FIXDFLT+1~, FIXDFLT+3*, FIXDFLT+8, FIXDFLT+9*, FIXDFLT+10 |
DIERR | ADDPROP+1~, CHGSTA+5~, CHGSTA+8, CHGICD+6~, CHGICD+9 |
DIK | FIXAPX+4~, FIXAPX+5*, FIXPDFN+4~, FIXPDFN+5* |
DIK(1 | FIXAPX+5*, FIXPDFN+5* |
DIU | DELBRD+4~, DELBRD+5* |
DIU(0 | DELBRD+5* |
DIV | CONVERT+3~, CONVERT+5*, CONVERT+10, CONVERT+11 |
DT | CONVERT+2 |
EDPFILE | CHGSTA~, CHGSTA+2, CHGSTA+6, CHGSTA+8, CHGICD+9 |
EDPIEN | CHGSTA~, CHGSTA+2, CHGSTA+6, CHGSTA+8, CHGICD+9 |
ERR | CHGSTA+5~, CHGICD+6~ |
FDA | CHGSTA+5~, CHGICD+6~ |
FDA( | CHGSTA+6*, CHGICD+7* |
FN | CHGNV~, CHGNV+2 |
I | CONVERT+3~, CONVERT+4*, CONVERT+5, CONVERT+7, ADDPROP+1~, ADDPROP+3*, ADDPROP+4, ADDPROP+5, ADDPROP+9*, ADDPROP+10 , ADDPROP+11, MOVEBRD+4~, MOVEBRD+5*, MOVEBRD+6, MOVEBRD+8 |
ICDCODE | CHGICD+1~, CHGICD+2*, CHGICD+3, CHGICD+4 |
ICDIEN | CHGICD+1~, CHGICD+4*, CHGICD+7 |
IEN | FIXWAIT+3~, FIXWAIT+4*, FIXWAIT+5, AO+2~, AO+4*, AO+5, FIXSTA+3~, FIXSTA+4*, FIXSTA+5*, FIXSTA+6* , FIXSTA+7*, FIXICD+3~, FIXICD+5*, CHGICD~, CHGICD+2, CHGICD+7 |
INST | CHGSTA+1~, CHGSTA+3*, CHGSTA+6, CHGSTA+8, CHGICD+9 |
L | CONVERT+9~*, CONVERT+10* |
LN | ADDPROP+8~*, ADDPROP+10*, ADDPROP+11* |
LOG | AO+2~, AO+3*, AO+4, AO+5, FIXNV+2~, FIXNV+5*, FIXNV+6, FIXNV+7, FIXNV+8, FIXNV+9 , FIXNV+10, FIXNV+11*, FIXNV+12, FIXNV+13, FIXNV+14, FIXNV+15, FIXNV+16, CHGNV~, CHGNV+2, FIXICD+3~ , FIXICD+4*, FIXICD+5, CHGICD~, CHGICD+2, CHGICD+7 |
MSG | MOVEBRD+4~, MOVEBRD+9 |
NOVAL | FIXNV+2~, FIXNV+3*, FIXNV+4, CHGNV+2 |
ORD | AO+2~, AO+4*, AO+5 |
ORIG | ADDPROP+1~ |
ORIG( | ADDPROP+4*, ADDPROP+5, ADDPROP+9, ADDPROP+10, ADDPROP+11 |
P | CHGNV~, CHGNV+2 |
SKIP | ADDPROP+1~, ADDPROP+2*, ADDPROP+5*, ADDPROP+6 |
SPEC | FIXSPEC+3~, FIXSPEC+4*, ADDPROP~, ADDPROP+3, ADDPROP+4, ADDPROP+12 |
STA | CHGSTA+1~, CHGSTA+2*, CHGSTA+3 |
STN | FIXDFLT+1~, FIXDFLT+4*, FIXDFLT+6, FIXDFLT+9, CHGSTA+8, CHGICD+9 |
SUB | CHGNV~, CHGNV+2 |
U | CONVERT+2, CONVERT+8, CONVERT+9, CONVERT+11, DIV+3, MOVEBRD+1, FIXWAIT+5, FIXDFLT+3, FIXDFLT+4, FIXDFLT+7 , FIXDFLT+10, CHGNV+2, CHGSTA+2, CHGICD+2 |
WP | ADDPROP+1~, MOVEBRD+4~, MOVEBRD+9 |
WP( | ADDPROP+10*, ADDPROP+11*, MOVEBRD+8* |
X | PROXY+2~, PROXY+3*, CONVERT+3~*, CONVERT+7, CONVERT+8, CONVERT+9, DIV~, DIV+2, ADDPROP+1~ |
X0 | DIV+1~, DIV+2*, DIV+3, MOVEBRD+4~, MOVEBRD+6*, MOVEBRD+7, MOVEBRD+8 |
X1 | CONVERT+6~, CONVERT+7*, CONVERT+11, FIXDFLT+1~, FIXDFLT+3* |
X2 | CONVERT+6~*, CONVERT+8*, CONVERT+11 |
X3 | CONVERT+6~*, CONVERT+10*, CONVERT+11 |
Y | DIV+1~, DIV+2*, DIV+3*, DIV+4 |
Name | Field # of Occurrence |
---|---|
$T(DP+1 | ADDPROP+11 |