AMHLETN ; IHS/CMI/LAB - DISPLAY/EDIT TREATMENT NOTES ;
Source file <AMHLETN.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | ^DIK $$GET1^DIQ |
| IHS VA Utilities | 1 | EN^XBNEW |
| Package | Total | Caller Graph |
|---|---|---|
| Mental Health Social Services | 3 | AMHBPL1 AMHBPL2 AMHGSBPL |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DISP | ;EP - display current Treatment plans for this problem
|
|
| GETNUM(AMHPROBN) | ;EP - get next TP NUMBER
|
|
| PRTTXT | ; GENERALIZED TEXT PRINTER
|
|
| GETFRAG | ||
| EN1 | ;EP - called from xbnew
|
|
| DEL | ;EP - called from template to delete all TP's for a PROBLEM
|
|
| PRTTXT2 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^AMHPPROB - [#9002011.51] | GET1^DIQ |
| ^AMHPTP - [#9002011.53] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AMHPPROB - [#9002011.51] | DISP+4 |
| ^AMHPROB - [#9002012.2] | DISP+5 |
| ^AMHPTP - [#9002011.53] | DISP+13 |
| ^AMHPTP("AD" | EN1+1 |
| ^AMHPTP("AE" | GETNUM+2, DISP+7, DISP+10, DISP+11 |
| ^DPT - [#2] | DISP+5 |
| ^VA(200 - [#200] | DISP+16 |
| Name | Line Occurrences |
|---|---|
| GETFRAG | PRTTXT2 |
| PRTTXT | DISP+6, DISP+18 |
| PRTTXT2 | PRTTXT+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | GETNUM+1~, GETNUM+2*, DISP+9~, DISP+10*, DISP+11 |
| AMHLETP | GETNUM+1~, DISP+20! |
| AMHLETP("AUTH" | DISP+16*, DISP+17 |
| AMHLETP("C" | PRTTXT+3!, GETFRAG+1*, GETFRAG+2 |
| AMHLETP("DLT" | PRTTXT+1*, PRTTXT+3!, PRTTXT2* |
| AMHLETP("DON" | DISP+14*, DISP+17 |
| AMHLETP("F" | PRTTXT+3!, PRTTXT2, GETFRAG*, GETFRAG+2* |
| AMHLETP("ICL" | PRTTXT+1, PRTTXT2*, DISP+6*, DISP+18* |
| AMHLETP("ILN" | PRTTXT+1*, PRTTXT+3!, PRTTXT2*, GETFRAG, GETFRAG+1 |
| AMHLETP("NRQ" | PRTTXT+2*, DISP+6*, DISP+18* |
| AMHLETP("NUM" | GETNUM+3*, GETNUM+4 |
| AMHLETP("PROB | IEN" , DISP+3, DISP+4, DISP+6, DISP+7, DISP+10, DISP+11, REC" , DISP+4*, DISP+5 |
| AMHLETP("PT" | DISP+15*, DISP+17 |
| AMHLETP("Q" | PRTTXT+2* |
| AMHLETP("TN" | DISP+13*, DISP+14, DISP+15, DISP+16, DISP+17, DISP+18 |
| AMHLETP("TP I | EN" , DISP+11*, DISP+12, DISP+13 |
| AMHLETP("TXT" | PRTTXT+2*, PRTTXT+3!, GETFRAG*, GETFRAG+1, GETFRAG+2*, DISP+6*, DISP+18* |
| >> AMHPDFN | EN1+1 |
| AMHPROBN | GETNUM~, GETNUM+2 |
| AMHTDOO | PRTTXT+3! |
| AMHX | EN1+1*, EN1+2! |
| >> DA | EN1+1* |
| >> DIK | EN1+1* |
| U | DISP+5, DISP+14, DISP+15, DISP+16, DISP+18 |
| X | GETNUM+1~, GETNUM+2*, GETNUM+3 |
| Y | GETNUM+1~, DISP+20! |