BARUFEX1 ; IHS/SD/TPF - MAIN EXTRACT RTN FOR UFMS (CONTINUED FROM BARUFEX) ; 10/31/2008
Source file <BARUFEX1.m>
| Package | Total | Call Graph | 
|---|---|---|
| IHS Accounts Receivable | 6 | $$REVERSAL^BARUFEX3 ($$GETBACC,$$GETDUZ2,$$GETPLOC,$$GETTPB,$$GETTRDT,ERR)^BARUFEXU $$IHS^BARUFUT SET^BARUFUT0 ($$FILLDOL,$$FILLSTR,$$GETSUFAC)^BARUFUT1 $$VALI^BARVPM | 
| VA Fileman | 2 | ^DIE $$GET1^DIQ | 
| Kernel | 1 | $$FMTE^XLFDT | 
| Third Party Billing | 1 | $$BILL^ABMUEAPI | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| SET | ;EP - | |
| CONT | ; ALL QUIT CONDITIONS HAVE BEEN MET ; LET'S UPDATE THE 'APPLY TO' FIELD IN THE SESSION LOG FILE | |
| ERR26 | ||
| LCKTR(TRDATE,SESSID) | ;EP; LOCK A/R SESSION FILE | |
| OK(A,B) | ;CHECK A/R TRANSACTION AND SESSION FILES FOR TRANSMISSION DATES;MRS:BAR*1.8*7 IM30562 | |
| MSG(X,Y,Z) | ;WRITE ERROR MESSAGE  MRS:BAR*1.8*9 IM30945 | |
| UPTR(A,D,F,ID,Z) | ;UPDATE THE NEW FIELDS IN A/R TRANSACTION FILE      ;MRS:BAR*1.8*7 IM30562 | |
| UPSTR(A,D,Z,ID) | ;UPDATE 'APPLY TO' AND THE TRANSMITTED? FIELD IN THE SESSION LOG FILE ;MRS:BAR*1.8*7 IM30562 | |
| ERR2 | ||
| ERR1 | ||
| DATA | ;LOCAL ENTRY POINT | |
| DBCK(X) | ;DOUBLE CHECK UFMSSUFC | |
| GETDATA(TRDATE,RECORD,TOTAMT,UDUZ,SESSID) | ;EP - PULL DATA FROM ONE TRANSACTION DATE/TIME | 
| Name | Field # of Occurrence | 
|---|---|
| $$BILL^ABMUEAPI | ERR1+16 | 
| $$REVERSAL^BARUFEX3 | ERR1+63 | 
| $$GETBACC^BARUFEXU | ERR1+19 | 
| $$GETDUZ2^BARUFEXU | ERR1+3 | 
| $$GETPLOC^BARUFEXU | ERR1+21 | 
| $$GETTPB^BARUFEXU | ERR1+5 | 
| $$GETTRDT^BARUFEXU | ERR1+34, DBCK+3 | 
| ERR^BARUFEXU | ERR1, ERR2 | 
| $$IHS^BARUFUT | ERR1+7 | 
| SET^BARUFUT0 | SET+13 | 
| $$FILLDOL^BARUFUT1 | CONT+23 | 
| $$FILLSTR^BARUFUT1 | CONT+21, CONT+22, CONT+26, CONT+27, CONT+28, CONT+29, CONT+30, CONT+31, CONT+33, CONT+40 , CONT+43 | 
| $$GETSUFAC^BARUFUT1 | CONT+35 | 
| $$VALI^BARVPM | ERR1+30 | 
| ^DIE | CONT+11, UPSTR+15, UPTR+15 | 
| $$GET1^DIQ | DATA+10, DATA+12, DATA+13, DATA+14, DATA+16, DATA+17, ERR1+11, ERR1+23, ERR1+24, ERR1+25 , ERR1+27, ERR1+40, ERR1+41, ERR1+42, ERR1+46, ERR1+47, ERR1+68, CONT+4, CONT+16 | 
| $$FMTE^XLFDT | ERR1+43, ERR1+44, ERR1+45, CONT+19 | 
| Name | Line Occurrences | 
|---|---|
| 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 | 
| ^BARTR(2906 - [#90050.03] | GET1^DIQ | 
| ^BARCOL(2906 - [#90051.01] | GET1^DIQ | 
| 90051.1101 | GET1^DIQ | 
| 90057.110102 | GET1^DIQ | 
| ^AUTTLOC - [#9999999.06] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^BAR(90052.06 | DATA+5 | 
| ^BARSESS( | OK+7, OK+20, LCKTR+3 | 
| ^BARTR( | GETDATA+5, OK+6, OK+11 | 
| ^BARUFERR - [#90057.1] | MSG+1 | 
| ^BARUFEX($J | SET+2*, SET+3* | 
| ^DD("DD" | DATA+9 | 
| Name | Line Occurrences | 
|---|---|
| $$DBCK | CONT+24 | 
| $$LCKTR | GETDATA+3 | 
| $$OK | GETDATA+2 | 
| DATA | GETDATA+4 | 
| MSG | OK+18, OK+21, OK+22, ERR26+1 | 
| UPSTR | SET+4, OK+22 | 
| UPTR | SET+6, OK+21 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| A | UPSTR~, UPSTR+9, UPTR~, UPTR+9, OK~, OK+6, OK+7, OK+11, OK+20, OK+21 , OK+22 | 
| >> ADJCAT | ERR1+47* | 
| APPLYTO | DATA+3! | 
| ARASUFAC | DATA+3! | 
| ARBILL | DATA+2!, DATA+10*, DATA+11, ERR1+3, ERR1+9, ERR1+17, ERR1+64, CONT+13 | 
| >> ARBILLIN | DATA+16*, DATA+17, ERR1+3, ERR1+5, ERR1+11, ERR1+19, ERR1+21 | 
| ARCOL | DATA+3! | 
| >> ARCOLB | ERR1+24*, ERR1+40*, CONT+21 | 
| ARCOLDT | DATA+3!, ERR1+41*, ERR1+44*, CONT+30 | 
| ARCOLIN | DATA+3!, ERR1+25*, ERR1+40, ERR1+41, ERR1+42, ERR1+68 | 
| >> ARCOLITM | ERR1+23*, ERR1+68 | 
| ARCRDEB | DATA+4!, DATA+14*, DATA+15 | 
| ARCREDIT | DATA+2!, DATA+12*, ERR1+50 | 
| ARDEBIT | DATA+2!, DATA+13*, ERR1+50 | 
| B | OK~, OK+7, OK+20, OK+21 | 
| BARACCT | DATA+2!, ERR1+19*, ERR1+20, ERR1+29 | 
| BARAREA | DATA+3!, ERR1+27* | 
| >> BARFILE | SET+6 | 
| >> BARITYP | ERR1+30*, ERR1+31 | 
| >> BARNOW | SET+4 | 
| BARREAS | DATA+4! | 
| >> BARRIPAC | ERR1+63*, ERR1+71, ERR2+4 | 
| >> BILASUFA | ERR1+11*, CONT+37*, CONT+38 | 
| >> CURBLAMT | DATA+17*, DATA+20 | 
| D | UPSTR~, UPSTR+12, UPTR~, UPTR+11 | 
| >> D0 | ERR1+29* | 
| DA | CONT+5!, CONT+8*, CONT+12!, UPSTR+6!, UPSTR+9*, UPTR+8!, UPTR+9* | 
| DA(1 | CONT+7*, CONT+9, UPSTR+8*, UPSTR+14 | 
| DA(2 | CONT+6*, CONT+9, UPSTR+7*, UPSTR+14 | 
| DIC | CONT+5!, CONT+12!, UPSTR+6!, UPTR+8! | 
| DIE | CONT+5!, CONT+9*, CONT+12!, UPSTR+6!, UPSTR+14*, UPTR+8!, UPTR+14* | 
| DIR | CONT+5!, CONT+12!, UPSTR+6!, UPTR+8! | 
| DR | CONT+5!, CONT+10*, CONT+12!, UPSTR+6!, UPSTR+10*, UPSTR+11*, UPSTR+12*, UPSTR+13*, UPTR+8!, UPTR+10* , UPTR+11*, UPTR+12*, UPTR+13* | 
| DUZ | SET+4, SET+6 | 
| DUZ(2 | GETDATA+5, DATA+5, OK+6, OK+7, OK+11, OK+20, LCKTR+3 | 
| F | UPTR~, UPTR+10 | 
| >> I | LCKTR+3* | 
| ID | UPSTR~, UPSTR+13, UPTR~, UPTR+13 | 
| IENS | DATA+2!, DATA+8*, DATA+10, DATA+12, DATA+13, DATA+14, DATA+16, ERR1+23, ERR1+24, ERR1+25 , ERR1+46, ERR1+47 | 
| >> IPAC | ERR1+68*, ERR1+71, ERR2+2*, ERR2+3*, ERR2+4*, CONT+27 | 
| OK | OK+4~, OK+5* | 
| PARNTLOC | DATA+3!, ERR1+21*, ERR1+22, ERR1+27 | 
| PRELIV | DATA+4! | 
| PRELIVLM | DATA+4!, DATA+5* | 
| >> PRESUFAC | CONT+38*, CONT+40*, CONT+41 | 
| >> PSUFAC | CONT+35*, CONT+36*, CONT+38 | 
| RECORD | GETDATA~, SET+2, SET+3, SET+15* | 
| REVERSAL | DATA+4!, CONT+16*, CONT+18, CONT+19 | 
| >> RPMSADJ | CONT+28*, SET+2, SET+3 | 
| >> RPMSAMT | CONT+29*, SET+2, SET+3 | 
| S0 | OK+4~, OK+7*, OK+8, OK+10, OK+16, OK+17 | 
| SDT | OK+4~, OK+10*, OK+12, OK+18, OK+21, OK+22 | 
| SDUZ | OK+4~, OK+16*, OK+20, OK+21 | 
| SESSID | GETDATA~, GETDATA+2, GETDATA+3, ERR1+3, CONT+4, CONT+7, SET+6, SET+13, UPSTR+8, LCKTR~ , LCKTR+3, ERR26+1 | 
| SFILE | OK+4~, OK+19*, OK+20*, OK+21 | 
| SID | OK+4~, OK+17*, OK+21 | 
| >> TDNDATE | ERR1+42*, ERR1+43*, CONT+31*, SET+2 | 
| TOTAMT | GETDATA~, SET+17* | 
| >> TPBDUZ2 | ERR1+3*, ERR1+4, ERR1+7, ERR1+16, ERR1+34, DBCK+3 | 
| TPBIEN | DATA+2!, ERR1+5*, ERR1+6, ERR1+16, ERR1+34, CONT+38, DBCK+3 | 
| TPBLOC | DATA+2! | 
| TPBSTAT | DATA+2! | 
| TR0 | OK+4~, OK+6*, OK+8, OK+9, OK+13, OK+14, OK+15 | 
| TRANTYPE | DATA+3!, ERR1+46*, ERR1+51, ERR1+56 | 
| TRDATE | GETDATA~, GETDATA+2, GETDATA+3, GETDATA+5, DATA+8, DATA+9, ERR1+3, ERR1+45, CONT+4, CONT+8 , CONT+13, CONT+16, CONT+33, SET+4, SET+6, OK+18, LCKTR~, ERR26+1, DBCK+7 | 
| TRDT | OK+4~, OK+9*, OK+12, OK+18, OK+21, OK+22 | 
| TRDUZ | OK+4~, OK+14*, OK+22 | 
| TRFILE | OK+4~, OK+13* | 
| TRID | OK+4~, OK+15*, OK+22 | 
| U | DATA+5, OK+9, OK+10, OK+11, OK+13, OK+14, OK+15, OK+16, OK+17, OK+20 , MSG+1 | 
| UDUZ | GETDATA~, ERR1+3, CONT+4, CONT+6, SET+13, UPSTR+7, OK+7, OK+20, LCKTR+3 | 
| UFMSAMT | DATA+3!, ERR1+50*, ERR1+53, ERR1+58, CONT+23*, SET+2, SET+3, SET+16*, SET+17 | 
| UFMSBILL | DATA+2! | 
| >> UFMSCODT | CONT+30*, SET+2 | 
| >> UFMSCOLB | CONT+21*, SET+2, SET+3 | 
| >> UFMSIPAC | CONT+27*, SET+2, SET+3 | 
| >> UFMSSIGN | ERR1+53*, ERR1+58*, SET+2, SET+3, SET+16 | 
| UFMSSUFC | DATA+4!, ERR1+34*, ERR1+35, CONT+24*, CONT+26*, CONT+34, CONT+42, SET+2, SET+3 | 
| UFMSTRDT | DATA+2!, DATA+9*, ERR1+45*, CONT+19*, CONT+22*, SET+2, SET+3 | 
| UFMSTYPE | DATA+3!, ERR1+52*, ERR1+57*, ERR1+71, ERR2+3, SET+2, SET+3 | 
| >> UNIQUEID | CONT+33*, CONT+41*, CONT+42*, CONT+43*, SET+2, SET+3, SET+4, SET+6 | 
| X | MSG~, MSG+1, LCKTR+2~, LCKTR+3*, ERR26, ERR26+2, DBCK~, DBCK+4, DBCK+5, DBCK+6 | 
| Y | DATA+9*, MSG~, MSG+2 | 
| Z | UPSTR~, UPSTR+11, UPTR~, UPTR+12, MSG~, MSG+2, DBCK+2~, DBCK+3*, DBCK+4, DBCK+5 , DBCK+7, DBCK+8 |