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 |