©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
BARFPST2 ; IHS/SD/LSL - A/R FLAT RATE POSTING (CONT) ;
Source file <BARFPST2.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 4 | NOW^%DTC FILE^DICN ^DIE ^DIK |
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DOC | ;
; LSL - 12/31/1999 - Created routine ; Contains code for saving data to A/R FLAT RATE POSTING File |
|
| ADJDAT | ;
; Enter data in Adjustments multiple of A/R FLATE RATE POSTING File ; Kill current Adjustments multiple in A/R FLAT RATE POSTING File |
|
| FACDAT | ;
; Enter facility data |
|
| TOT(X) | ; EP
; EP - Computed field ITEM BALANCE ; X = FRP Batch IEN |
|
| CORDAT | ;
; Enter data in A/R FLAT RATE POSTING File that doesn't go in a mult |
|
| BARSAV | ; EP
; EP - Save data in A/R FLAT RATE POSTING File |
|
| NEWENTRY | ;
; Create new entry in A/R FLAT RATE POSTING File ; Build BARNAME |
|
| FACTOT(X,Y) |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BARFRP( | ADJDAT+6, FACDAT+2, FACDAT+14, TOT+4, TOT+6, TOT+8, FACTOT+7, FACTOT+9 |
| ^DD("DD" | NEWENTRY+3 |
| ^DD(90054.01 | ADJDAT+16, FACDAT+8 |
| ^DIC(90054.01 | NEWENTRY+9 |
| Name | Line Occurrences |
|---|---|
| ADJDAT | BARSAV+10 |
| CORDAT | BARSAV+9 |
| FACDAT | BARSAV+11 |
| NEWENTRY | BARSAV+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | BARSAV+4 |
| >> BARADJ | BARSAV+10 |
| >> BARADJ( | ADJDAT+10, ADJDAT+11, ADJDAT+12, ADJDAT+13 |
| >> BARCNT | TOT+3*, TOT+7*, TOT+9, FACTOT+4*, FACTOT+8*, FACTOT+10 |
| >> BARCOL | CORDAT+6 |
| >> BARDT | BARSAV+4*, NEWENTRY+3, CORDAT+5 |
| >> BARENTF | FACDAT+2*, FACDAT+4 |
| >> BAREOB | FACDAT+2, FACDAT+10, FACDAT+14 |
| >> BARFIEN | FACDAT+13*, FACDAT+14* |
| >> BARFRPC | BARSAV+2*, NEWENTRY+4 |
| >> BARFTOT | FACTOT+10*, FACTOT+11 |
| >> BARIEN | BARSAV+7, NEWENTRY+19*, CORDAT+4, ADJDAT+3, ADJDAT+15, FACDAT+2, FACDAT+6, FACDAT+7, FACDAT+14 |
| >> BARITM | CORDAT+7 |
| >> BARNAME | NEWENTRY+4*, NEWENTRY+10 |
| >> BARNONE | BARSAV+8, NEWENTRY+18* |
| >> BARPAMNT | TOT+8*, TOT+9, FACTOT+9*, FACTOT+10 |
| >> BARPAMT | BARSAV+6*, CORDAT+11 |
| >> BARPAY | CORDAT+10 |
| >> BARSAMT | ADJDAT+13*, ADJDAT+18 |
| >> BARSCAT | ADJDAT+11*, ADJDAT+19 |
| >> BARSTYP | ADJDAT+12*, ADJDAT+18 |
| >> BARTOT | TOT+9*, TOT+10 |
| DA | CORDAT+2!, CORDAT+4*, ADJDAT+7* |
| DA(1 | ADJDAT+3*, ADJDAT+4, ADJDAT+6, FACDAT+6* |
| DD | NEWENTRY+11!, ADJDAT+20!, FACDAT+11! |
| DIC | NEWENTRY+6!, NEWENTRY+7*, NEWENTRY+13!, ADJDAT+14!, ADJDAT+15*, FACDAT+5!, FACDAT+7* |
| DIC("DR" | ADJDAT+18* |
| DIC("P" | NEWENTRY+9*, ADJDAT+16*, FACDAT+8* |
| DIC(0 | NEWENTRY+8*, ADJDAT+17*, FACDAT+9* |
| DIE | CORDAT+2!, CORDAT+3* |
| >> DIK | ADJDAT+4* |
| DO | NEWENTRY+11!, ADJDAT+20!, FACDAT+11! |
| DR | CORDAT+2!, CORDAT+5*, CORDAT+6*, CORDAT+7*, CORDAT+8*, CORDAT+9*, CORDAT+10*, CORDAT+11* |
| DUZ | BARSAV+2, CORDAT+8 |
| DUZ(2 | CORDAT+9, ADJDAT+6, FACDAT+2, FACDAT+14, TOT+4, TOT+6, TOT+8, FACTOT+7, FACTOT+9 |
| I | ADJDAT+5*, ADJDAT+6*, ADJDAT+7, ADJDAT+9*, ADJDAT+10*, ADJDAT+11, ADJDAT+12, ADJDAT+13, TOT+3*, TOT+4* , TOT+6, FACTOT+5~, FACTOT+6*, FACTOT+7* |
| >> J | TOT+5*, TOT+6* |
| U | NEWENTRY+9, ADJDAT+11, ADJDAT+12, ADJDAT+13, ADJDAT+16, FACDAT+8, TOT+8, FACTOT+9 |
| X | NEWENTRY+10*, ADJDAT+19*, FACDAT+10*, TOT~, TOT+4, TOT+6, TOT+8, FACTOT~, FACTOT+7, FACTOT+9 |
| Y | NEWENTRY+3*, NEWENTRY+4, NEWENTRY+14, NEWENTRY+19, FACDAT+13, FACTOT~, FACTOT+7 |