©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
BARRTRAN ; IHS/SD/LSL - BATCH POSTED PAYMENTS REPORT ;
Source file <BARRTRAN.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Accounts Receivable | 3 | $$SDT^BARDUTL EOP^BARUTL $$EN^BARVDF |
| VA Fileman | 3 | ^DIC EN1^DIP $$GET1^DIQ |
| IHS VA Utilities | 2 | $$DIR^XBDIR VIEWD^XBLM |
| Kernel | 2 | HOME^%ZIS ^%ZISC |
| Registration | 1 | (CLEAR,FULL)^VALM1 |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Accounts Receivable | 1 | BAR BATCH POSTED PAYMENTS |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| END | ;
|
|
| DEVE | ||
| DSP | ; EP for VALM
|
|
| START | ; EP
; Collections report using FM print |
|
| DIPVAR | ;
; Set up DIP variables and Header routine |
|
| ;
; GET DEVICE (QUEUEING ALLOWED) |
||
| LOOKUP | ;
; Collection Register name lookup |
|
| GETDOS(BARBILL) | ;HEAT#124730
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^BARBL(2906 - [#90050.01] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(4 - [#4] | DIPVAR+2 |
| Name | Line Occurrences |
|---|---|
| END | LOOKUP+14 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> BAR("SITE" | DIPVAR+2* |
| >> BARBATCH | LOOKUP+12* |
| >> BARBEX | LOOKUP+13*, DIPVAR+10, DIPVAR+11, PRINT+6 |
| BARBILL | GETDOS~, GETDOS+2 |
| BAREFLG | LOOKUP+2!, LOOKUP+7*, LOOKUP+8*, LOOKUP+9*, LOOKUP+10, LOOKUP+14 |
| BARIOSL | PRINT+9*, DEVE+1, DEVE+2! |
| >> BY | DIPVAR+7* |
| DA | PRINT+4! |
| >> DHD | PRINT+6* |
| >> DHIT | DIPVAR+8* |
| DIC | LOOKUP+3*, LOOKUP+6!, DIPVAR+3* |
| DIC(0 | LOOKUP+4* |
| >> DIRUT | PRINT+5 |
| DTOUT | LOOKUP+2!, LOOKUP+9 |
| DUOUT | LOOKUP+2!, LOOKUP+8 |
| DUZ(2 | DIPVAR+2 |
| >> FLDS | DIPVAR+6* |
| >> FR | DIPVAR+10* |
| IOSL | PRINT+9, PRINT+10*, DEVE+1* |
| >> L | DIPVAR+4* |
| >> TO | DIPVAR+11* |
| U | LOOKUP+13, DIPVAR+2 |
| VALM | PRINT+15! |
| VALMAR | PRINT+15! |
| VALMBCK | PRINT+15! |
| VALMBG | PRINT+15! |
| VALMCAP | PRINT+15! |
| VALMCNT | PRINT+15! |
| VALMCOFF | PRINT+17! |
| VALMCON | PRINT+16! |
| VALMDN | PRINT+16! |
| VALMEVL | PRINT+16! |
| VALMIOXY | PRINT+16! |
| VALMKEY | PRINT+15!, PRINT+16! |
| VALMLFT | PRINT+16! |
| VALMLST | PRINT+16! |
| VALMMENU | PRINT+17! |
| VALMOFF | PRINT+16! |
| VALMSGR | PRINT+17! |
| VALMUP | PRINT+17! |
| VALMWD | PRINT+17! |
| VALMY | PRINT+17! |
| X | GETDOS+1~, GETDOS+2*, GETDOS+3 |
| >> XBFLD("BROWSE" | PRINT+8* |
| XQORNEST | PRINT+15! |
| XQORS | PRINT+17! |
| XQORSPEW | PRINT+17! |
| >> Y | LOOKUP+7, LOOKUP+11, LOOKUP+12, PRINT+3*, PRINT+7 |
| >> Y(0 | LOOKUP+13 |