Call Graph
Call Graph Total: 4
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 2 | $$CRTENTRY^IBTRH5C EN^IBTRHLO |
| VA FileMan | 2 | FILE^DIE DT^DILF |
IBTRHDE1 ;ALB/JWS - HCSR Auto Trigger of 278x215 Inquiry ;15-OCT-2014
Source file <IBTRHDE1.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 2 | $$CRTENTRY^IBTRH5C EN^IBTRHLO |
| VA FileMan | 2 | FILE^DIE DT^DILF |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TRIG278 | ; Perform 278x215 Inquiry Trigger for Appointments and Admissions
; loop through ^IBT(356.22,"AC") index, from today minus (-) HCSR100[1] and [2] ; check for only previous requests and/or inquiries that have received a 'pending' response ; added field .19 to 356.22 file to indicate that a 215 had been generated for the request/inquiry in order to ; prevent duplicates ; once entry found, perform copy of request data into new 356.22 entry (use version of IBTRH5C) ; need to suppress output of any error results during copy ; perform D EN^IBTRHLO(ien#, 1) to transmit 278x215 ; |
|
| 1 | ;begin SEARCH and copy and transmit 215 version of 278 authorization message
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IBT(356.22 - [#356.22] | 1+2, 1+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADMDATE | TRIG278+9~, TRIG278+11, TRIG278+12, TRIG278+13, TRIG278+14, TRIG278+15, 1+8 |
| APPTDATE | TRIG278+9~, TRIG278+10, TRIG278+12, TRIG278+13, TRIG278+14, TRIG278+15, 1+7 |
| DATA0 | TRIG278+9~, 1+3*, 1+4, 1+5, 1+6, 1+7, 1+8, 1+9 |
| >> HCSR | TRIG278+10, TRIG278+11 |
| IBFDA | TRIG278+9~ |
| IBFDA( | 1+11*, 1+13* |
| IBTRIEN | TRIG278+9~, 1+9*, 1+10, 1+11, 1+15 |
| IEN | TRIG278+9~, 1+3*, 1+9, 1+13 |
| TDATE | TRIG278+9~, TRIG278+13*, TRIG278+14*, TRIG278+15*, 1+1*, 1+2*, 1+3, 1+7, 1+8 |
