©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
BARDYSV4 ; IHS/SD/MAS,TPF - OMB - DAYS TO COLLECTION ; 02/09/2009
Source file <BARDYSV4.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Accounts Receivable | 4 | ($$IHS,BILLS,INIT)^BARDYSV3 (TRANS,VISITS)^BARDYSV5 ASKFORRT^BARUFUT $$FILLSTR^BARUFUT1 |
| VA Fileman | 2 | NOW^%DTC $$GET1^DIQ |
| IHS VA Utilities | 1 | ^XBGSAVE |
| Kernel | 1 | ($$LAST,$$VERSION)^XPDUTL |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETFILNM(BEGDATE,ENDDATE) | ;EP - CREATE FILE NAME (COPIED FROM BARUFUT1)
|
|
| CURASUFC(LOCIEN,BARDOS) | ;EP - GET CURRENT ASUFAC BASED ON 'DOS BEGIN' (#102) IN A/R BILL FILE (COPIED FROM BARUFUT1)
|
|
| GETFILAG | ;CHECK FOR FILE NAME ALREADY USED (COPIED FROM BARUFUT1)
|
|
| SENDFILE(XBGL,XBFN) | ; EP - CREATE FLAT FILE FOR UFMS USING XBGSAVE
|
|
| WRITE | ;TEMP WRITE WHILE TESTING
|
|
| INST | ;EP - Run once when patch installed BAR*1.8*14 ;M5*ADD*TMM
|
|
| INSTALL | ;EP - Run two times using different date range when BAR*1.8*16 installed ;M5*ADD*TMM
|
|
| GETSUFAC() | ;EP;GIVEN DUZ(2) (COPIED FROM BARUFUT1)
; get parent from parent/satellite file |
|
| ASKFNAME(BARFILE,BEGDATE,ENDDATE) | ;EP - ASK FOR FILENAME (COPIED FROM BARUFUT1)
|
| Name | Field # of Occurrence |
|---|---|
| NOW^%DTC | GETFILAG+1, INST+6, INST+15 |
| $$IHS^BARDYSV3 | INST+2 |
| BILLS^BARDYSV3 | INST+9 |
| INIT^BARDYSV3 | INST+3 |
| TRANS^BARDYSV5 | INST+11 |
| VISITS^BARDYSV5 | INST+8 |
| ASKFORRT^BARUFUT | SENDFILE+17 |
| $$FILLSTR^BARUFUT1 | GETFILNM+5, GETFILNM+9 |
| $$GET1^DIQ | CURASUFC+7 |
| ^XBGSAVE | SENDFILE+27 |
| $$LAST^XPDUTL | GETFILNM+8 |
| $$VERSION^XPDUTL | GETFILNM+4 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^AUTTLOC - [#9999999.06] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUTTLOC - [#9999999.06] | CURASUFC+10, CURASUFC+11, CURASUFC+12 |
| ^BAR(90052.05 | GETSUFAC+9, GETSUFAC+10, GETSUFAC+12, GETSUFAC+14, GETSUFAC+15 |
| ^BAR(90052.06 | SENDFILE+12, GETSUFAC+7, GETSUFAC+8 |
| ^BAROMB($J | WRITE+3, WRITE+5, WRITE+6, WRITE+9, WRITE+10, WRITE+13, WRITE+14 |
| ^BARTMP("BARDYSV3" | INST+7*, INST+12*, INST+19*, INST+20*, INST+21* |
| ^DD("DD" | GETFILAG+4 |
| ^DIC(9.4 - [#9.4] | GETFILNM+6 |
| Name | Line Occurrences |
|---|---|
| $$ASKFNAME | INST+13 |
| $$CURASUFC | GETSUFAC+16 |
| $$GETFILNM | ASKFNAME+1 |
| $$GETSUFAC | GETFILNM+2, GETFILNM+3 |
| INST | INSTALL+3, INSTALL+6 |
| SENDFILE | INST+14 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | GETFILAG+2, GETFILAG+3, GETFILAG+4, INST+7, INST+12, INST+19, INST+20, INST+21 |
| ASUFAC | GETSUFAC+2~, GETSUFAC+16*, GETSUFAC+17, CURASUFC+3~, CURASUFC+4*, CURASUFC+7*, CURASUFC+9, CURASUFC+12*, CURASUFC+15 |
| BARBIL | WRITE+1~, WRITE+8*, WRITE+9*, WRITE+10, WRITE+13* |
| BARDOS | CURASUFC~, CURASUFC+2, CURASUFC+11 |
| BARDT | CURASUFC+3~, CURASUFC+5*, CURASUFC+10*, CURASUFC+11, CURASUFC+12 |
| BARDTFLG | CURASUFC+3~, CURASUFC+6*, CURASUFC+10, CURASUFC+13* |
| BARFILE | ASKFNAME~, ASKFNAME+1*, ASKFNAME+2, INST+13, INST+14 |
| BARP2 | GETFILNM+1~, GETFILNM+5*, GETFILNM+10 |
| BARP3 | GETFILNM+1~, GETFILNM+9*, GETFILNM+10 |
| BARPAR | GETSUFAC+2~, GETSUFAC+4*, GETSUFAC+7, GETSUFAC+15*, GETSUFAC+16 |
| BARPK | GETFILNM+1~, GETFILNM+6*, GETFILNM+7*, GETFILNM+8 |
| BARPT | GETFILNM+1~, GETFILNM+8*, GETFILNM+9 |
| BARSAT | GETSUFAC+2~, GETSUFAC+3*, GETSUFAC+9, GETSUFAC+10, GETSUFAC+12, GETSUFAC+14, GETSUFAC+15 |
| >> BARV | GETFILNM+4*, GETFILNM+5, GETFILNM+8, GETFILNM+10 |
| BARVDA | WRITE+1~, WRITE+4*, WRITE+5*, WRITE+6, WRITE+7, WRITE+9, WRITE+10, WRITE+11, WRITE+13, WRITE+14 , WRITE+15 |
| BARVLOC | WRITE+1~, WRITE+2*, WRITE+3*, WRITE+5, WRITE+6, WRITE+7, WRITE+9, WRITE+10, WRITE+11, WRITE+13 , WRITE+14, WRITE+15 |
| BEGDATE | ASKFNAME~, ASKFNAME+1, GETFILNM~, GETFILAG+8, INSTALL+1*, INSTALL+4*, INST+7, INST+8, INST+9, INST+11 , INST+13 |
| BILLREC | WRITE+1~, WRITE+10*, WRITE+11 |
| DA | GETSUFAC+2~, GETSUFAC+6*, GETSUFAC+7*, GETSUFAC+8, GETSUFAC+9, GETSUFAC+10, GETSUFAC+12, GETSUFAC+14, GETSUFAC+15 |
| DATE | GETFILNM+1~, GETFILAG+3*, GETFILAG+7 |
| DATERANG | GETFILNM+1~, GETFILAG+8*, GETFILAG+9 |
| DATETIME | GETFILNM+1~, GETFILAG+7*, GETFILAG+9 |
| DT | GETSUFAC+12, GETSUFAC+14, GETSUFAC+16 |
| DUZ | GETFILNM+2, GETFILNM+3 |
| DUZ(2 | SENDFILE+12, GETSUFAC+3, CURASUFC+7, INST+2, INST+7, INST+12, INST+19, INST+20, INST+21 |
| ENDDATE | ASKFNAME~, ASKFNAME+1, GETFILNM~, GETFILAG+8, INSTALL+2*, INSTALL+5*, INST+7, INST+8, INST+9, INST+11 , INST+13 |
| FN | GETFILNM+1~, GETFILNM+12*, GETFILAG+9*, GETFILAG+10*, GETFILAG+11 |
| FNEXT | GETFILNM+1~, GETFILNM+11*, GETFILAG+10 |
| FNROOT | GETFILNM+1~, GETFILNM+2*, GETFILNM+12, GETFILAG+9 |
| >> FNXREF | GETFILNM+3* |
| >> FNXT | GETFILNM+10*, GETFILNM+11 |
| IO | SENDFILE+25 |
| IO(0 | SENDFILE+25 |
| LOCIEN | CURASUFC~, CURASUFC+1, CURASUFC+10, CURASUFC+11, CURASUFC+12 |
| >> RC | INST+13* |
| TIME | GETFILNM+1~, GETFILAG+5*, GETFILAG+6*, GETFILAG+7 |
| TRANDT | WRITE+1~, WRITE+12*, WRITE+13, WRITE+14 |
| TRANREC | WRITE+1~, WRITE+14*, WRITE+15 |
| U | SENDFILE+12, WRITE+7, WRITE+11, WRITE+15, GETSUFAC+10, GETSUFAC+12, GETSUFAC+14, GETSUFAC+15, CURASUFC+11, CURASUFC+12 , INST+7 |
| VISITREC | WRITE+1~, WRITE+6*, WRITE+7 |
| >> XBCON | SENDFILE+8* |
| >> XBE | SENDFILE+5* |
| >> XBF | SENDFILE+4* |
| >> XBFLG | SENDFILE+18*, SENDFILE+23*, INST+19, INST+20, INST+21 |
| >> XBFLG(1 | SENDFILE+24*, INST+19, INST+20 |
| >> XBFLT | SENDFILE+6* |
| XBFN | SENDFILE~, SENDFILE+1* |
| XBGL | SENDFILE~, SENDFILE+2* |
| >> XBMED | SENDFILE+7* |
| >> XBQ | SENDFILE+11* |
| >> XBQSHO | SENDFILE+3* |
| >> XBS1 | SENDFILE+9*, SENDFILE+10* |
| >> XBUF | SENDFILE+12*, SENDFILE+13, SENDFILE+22 |
| >> Y | GETFILAG+4*, GETFILAG+5 |
| YR | GETFILNM+1~, GETFILAG+2*, GETFILAG+3 |
| >> ZTQUEUED | SENDFILE+10 |