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