AMHGETP ; IHS/CMI/MAW - AMHG Treatment Plan Add/Edits 3/7/2009 8:49:18 PM ;
Source file <AMHGETP.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 2 | (FILE,UPDATE)^DIE ^DIK |
Mental Health Social Services | 1 | (ARRAYT,WP)^AMHGU |
Uncategorized | 1 | DEBUG^%Serenji |
Package | Total | Caller Graph |
---|---|---|
Mental Health Social Services | 1 | AMHGSTP |
Name | Comments | DBIA/ICR reference |
---|---|---|
DEBUG(RETVAL,AMHSTR) | ;-- debug entry point
|
|
DELAXIS4(REC,A4) | ;EP -- check to see if any axis 4 records were deleted during edit
|
|
CLNPP(RC) | ;-- clean out plan participants
|
|
TP(AMHIEN,DM,REC,PAT,DE,PRG,TD,RD,DC,DP,A5,CA,CD,DS,PRBL,GAF,PP) | ;EP -- file the treatment plan
|
|
PART(RC,DIEN,DP,RA) | ;-- file the participants
|
|
A(RC,A,FLD) | ;EP -- file wp fields
|
|
RD(REC,D,DP,DS) | ;EP -- file review data
|
|
ADDAXIS4(PI,RC) | ;EP -- add axis 4
|
|
PS(RC,DIEN,FLD,DS) | ;-- file the progress summary
|
|
PPART(RC,PP) | ;-- file the plan participants
|
|
CLNRV(RC) | ;clean out the review data first
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AMHPTXP - [#9002011.56] | DELAXIS4+8, DELAXIS4+10, PS+12*, PS+13*, CLNPP+4, CLNRV+4 |
^VA(200 - [#200] | RD+9, RD+11 |
Name | Line Occurrences |
---|---|
CLNPP | PPART+1 |
CLNRV | RD+1 |
PART | RD+23 |
PPART | TP+26 |
PS | RD+24 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | DELAXIS4+1~, A~, A+3 |
A( | DELAXIS4+6*, DELAXIS4+11 |
A4 | DELAXIS4~ |
A4( | DELAXIS4+3, DELAXIS4+5 |
A4IEN | DELAXIS4+4~, DELAXIS4+5*, DELAXIS4+6 |
A5 | TP~, TP+12 |
ADA | DELAXIS4+1~, DELAXIS4+3*, DELAXIS4+5 |
AMHAIEN | ADDAXIS4+1~, ADDAXIS4+6* |
>> AMHER | TP+20*, TP+25*, ADDAXIS4+5* |
AMHERRR | TP+1~, TP+19, TP+24, ADDAXIS4+1~, ADDAXIS4+5, ADDAXIS4+6, A+4~, A+6, RD+13~, RD+22 |
AMHFDA | TP+1~, ADDAXIS4+1~, A+4~, RD+13~ |
AMHFDA( | TP+4*, TP+5*, TP+6*, TP+7*, TP+8*, TP+9*, TP+10*, TP+11*, TP+12*, TP+13* , TP+14*, TP+16*, TP+17*, TP+22*, ADDAXIS4+3*, RD+17*, RD+18*, RD+19*, RD+20* |
AMHIEN | TP~, TP+19*, TP+24*, TP+26 |
AMHIENS | TP+1~, TP+2*, TP+4, TP+5, TP+6, TP+7, TP+8, TP+9, TP+10, TP+11 , TP+12, TP+13, TP+14, TP+16, TP+17, TP+22, ADDAXIS4+1~, ADDAXIS4+2*, ADDAXIS4+3, A+4~ , A+5*, A+6, RD+13~, RD+15*, RD+17, RD+18, RD+19, RD+20 |
AMHIENS(1 | TP+19, ADDAXIS4+6, PS+3* |
AMHIENS(2 | RD+16*, RD+22, PPART+16, PS+2* |
AMHIENS(3 | PART+16 |
AMHPERR | PART+11~, PART+16, PPART+11~, PPART+16 |
AMHPFDA | PART+11~, PPART+11~ |
AMHPFDA( | PART+13*, PART+14*, PPART+13*, PPART+14* |
>> AMHPIEN | PART+16*, PPART+16* |
AMHPIENS | PART+11~, PART+12*, PART+13, PART+14, PPART+11~, PPART+12*, PPART+13, PPART+14 |
AMHRDIEN | RD+13~, RD+22*, RD+23, RD+24 |
AMHSTR | DEBUG~ |
AMHWP | A+2~, A+3, A+6, PS+5~, PS+6 |
AMHWP( | PS+10, PS+12 |
AXIS4 | DELAXIS4+9~, DELAXIS4+10*, DELAXIS4+11 |
CA | TP~, TP+10 |
CD | TP~, TP+7 |
CNT | PS+8~, PS+9*, PS+11*, PS+13 |
D | RD~ |
D( | RD+4, RD+6 |
>> DA | DELAXIS4+12*, CLNPP+5*, CLNRV+5* |
>> DA(1 | DELAXIS4+12*, CLNPP+1*, CLNPP+2, CLNRV+1*, CLNRV+2 |
DC | TP~, TP+9 |
DE | TP~, TP+16, TP+22 |
DIEN | PART~, PART+12, PS~, PS+2, PS+12, PS+13 |
>> DIK | DELAXIS4+12*, CLNPP+2*, CLNRV+2* |
DM | TP~, TP+2, TP+15, TP+21 |
DP | TP~, TP+5, RD~, RD+23, PART~ |
DP( | RD+23, PART+5, PART+6, PART+8 |
DS | TP~, TP+6, RD~, PS~, PS+4, PS+6 |
DS( | RD+24 |
FL | TP+1~, TP+3*, TP+4, TP+5, TP+6, TP+7, TP+8, TP+9, TP+10, TP+11 , TP+12, TP+13, TP+14, TP+16, TP+17, TP+22, RD+13~, RD+14*, RD+17, RD+18 , RD+19, RD+20 |
FLD | A~, A+6, PS~ |
GAF | TP~, TP+14 |
I | PART+4~, PART+5*, PART+6, PART+8, PPART+5~ |
IEN | DELAXIS4+7~, DELAXIS4+8*, DELAXIS4+10, DELAXIS4+12 |
PART | PART+7~, PART+9*, PART+13, PPART+7~, PPART+9*, PPART+13 |
PAT | TP~, TP+17 |
PDA | PART+4~, PPART+5~, PPART+6*, PPART+8, CLNPP+3~, CLNPP+4*, CLNPP+5 |
PFL | PART+1~, PART+3*, PART+13, PART+14, PPART+2~, PPART+4*, PPART+13, PPART+14 |
PI | ADDAXIS4~, ADDAXIS4+3 |
PP | TP~, TP+26, PPART~ |
PP( | PPART+6, PPART+8 |
PRBL | TP~, TP+13 |
PRG | TP~, TP+11 |
PSDA | PS+8~, PS+10*, PS+12 |
PSTR | PART+7~, PART+8*, PART+9, PART+10, PPART+7~, PPART+8*, PPART+9, PPART+10 |
R | DELAXIS4+1~, DELAXIS4+2*, DELAXIS4+5, RD+2~, RD+3*, RD+7, RD+8, RD+10, RD+12 |
RA | PART~, PART+5, PART+6, PART+8 |
RC | ADDAXIS4~, ADDAXIS4+2, A~, A+5, PART~, PART+12, PPART~, PPART+1, PPART+12, PS~ , PS+3, PS+12, PS+13, CLNPP~, CLNPP+1, CLNPP+4, CLNRV~, CLNRV+1, CLNRV+4 |
RD | TP~, TP+8 |
RDA | RD+2~, RD+4*, RD+6, RD+23, RD+24 |
REC | TP~, TP+2, TP+24, DELAXIS4~, DELAXIS4+8, DELAXIS4+10, DELAXIS4+12, RD~, RD+1, RD+15 , RD+23, RD+24 |
REL | PART+7~, PART+10*, PART+14, PPART+7~, PPART+10*, PPART+14 |
RETVAL | DEBUG~ |
RNRD | RD+5~, RD+12*, RD+18 |
RRD | RD+5~, RD+7*, RD+16, RD+17 |
RRP | RD+5~, RD+8*, RD+9 |
RRPI | RD+5~, RD+9*, RD+19 |
RRS | RD+5~, RD+10*, RD+11 |
RRSI | RD+5~, RD+11*, RD+20 |
RSTR | RD+5~, RD+6*, RD+7, RD+8, RD+10, RD+12 |
TD | TP~, TP+4 |
TDA | CLNRV+3~, CLNRV+4*, CLNRV+5 |
U | DELAXIS4+10 |