BARUFSUP ; IHS/SD/TPF - SUPERVISORY FUNCTIONS FOR UFMS ; 04/09/2008
Source file <BARUFSUP.m>
Package | Total | Call Graph |
---|---|---|
IHS Accounts Receivable | 5 | ^BARBAN DISPLAYT^BARUFLOG ($$IHS,$$SETSESS,ASKFORRT,TRANSMIT)^BARUFUT ($$GETDAY0,$$GETDISLM,$$RANGE,$$RTCOUNT,$$STILPOST,CNTSTATS,EXCLLST,RESENDF)^BARUFUT1 $$UPC^BARUTL |
VA Fileman | 4 | ^%DT NOW^%DTC $$GET1^DIQ ^DIR |
Kernel | 3 | (,HOME)^%ZIS ^%ZISC ^%ZTLOAD |
IHS VA Utilities | 1 | EN^XBVIDEO |
Name | Comments | DBIA/ICR reference |
---|---|---|
SHOW(STATUS) | ;EP - GENERIC SESSION LISTER
|
|
AGAIN | ;EP -
|
|
LISTDIR | ;EP - LIST UFMS DIRECTORY
|
|
GETTOTS(UDUZ,SESSID) | ;EP - DISPLAY EXPORT SUMMARIES
|
|
FOOTER | ;EP -PRINT GRAND TOTS
|
|
VIEW | ;EP - VIEW UFMS SESSIONS
|
|
ALLSTAT(LIST,STATUS) | ;EP - CHANGE STATUS OF ALL SESSIONS IN ARRAY 'LIST' TO STATUS
|
|
LIST(TOTALS) | ;EP - DISPLAY CALCULATED TOTS
|
|
;
|
||
INIT | ;EP - INIT COMMON VARIABLES
|
|
EXPORTSM(LIST,PRINT) | ||
GETDTLIM() | ;GET 'UFMS DISPLAY DATE LIMIT'
|
|
ASKSTAT | ;EP - ASK STATUS TO VIEW
|
|
EXPHDR | ;EP -DISPLAY HDR
|
|
ASK | ;EP - ASK FOR ACTION
|
|
QUE | ; EP - QUE 'NOT SENT' OR 'DELAY SEND' REPORT
|
|
RESEND | ;EP - RESEND A FILE
|
|
LOOP(UDUZ,STAT,LINE,LIST,PRTSTAT) | ;EP - GET DATA FROM SESSION LEVEL
|
|
TOT(CAT,AMT,TOTALS) | ;
|
|
VIEWHDR(STATUS) | ;EP - HEADER FOR VIEWING SESSIONS
|
Name | Field # of Occurrence |
---|---|
^%DT | GETDTLIM+3 |
NOW^%DTC | PRINT+14 |
^%ZIS | EXPORTSM+12 |
HOME^%ZIS | QUE+9 |
^%ZISC | EXPORTSM+17 |
^%ZTLOAD | QUE+6 |
^BARBAN | AGAIN+1 |
DISPLAYT^BARUFLOG | ASK+29 |
$$IHS^BARUFUT | LOOP+9 |
$$SETSESS^BARUFUT | ALLSTAT+33 |
ASKFORRT^BARUFUT | ALLSTAT+14, ALLSTAT+18, ALLSTAT+24, AGAIN+9, AGAIN+12 |
TRANSMIT^BARUFUT | ALLSTAT+4 |
$$GETDAY0^BARUFUT1 | LOOP+3 |
$$GETDISLM^BARUFUT1 | AGAIN+3, LOOP+2, LOOP+25 |
$$RANGE^BARUFUT1 | ASK+38 |
$$RTCOUNT^BARUFUT1 | LOOP+23 |
$$STILPOST^BARUFUT1 | ALLSTAT+20, LOOP+20 |
CNTSTATS^BARUFUT1 | ASKSTAT+3 |
EXCLLST^BARUFUT1 | ASK+39 |
RESENDF^BARUFUT1 | RESEND+3, LISTDIR+3 |
$$UPC^BARUTL | ASK+31 |
$$GET1^DIQ | AGAIN+4, GETDTLIM+2, LOOP+15, LOOP+17, LOOP+18, LOOP+19, GETTOTS+32, GETTOTS+34, GETTOTS+35, GETTOTS+37 , GETTOTS+38, LIST+20, LIST+21, LIST+22 |
^DIR | ALLSTAT+32, ASK+19, ASKSTAT+14, EXPORTSM+8 |
EN^XBVIDEO | LOOP+25, LOOP+28 |
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 |
|
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 |
|
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 |
|
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 |
|
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 |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^BARTR(2906 - [#90050.03] | GET1^DIQ |
^BAR(90052.06,7819,0) - [#90052.06] | GET1^DIQ |
90057.11 | GET1^DIQ |
90057.210101 | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^BARSESS( | ALLSTAT+11, AGAIN+7, AGAIN+10, AGAIN+18, AGAIN+19, AGAIN+20, LOOP+13, GETTOTS+29, LIST+14, LIST+18 |
^DD("DD" | LOOP+21, PRINT+14 |
^DIC(4 - [#4] | EXPHDR+4 |
^VA(200 - [#200] | LOOP+22, LIST+3 |
Name | Line Occurrences |
---|---|
$$GETDTLIM | LOOP+7 |
AGAIN | ASK+23, ASK+32, ASK+34, ASKSTAT+15, ASKSTAT+19 |
ALLSTAT | ASK+41 |
ASK | AGAIN+15 |
ASKSTAT | AGAIN+7, AGAIN+10, AGAIN+22, ASK+22 |
EXPHDR | PRINT+15 |
EXPORTSM | ALLSTAT+3, ALLSTAT+5 |
FOOTER | PRINT+22 |
GETTOTS | PRINT+21 |
INIT | VIEW+1 |
LIST | GETTOTS+44 |
LOOP | AGAIN+19, AGAIN+20 |
EXPORTSM+2, EXPORTSM+16 | |
QUE | EXPORTSM+14 |
SHOW | VIEW+2 |
TOT | GETTOTS+39, GETTOTS+41, GETTOTS+42, GETTOTS+43 |
VIEWHDR | AGAIN+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | PRINT+14 |
>> %DT | GETDTLIM+3* |
>> %ZIS | EXPORTSM+10* |
ADJAMT | LIST+1~ |
ADJCAT | GETTOTS+38*, GETTOTS+40, LIST+1~ |
ADJCNT | LIST+1~ |
AMT | GETTOTS+2~, GETTOTS+36*, GETTOTS+39, GETTOTS+41, GETTOTS+42, GETTOTS+43, TOT~, TOT+1 |
>> ARBILL | GETTOTS+32*, GETTOTS+33 |
ARCREDIT | GETTOTS+2~, GETTOTS+30*, GETTOTS+34*, GETTOTS+36, TOT+5, TOT+7 |
ARDEBIT | GETTOTS+2~, GETTOTS+30*, GETTOTS+35*, GETTOTS+36, TOT+6 |
BARTMP | LOOP+1~, LOOP+7*, LOOP+9 |
BARTR | GETTOTS+2~, GETTOTS+28*, GETTOTS+29*, GETTOTS+31 |
>> CASHIER | LOOP+22*, LOOP+27 |
CAT | GETTOTS+2~, GETTOTS+39*, GETTOTS+40*, GETTOTS+41*, GETTOTS+42*, GETTOTS+43*, TOT~, TOT+1, TOT+2, TOT+3 , TOT+4 |
CATEGORY | LIST+1~ |
>> CHOICE | ASK+24*, ASK+25, ASK+26, ASK+27, ASK+28, ASK+31*, ASK+32, ASK+34, ASK+35, ASK+37 , ASK+40*, ASK+41 |
CNT | LOOP+1~, LOOP+13*, LIST+16~, LIST+18*, LIST+23 |
CNTS | ASKSTAT+1~ |
CURSTAT | LOOP+1~, LOOP+17*, LOOP+25, LOOP+30 |
>> DASH | VIEWHDR+4, INIT+1*, ASK+1 |
>> DASHES | PRINT+3*, FOOTER+1 |
DAYDISP | LOOP+1~, LOOP+2*, LOOP+5 |
DAYZERO | LOOP+1~, LOOP+3*, LOOP+5 |
DIR | ALLSTAT+28!, ASK+3!, ASKSTAT+4!, EXPORTSM+3! |
DIR("?" | ASK+5*, ASK+9*, ASK+14*, ASK+16* |
DIR("A" | ALLSTAT+31*, ASK+13*, ASK+17*, ASKSTAT+5*, EXPORTSM+6* |
DIR("B" | ALLSTAT+30*, EXPORTSM+7* |
DIR(0 | ALLSTAT+29*, ASK+15*, ASKSTAT+6*, ASKSTAT+7*, ASKSTAT+8*, ASKSTAT+9*, ASKSTAT+10*, ASKSTAT+11*, ASKSTAT+12*, EXPORTSM+5* |
>> DIROUT | EXPORTSM+9 |
>> DIRUT | ASKSTAT+16 |
DISLIM | GETDTLIM+1~, GETDTLIM+2*, GETDTLIM+3*, GETDTLIM+4 |
>> DTOUT | ALLSTAT+25, ASK+20, ASKSTAT+16, EXPORTSM+9 |
>> DUOUT | ALLSTAT+25, ASK+20, EXPORTSM+9 |
DUZ(2 | ALLSTAT+11, AGAIN+4, AGAIN+7, AGAIN+10, AGAIN+18, AGAIN+19, AGAIN+20, GETDTLIM+2, LOOP+9, LOOP+13 , GETTOTS+29, LIST+14, LIST+18, EXPHDR+4 |
EQUALS | PRINT+1~, PRINT+2*, EXPHDR+2, EXPHDR+5 |
ERASTAT | ALLSTAT+1~, ALLSTAT+10*, ALLSTAT+15, ASK+28*, ASK+29, LOOP+1~, LOOP+19*, LOOP+24, LOOP+30 |
>> ESC | GETTOTS+29 |
EXPDATE | PRINT+1~, PRINT+14*, EXPHDR+3 |
GTOTALS | PRINT+5~ |
GTOTALS("CREDITS" | PRINT+8*, PRINT+9*, GETTOTS+47*, GETTOTS+48*, FOOTER+5, FOOTER+6 |
GTOTALS("DEBITS" | PRINT+10*, PRINT+11*, GETTOTS+49*, GETTOTS+50*, FOOTER+7, FOOTER+8 |
GTOTALS("PAYMENT" | PRINT+6*, PRINT+7*, GETTOTS+45*, GETTOTS+46*, FOOTER+3, FOOTER+4 |
GTOTALS("REFUND" | PRINT+12*, PRINT+13*, GETTOTS+51*, GETTOTS+52*, FOOTER+9, FOOTER+10 |
IENS | LOOP+14*, LOOP+15, LOOP+17, LOOP+18, LOOP+19, GETTOTS+2~, GETTOTS+31*, GETTOTS+32, GETTOTS+34, GETTOTS+35 , GETTOTS+37, GETTOTS+38, LIST+16~, LIST+19*, LIST+20, LIST+21, LIST+22 |
IO | EXPORTSM+15 |
IO("Q" | EXPORTSM+14 |
IOF | EXPHDR+1 |
LINE | AGAIN+16*, AGAIN+19, AGAIN+20*, AGAIN+22, LOOP~, LOOP+16*, LOOP+24, LOOP+26 |
LIST | ALLSTAT~, ALLSTAT+3, ALLSTAT+4, ALLSTAT+5, AGAIN+14!, AGAIN+19, AGAIN+20, ASK+39, ASK+41, LOOP~ , EXPORTSM~, EXPORTSM+1, QUE+4~, PRINT+16~ |
LIST( | ALLSTAT+7, ALLSTAT+8, ALLSTAT+9, ALLSTAT+10, ASK+25, ASK+26, ASK+27, ASK+28, LOOP+24*, QUE+5 , PRINT+18, PRINT+19, PRINT+20 |
LIST(1 | QUE+4*, PRINT+16* |
NOSEND | RESEND+1~, RESEND+2*, RESEND+3, LISTDIR+1~, LISTDIR+2*, LISTDIR+3 |
>> OPTIONST | ASK+4*, ASK+7*, ASK+8*, ASK+13 |
PAGE | PRINT+1~, PRINT+4*, EXPHDR+3, EXPHDR+10* |
>> POP | EXPORTSM+13 |
POSTING | ALLSTAT+1~, ALLSTAT+20*, ALLSTAT+21, ALLSTAT+23, ALLSTAT+25, ALLSTAT+27, LOOP+20*, LOOP+30 |
EXPORTSM~, EXPORTSM+2 | |
PRTSTAT | LOOP~, LOOP+30 |
>> RANGE | ASK+37*, ASK+38*, ASK+39 |
RC | ALLSTAT+1~, ALLSTAT+33* |
REC | ALLSTAT+6*, ALLSTAT+7*, ALLSTAT+8, ALLSTAT+9, ALLSTAT+10, QUE+5*, PRINT+1~, PRINT+17*, PRINT+18*, PRINT+19 , PRINT+20 |
RTCOUNT | LOOP+1~, LOOP+23*, LOOP+29 |
SESSID | ALLSTAT+1~, ALLSTAT+9*, ALLSTAT+11, ALLSTAT+12, ALLSTAT+16, ALLSTAT+22, ALLSTAT+26, ALLSTAT+33, ASK+27*, ASK+29 , LOOP+1~, LOOP+5*, LOOP+9*, LOOP+11*, LOOP+13*, LOOP+14, LOOP+23, LOOP+24, LOOP+25, LOOP+27 , PRINT+1~, PRINT+20*, PRINT+21, GETTOTS~, GETTOTS+29, LIST+2, LIST+14, LIST+18, LIST+19 |
STAT | LOOP~, LOOP+13, LOOP+23, LOOP+29, LOOP+30 |
STATCNTS | ASKSTAT+2!, ASKSTAT+3, ASKSTAT+13! |
STATCNTS("ALL | STATUSES" , ASKSTAT+11 |
STATCNTS("OPEN" | ASKSTAT+6 |
STATCNTS("RECONCILED" | ASKSTAT+7 |
STATCNTS("RETRANSMITTED" | ASKSTAT+10 |
STATCNTS("REVIEWED/APPROVED" | ASKSTAT+8 |
STATCNTS("TRANSMITTED" | ASKSTAT+9 |
>> STATDATE | LOOP+18*, LOOP+21*, LOOP+27 |
STATUS | VIEWHDR~, VIEWHDR+2, VIEWHDR+3, ALLSTAT~, ALLSTAT+2, ALLSTAT+4, ALLSTAT+11, ALLSTAT+15, ALLSTAT+21, ALLSTAT+25 , ALLSTAT+33, SHOW~, AGAIN+2*, AGAIN+5, AGAIN+6, AGAIN+7, AGAIN+8, AGAIN+10, AGAIN+15, AGAIN+19 , AGAIN+20, AGAIN+23, ASK+6, ASK+7, ASK+8, ASK+10, ASK+11, ASK+12, ASK+32, ASK+34 , ASKSTAT+17*, ASKSTAT+18* |
>> TMP | QUE+4*, PRINT+16* |
>> TOTALCNT | GETTOTS+26*, TOT+3* |
TOTALS | PRINT+5~, GETTOTS+39, GETTOTS+41, GETTOTS+42, GETTOTS+43, GETTOTS+44, TOT~, LIST~ |
TOTALS( | TOT+1*, TOT+2*, TOT+3 |
TOTALS("AAA P | AYMENT" , GETTOTS+4*, GETTOTS+5*, GETTOTS+45, GETTOTS+46, LIST+4, LIST+5 |
TOTALS("ADJ C | O-PAY" , GETTOTS+6*, GETTOTS+7* |
TOTALS("ADJ D | EDUCTIBLE" , GETTOTS+8*, GETTOTS+9* |
TOTALS("ADJ G | ROUPER ALLOWANCE" , GETTOTS+16*, GETTOTS+17* |
TOTALS("ADJ N | ON PAYMENT" , GETTOTS+10*, GETTOTS+11* |
TOTALS("ADJ P | AYMENT CREDIT" , GETTOTS+18*, GETTOTS+19*, ENALTY" , GETTOTS+14*, GETTOTS+15* |
TOTALS("ADJ W | RITE OFF" , GETTOTS+12*, GETTOTS+13* |
TOTALS("CREDITS" | GETTOTS+22*, GETTOTS+23*, GETTOTS+47, GETTOTS+48, TOT+5*, TOT+7*, LIST+6, LIST+7 |
TOTALS("DEBITS" | GETTOTS+24*, GETTOTS+25*, GETTOTS+49, GETTOTS+50, TOT+6*, TOT+8*, LIST+8, LIST+9 |
TOTALS("ZZZ R | EFUND" , GETTOTS+20*, GETTOTS+21*, GETTOTS+51, GETTOTS+52, LIST+10, LIST+11 |
TRANBY | LIST+16~, LIST+22*, LIST+24 |
TRANFILE | LIST+16~, LIST+21*, LIST+25 |
TRANREC | LIST+16~, LIST+17*, LIST+18*, LIST+19 |
TRANTIME | LIST+16~, LIST+20*, LIST+24 |
TRANTYPE | GETTOTS+2~, GETTOTS+37*, GETTOTS+39 |
>> TSTATUS | AGAIN+17*, AGAIN+18*, AGAIN+19 |
U | ALLSTAT+8, ALLSTAT+9, ALLSTAT+10, ALLSTAT+23, ALLSTAT+27, ASK+21, ASK+26, ASK+27, ASK+28, LOOP+22 , LOOP+24, PRINT+19, PRINT+20, LIST+3, EXPHDR+4 |
UDUZ | ALLSTAT+1~, ALLSTAT+4*, ALLSTAT+8*, ALLSTAT+11, ALLSTAT+20, ALLSTAT+33, AGAIN+13*, AGAIN+19*, AGAIN+20*, ASK+26* , ASK+29, LOOP~, LOOP+13, LOOP+14, LOOP+20, LOOP+22, LOOP+23, LOOP+24, PRINT+1~, PRINT+19* , PRINT+21, GETTOTS~, GETTOTS+29, LIST+3, LIST+14, LIST+18, LIST+19 |
>> VALIDCHK | ASK+4*, ASK+10*, ASK+11*, ASK+12*, ASK+36 |
>> X | GETDTLIM+3* |
>> Y | ALLSTAT+25, ASK+21, ASK+22, ASK+23, ASK+24, ASK+31, ASKSTAT+15, ASKSTAT+16, GETDTLIM+3, LOOP+21* , EXPORTSM+9, PRINT+14* |
>> Y(0 | ASKSTAT+17, ASKSTAT+18 |
>> ZTDESC | QUE+3* |
>> ZTRTN | QUE+2* |
>> ZTSAVE("LIST(" | QUE+5* |
>> ZTSK | QUE+7, QUE+8 |