BARDMAN2 ; IHS/SD/LSL - A/R Debt Collection Process (2) ;08/20/2008
Source file <BARDMAN2.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Accounts Receivable | 3 | (SINSFILE,SSELFILE,TINSFILE,TSELFILE)^BARDMAN3 (LOGSSELF,LOGSTART,LOGSTOP,LOGTSELF)^BARDMAN4 PAZ^BARRUTL |
| VA Fileman | 3 | (C,NOW)^%DTC ^DIE $$GET1^DIQ |
| IHS VA Utilities | 2 | $$JDT^XBFUNC ^XBGSAVE |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Accounts Receivable | 2 | BARDAUTO BARDMAN |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SENDFILE | ; EP
; Create self pay stops and send file to ITSC Server |
|
| GETTX(BARBL) | ; EP
|
|
| FINDSTOP | ; EP
; Loop log and create stops for bills with a changed balance in this DUZ(2) ; code of 1 - bill is adjusted to 0 - stop collection service ; code of 5 = bill is paid in full - stop collection service ; code of A = an adjustment has been made to the previous service |
|
| BILL | ;
|
|
| FINDSTRT | ; EP
; search A/R Bill file for this DUZ(2) for matches to extract to data file |
|
| INACTREC | ;
|
|
| SEND | ; EP
; Using XBGSAVE, create local files from the 4 globals and send them ; to the ITSC Server. |
|
| ACTLOG | ;
; For each active log entry do the following... |
|
| LOOP | ;
; For each valid 3P approval date do... |
| Name | Field # of Occurrence |
|---|---|
| C^%DTC | ACTLOG+10, FINDSTRT+4 |
| NOW^%DTC | SEND+3 |
| SINSFILE^BARDMAN3 | ACTLOG+30 |
| SSELFILE^BARDMAN3 | ACTLOG+27 |
| TINSFILE^BARDMAN3 | BILL+49 |
| TSELFILE^BARDMAN3 | BILL+53 |
| LOGSSELF^BARDMAN4 | SEND+13 |
| LOGSTART^BARDMAN4 | SEND+49 |
| LOGSTOP^BARDMAN4 | SEND+25 |
| LOGTSELF^BARDMAN4 | SEND+37 |
| PAZ^BARRUTL | SEND+17, SEND+29, SEND+41, SEND+53 |
| ^DIE | INACTREC+5 |
| $$GET1^DIQ | ACTLOG+21, GETTX+10, BILL+6, BILL+10, BILL+19, BILL+21, BILL+42 |
| $$JDT^XBFUNC | SEND+5 |
| ^XBGSAVE | SENDFILE+23 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^BARBL(2906 - [#90050.01] | GET1^DIQ |
| ^BARAC(2906 - [#90050.02] | GET1^DIQ |
| ^BARTR(2906 - [#90050.03] | GET1^DIQ |
| ^BARDEBT - [#90050.05] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BAR(90052.06 | BILL+24, BILL+25, BILL+26, SENDFILE+12 |
| ^BARBL( | ACTLOG+17, FINDSTRT+17, LOOP+3 |
| ^BARDEBT - [#90050.05] | ACTLOG+5, ACTLOG+6, ACTLOG+7, ACTLOG+15, ACTLOG+16, ACTLOG+26, ACTLOG+29, BILL+16 |
| ^BARDEBT("AD" | FINDSTOP+12 |
| ^BARDEBT("C" | BILL+14 |
| ^BARSSELF | SEND+7 |
| ^BARSTART | SEND+43 |
| ^BARSTOPS | SEND+19 |
| ^BARTR( | GETTX+8 |
| ^BARTSELF( | SEND+31 |
| ^TMP($J | FINDSTOP+13*, FINDSTRT+18* |
| Name | Line Occurrences |
|---|---|
| $$GETTX | ACTLOG+20 |
| ACTLOG | FINDSTOP+12 |
| BILL | LOOP+3 |
| INACTREC | ACTLOG+14 |
| LOOP | FINDSTRT+17 |
| SENDFILE | SEND+10, SEND+22, SEND+34, SEND+46 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | SEND+4 |
| >> BAR13IEN | BILL+25*, BILL+26 |
| >> BARAC | BILL+19*, BILL+20, BILL+21, BILL+24, BILL+25 |
| >> BARACT | ACTLOG+19*, ACTLOG+20* |
| >> BARACTP | BILL+21*, BILL+23, BILL+32, BILL+35 |
| >> BARAMT | BILL+7 |
| >> BARBAL | ACTLOG+17*, ACTLOG+18, ACTLOG+19, ACTLOG+23*, ACTLOG+24, ACTLOG+25*, BILL+6*, BILL+7, BILL+44, BILL+45* |
| BARBL | ACTLOG+16*, ACTLOG+17, ACTLOG+20, ACTLOG+21, GETTX~, GETTX+8, LOOP+2*, LOOP+3*, BILL+6, BILL+10 , BILL+14, BILL+19, BILL+42 |
| >> BARBLNM | ACTLOG+21*, ACTLOG+22*, BILL+43* |
| >> BARBLNMD | BILL+42*, BILL+43 |
| >> BARCAT | BILL+29*, BILL+32*, BILL+40*, BILL+41, BILL+46, BILL+50 |
| >> BARCHKDT | ACTLOG+11*, ACTLOG+14 |
| >> BARDOS | BILL+10*, BILL+11 |
| >> BARDT | FINDSTRT+12*, FINDSTRT+17*, LOOP+3, BILL+39 |
| >> BAREDOS | BILL+11 |
| >> BAREND | FINDSTRT+13*, FINDSTRT+17 |
| >> BARESTRT | BILL+26*, BILL+27 |
| >> BARICUR | BILL+28, BILL+47*, BILL+48 |
| >> BARIMAX | BILL+28, BILL+48 |
| >> BARINUM | ACTLOG+29, BILL+32, SEND+20, SEND+44 |
| >> BARIRCHD | FINDSTRT+10*, BILL+46, BILL+48* |
| >> BARJDT | SEND+5*, SEND+8, SEND+20, SEND+32, SEND+44 |
| >> BARL | FINDSTOP+7*, FINDSTOP+12*, ACTLOG+5, ACTLOG+6, ACTLOG+7, ACTLOG+15, ACTLOG+16, ACTLOG+26, ACTLOG+29, INACTREC+3 , BILL+14*, BILL+15, BILL+16 |
| >> BARLBAL | ACTLOG+15*, ACTLOG+18 |
| >> BARLDT | ACTLOG+7*, ACTLOG+14 |
| >> BARLOC | BILL+15, BILL+16* |
| BARNOGO | BILL+22!, BILL+23, BILL+27*, BILL+28* |
| BARPMT | GETTX+7~, GETTX+10*, GETTX+11 |
| >> BARQUIET | ACTLOG+4, BILL+3, SEND+12, SEND+14, SEND+17, SEND+24, SEND+26, SEND+29, SEND+36, SEND+38 , SEND+41, SEND+48, SEND+50, SEND+53 |
| >> BARSCUR | BILL+37, BILL+38, BILL+51*, BILL+52 |
| >> BARSIFN | SEND+20*, SEND+24, SEND+27 |
| >> BARSINS | FINDSTOP+9* |
| >> BARSMAX | BILL+37, BILL+38, BILL+52 |
| >> BARSNUM | ACTLOG+26, BILL+36, SEND+8, SEND+32 |
| >> BARSRCHD | FINDSTRT+11*, BILL+50, BILL+52* |
| >> BARSSELF | FINDSTOP+8* |
| >> BARSSFN | SEND+8*, SEND+12, SEND+15 |
| >> BARSTART | FINDSTRT+12 |
| >> BARSYMB | FINDSTOP+5*, ACTLOG+2*, ACTLOG+3*, ACTLOG+4, FINDSTRT+7*, BILL+1*, BILL+2*, BILL+3 |
| >> BARTCNT | FINDSTOP+6*, FINDSTOP+13, ACTLOG+28*, ACTLOG+31*, FINDSTRT+6*, FINDSTRT+18, BILL+54* |
| >> BARTIFN | SEND+44*, SEND+48, SEND+51 |
| >> BARTM | SEND+4*, SEND+8, SEND+20, SEND+32, SEND+44 |
| >> BARTR | GETTX+8*, GETTX+9, GETTX+10 |
| >> BARTSELF | FINDSTRT+8* |
| >> BARTSFN | SEND+32*, SEND+36, SEND+39 |
| >> BARTSINS | FINDSTRT+9* |
| >> BARX | ACTLOG+24*, ACTLOG+25, BILL+44*, BILL+45 |
| >> BARYRCHK | FINDSTRT+5*, BILL+39 |
| DA | INACTREC+1!, INACTREC+3* |
| DIE | INACTREC+1!, INACTREC+2* |
| DR | INACTREC+1!, INACTREC+4* |
| DT | ACTLOG+8, FINDSTRT+2, SEND+5 |
| DUZ(2 | ACTLOG+5, ACTLOG+17, GETTX+8, FINDSTRT+17, LOOP+3, BILL+15, BILL+24, BILL+25, BILL+26, SENDFILE+12 |
| IO | SENDFILE+22 |
| IO(0 | SENDFILE+22 |
| U | ACTLOG+5, ACTLOG+6, ACTLOG+7, ACTLOG+15, ACTLOG+16, ACTLOG+17, ACTLOG+26, ACTLOG+29, BILL+16, BILL+26 , SENDFILE+12 |
| >> X | ACTLOG+11, FINDSTRT+5 |
| >> X1 | ACTLOG+8*, FINDSTRT+2* |
| >> X2 | ACTLOG+9*, FINDSTRT+3* |
| >> XBCON | SENDFILE+7* |
| >> XBE | SENDFILE+4* |
| >> XBF | SENDFILE+3* |
| >> XBFLG | SEND+11, SEND+14, SEND+23, SEND+26, SEND+35, SEND+38, SEND+47, SEND+50, SENDFILE+20* |
| >> XBFLG(1 | SEND+16, SEND+28, SEND+40, SEND+52, SENDFILE+21* |
| >> XBFLT | SENDFILE+5* |
| >> XBFN | SEND+8*, SEND+20*, SEND+32*, SEND+44* |
| >> XBGL | SEND+9*, SEND+21*, SEND+33*, SEND+45* |
| >> XBMED | SENDFILE+6* |
| >> XBQ | SENDFILE+10* |
| >> XBQSHO | SENDFILE+2* |
| >> XBS1 | SENDFILE+8*, SENDFILE+9* |
| >> XBUF | SENDFILE+12*, SENDFILE+19 |
| >> ZTQUEUED | SENDFILE+9 |