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! |