BAREDP05 ; IHS/SD/LSL - REVIEW CLAIM STATUS ;
Source file <BAREDP05.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Accounts Receivable | 8 | NEGBAL^BAR50EB NONPAYCH^BAR50EP1 ^BARBLLK ($$MDT,MSG)^BARDUTL (CLMFLG,DELREAS)^BAREDP04 $$EN^BAREDP0Z PAZ^BARRUTL $$IHSNEGB^BARUFUT |
| Registration | 5 | EN^VALM TERM^VALM0 CLEAR^VALM1 SET^VALM10 EN^VALM2 |
| VA Fileman | 3 | ^DIE $$GET1^DIQ ^DIR |
| Kernel | 2 | ($$CJ,$$REPEAT)^XLFSTR DISP^XQORM1 |
| IHS VA Utilities | 1 | ($$DIC,ENP)^XBDIQ1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RESET | ; EP
; rebuilds array after action |
|
| CLAIM | ;
|
|
| EN | ; EP
|
|
| HDR | ; EP
; header code |
|
| GATHER(IMPDA) | ;
; SUBRTN to set data into array |
|
| PAD(D,L) | ;
; -- SUBRTN to pad length of data ; -- D=data L=length |
|
| SP(N) | ; -- SUBRTN to pad N number of spaces
|
|
| REPROCES(IMPDA) | ;EP - RE-PROCESS ERA FILE
|
|
| VIEW | ;EP
|
|
| EXPND | ; EP
; expand code |
|
| BROWSE | ; Called from Listman screen BAR ERA Claim Review
|
|
| INIT | ; EP
; init variables and list array |
|
| EXIT | ; EP
; exit code |
|
| GETRECRD(XCLM) | ;
|
|
| GETITEM | ; -- select item from list
|
|
| AUTOREV | ;EP - AUTO REVIEW ;BAR*1.8*6 SCR120 ADD LIST MANAGER PROMPT FOR AUTO-REVIEW
|
|
| HELP | ; EP
; help code |
| Name | Field # of Occurrence |
|---|---|
| NEGBAL^BAR50EB | AUTOREV+12 |
| NONPAYCH^BAR50EP1 | AUTOREV+14 |
| ^BARBLLK | GETRECRD+44 |
| $$MDT^BARDUTL | GATHER+25 |
| MSG^BARDUTL | HELP+4 |
| CLMFLG^BAREDP04 | AUTOREV+9 |
| DELREAS^BAREDP04 | GETRECRD+59 |
| $$EN^BAREDP0Z | AUTOREV+10 |
| PAZ^BARRUTL | GATHER+65, VIEW+12 |
| $$IHSNEGB^BARUFUT | AUTOREV+14 |
| ^DIE | GETRECRD+42, GETRECRD+52, GETRECRD+58, GETRECRD+66 |
| $$GET1^DIQ | CLAIM+11, CLAIM+17, CLAIM+18, VIEW+11 |
| ^DIR | GETRECRD+20, GETRECRD+26, GETRECRD+35 |
| EN^VALM | EN+4 |
| TERM^VALM0 | RESET+2 |
| CLEAR^VALM1 | BAREDP05+11, EXIT+2, AUTOREV+2, VIEW+5 |
| SET^VALM10 | GATHER+38, GATHER+44, GATHER+49, GATHER+54, GATHER+58 |
| EN^VALM2 | GETITEM+3, VIEW+3 |
| $$DIC^XBDIQ1 | GETRECRD+38, GETRECRD+48, GETRECRD+54, GETRECRD+62 |
| ENP^XBDIQ1 | CLAIM+2, CLAIM+7, GETRECRD+9 |
| $$CJ^XLFSTR | GATHER+43, GATHER+48 |
| $$REPEAT^XLFSTR | PAD+3 |
| DISP^XQORM1 | HELP+3 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| 90056.0205 | GET1^DIQ |
| 90056.0205401 | GET1^DIQ |
| ^BARERR - [#90056.21] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BARECHK - [#90056.22] | HDR+8 |
| ^BAREDI("1T" - [#90056.01] | HDR+3 |
| ^BAREDI("I" | HDR+2, HDR+7, GATHER+14, GATHER+15, CLAIM+15, AUTOREV+5 |
| ^TMP($J | EN+3!, EXIT+3!, GATHER+2!, GATHER+3!, GATHER+18, GATHER+21, GATHER+22, GATHER+32, GATHER+33, GATHER+42 , GATHER+47, GATHER+48, GATHER+62, CLAIM+3, CLAIM+6!, CLAIM+9*, CLAIM+11*, CLAIM+18*, GETITEM+2, GETITEM+8 , VIEW+2, VIEW+9 |
| ^XTMP("BAR-LIST" | AUTOREV+4!, AUTOREV+5*, AUTOREV+7, AUTOREV+9 |
| Name | Line Occurrences |
|---|---|
| $$PAD | HDR+4, HDR+9, GATHER+28, GATHER+29, GATHER+34, GATHER+35, GATHER+37, GATHER+53, SP+1 |
| CLAIM | GATHER+14, GATHER+15 |
| GATHER | INIT+2, GETITEM+10, AUTOREV+15 |
| GETITEM | BROWSE+2 |
| GETRECRD | GETITEM+9 |
| HDR | RESET+4 |
| INIT | RESET+4 |
| REPROCES | GETRECRD+60 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AFLD | GATHER+30! |
| AFLD( | GATHER+33*, GATHER+34, GATHER+35 |
| >> AFN | GATHER+31*, GATHER+32*, GATHER+33 |
| >> ALIST | GATHER+9*, GATHER+10, CLAIM+7 |
| >> ARECORD | GATHER+31*, GATHER+34*, GATHER+35*, GATHER+52, GATHER+53*, GATHER+54 |
| >> BARBL | AUTOREV+6*, AUTOREV+7*, AUTOREV+9 |
| >> BARBLDA | GETRECRD+46 |
| >> BARCHK | HDR+8, GATHER+14 |
| >> BARCKIEN | HDR+8 |
| >> BARFLG | AUTOREV+10* |
| >> BLANKLNE | GATHER+57*, GATHER+58 |
| >> CHDR | HDR+8*, HDR+9 |
| CLAIM | BROWSE+1! |
| CLAIM( | GETRECRD+10, GETRECRD+11, GETRECRD+12, GETRECRD+14, GETRECRD+15, GETRECRD+16, GETRECRD+17, GETRECRD+22, GETRECRD+25, GETRECRD+47 , GETRECRD+61 |
| >> CLMCNT | AUTOREV+6* |
| CLMDA | GATHER+13*, GATHER+14*, GATHER+15*, CLAIM+8, CLAIM+9, CLAIM+15, CLAIM+16, AUTOREV+1~, AUTOREV+3*, AUTOREV+5* , AUTOREV+8*, AUTOREV+9* |
| >> COUNT | GATHER+6*, GATHER+37, GATHER+38, GATHER+44, GATHER+49, GATHER+54, GATHER+58, GATHER+60* |
| D | PAD~, PAD+3 |
| >> DA | GETRECRD+40*, GETRECRD+50*, GETRECRD+56*, GETRECRD+64* |
| >> DA(1 | GETRECRD+39*, GETRECRD+49*, GETRECRD+55*, GETRECRD+63* |
| >> DIE | GETRECRD+38*, GETRECRD+48*, GETRECRD+54*, GETRECRD+62* |
| DIR | GETRECRD+18!, GETRECRD+21!, GETRECRD+23!, GETRECRD+27!, GETRECRD+31!, GETRECRD+36! |
| DIR("A" | GETRECRD+25*, GETRECRD+33* |
| DIR("B" | GETRECRD+34* |
| DIR(0 | GETRECRD+19*, GETRECRD+24*, GETRECRD+32* |
| >> DIROUT | GETRECRD+29 |
| >> DIRUT | GETRECRD+29 |
| >> DR | GETRECRD+41*, GETRECRD+51*, GETRECRD+57*, GETRECRD+65* |
| >> DTOUT | GETRECRD+29 |
| >> DUOUT | GETRECRD+29 |
| DUZ(2 | HDR+2, HDR+7, GATHER+14, GATHER+15, CLAIM+15, AUTOREV+4, AUTOREV+5, AUTOREV+7, AUTOREV+9, AUTOREV+14 |
| ECLM | GATHER+4! |
| EFLD | GATHER+19! |
| EFLD( | GATHER+22*, GATHER+24*, GATHER+25*, GATHER+26*, GATHER+28, GATHER+29 |
| >> EFN | GATHER+20*, GATHER+21*, GATHER+22 |
| >> ELIST | GATHER+8*, GATHER+10, CLAIM+2, GETRECRD+9 |
| >> ERECORD | GATHER+20*, GATHER+28*, GATHER+29*, GATHER+37*, GATHER+38 |
| >> ERRORS | AUTOREV+9 |
| ERRS | AUTOREV+9! |
| >> FHDR | HDR+2*, HDR+4, HDR+7*, HDR+9 |
| >> IENS | CLAIM+8*, CLAIM+11, VIEW+10*, VIEW+11 |
| IMPDA | HDR+2, HDR+7, INIT+2, GATHER~, GATHER+14, GATHER+15, CLAIM+8, CLAIM+15, CLAIM+16, GETITEM+10 , GETRECRD+39, GETRECRD+49, GETRECRD+55, GETRECRD+59, GETRECRD+60, GETRECRD+63, REPROCES~, AUTOREV+5, AUTOREV+10, AUTOREV+12 , AUTOREV+14, AUTOREV+15, VIEW+10 |
| IOM | GATHER+43, GATHER+48 |
| L | PAD~, PAD+3 |
| >> LINE | GATHER+6*, GATHER+61*, CLAIM+3, CLAIM+6, CLAIM+9, CLAIM+11, CLAIM+18, CLAIM+19* |
| >> LN | INIT+3, GATHER+6*, GATHER+38, GATHER+39*, GATHER+44, GATHER+45*, GATHER+49, GATHER+50*, GATHER+54, GATHER+55* , GATHER+58, GATHER+59* |
| N | SP~, SP+1 |
| >> NEWSTAT | GETRECRD+15*, GETRECRD+16*, GETRECRD+17, GETRECRD+30*, GETRECRD+43, GETRECRD+47*, GETRECRD+61 |
| REASCODE | CLAIM+13~, CLAIM+17*, CLAIM+18 |
| REASDA | GATHER+46*, GATHER+47*, GATHER+48, CLAIM+13~, CLAIM+14*, CLAIM+15*, CLAIM+16, CLAIM+18 |
| REASIENS | CLAIM+13~, CLAIM+16*, CLAIM+17, CLAIM+18 |
| >> RECNM | GATHER+5* |
| >> RHEADER | GATHER+43*, GATHER+44 |
| >> RN | GATHER+17*, GATHER+18*, GATHER+21, GATHER+22, GATHER+32, GATHER+33, GATHER+42, GATHER+47, GATHER+48 |
| RPT | CLAIM+1!, CLAIM+4*, CLAIM+5*, CLAIM+6 |
| RRECORD | GATHER+4!, GATHER+48*, GATHER+49 |
| >> STATUS | CLAIM+3*, CLAIM+4 |
| >> THDR | HDR+3*, HDR+4, HDR+6*, HDR+9 |
| >> TRDA | HDR+3 |
| >> TRNAME | HDR+5, HDR+6, GATHER+14, GATHER+15 |
| U | HDR+7, HDR+8, GATHER+48, CLAIM+18, AUTOREV+5 |
| >> VALMBCK | RESET+3* |
| >> VALMCNT | INIT+3* |
| >> VALMHDR(1 | HDR+4*, HDR+9* |
| >> VALMLST | GETITEM+1*, GETITEM+2*, VIEW+1*, VIEW+2* |
| >> VALMQUIT | GATHER+63* |
| >> VALMY | GETITEM+4, VIEW+4 |
| >> VALMY( | GETITEM+7, VIEW+8 |
| >> WHOLELST | GATHER+10* |
| >> X | HELP+2* |
| XCLM | GETITEM+8*, GETITEM+9, GETRECRD~, GETRECRD+40, GETRECRD+50, GETRECRD+56, GETRECRD+59, GETRECRD+64, VIEW+9*, VIEW+10 |
| XCLMDA | GETITEM+5~, GETITEM+6*, GETITEM+7*, GETITEM+8, GETRECRD+13, VIEW+6~, VIEW+7*, VIEW+8*, VIEW+9 |
| >> XQORNOD(0 | GETITEM+3, VIEW+3 |
| >> Y | GETRECRD+28, GETRECRD+30, GETRECRD+37 |