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 |