BAR50P10 ; IHS/SD/LSL - NEW REPORT ERA CLAIMS ;
Source file <BAR50P10.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Accounts Receivable | 5 | ^BARDBQUE PAZ^BARRUTL $$UPC^BARUTL $$EN^BARVDF ^BARVKL0 |
| IHS VA Utilities | 3 | ENP^XBDIQ1 $$DIR^XBDIR VIEWR^XBLM |
| VA Fileman | 2 | $$GET1^DIQ ^DIR |
| Registration | 1 | (CLEAR,FULL)^VALM1 |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Accounts Receivable | 2 | BAR50P00 BAR50PCS |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DISP | ;
; Display File and Check Choices for report |
|
| STATUS | ;
; Select claim status for reports |
|
| EN | ; EP
|
|
| XIT | ;
|
|
| BROWSE | ;
; Browse report to screen ; GET DEVICE (QUEUEING ALLOWED) |
|
| ;
; Print report to device. Queuing allowed. |
||
| INIT | ;
|
|
| RPTYP | ;
; Select Report Type |
|
| ASK | ;
; Ask Browse or Print |
|
| PAD | ;
; Fixed undefined error in detail report. ; (Reported previously in IM17021.) |
|
| SETHDR | ;
; Set up Report Header lines |
| 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 |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^BARECHK - [#90056.22] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUTNINS - [#9999999.18] | SETHDR+15, SETHDR+17 |
| ^BARAC( | SETHDR+13 |
| ^BARCOL( | SETHDR+11 |
| ^BARECHK - [#90056.22] | INIT+6, SETHDR+6, SETHDR+7 |
| Name | Line Occurrences |
|---|---|
| ASK | EN+10 |
| BROWSE | EN+15 |
| DISP | EN+1 |
| INIT | EN+2 |
| PAD | SETHDR+21, SETHDR+26, SETHDR+35, SETHDR+40, SETHDR+43, SETHDR+49, SETHDR+54, SETHDR+73 |
| EN+16 | |
| RPTYP | EN+7 |
| SETHDR | EN+14 |
| STATUS | EN+4 |
| XIT | EN+13, EN+18 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> BAR("HD" | SETHDR+19*, SETHDR+23*, SETHDR+28*, SETHDR+29*, SETHDR+31*, SETHDR+32*, SETHDR+36*, SETHDR+37*, SETHDR+41*, SETHDR+44* , SETHDR+50*, SETHDR+55*, SETHDR+59*, SETHDR+71, SETHDR+74*, SETHDR+75* |
| >> BAR("LVL" | SETHDR+56*, SETHDR+76* |
| >> BAR("PRIVACY" | INIT+3* |
| BARAIEN | SETHDR+2!, SETHDR+11*, SETHDR+12, SETHDR+13 |
| >> BARBAD | STATUS+8*, STATUS+26*, STATUS+27 |
| >> BARCHK | DISP+5, SETHDR+23 |
| >> BARCHK( | INIT+6* |
| >> BARCHK(0 | SETHDR+9, SETHDR+10, SETHDR+11, SETHDR+27, SETHDR+28, SETHDR+29, SETHDR+31, SETHDR+36 |
| >> BARCHK(2 | SETHDR+39, SETHDR+42, SETHDR+46, SETHDR+48, SETHDR+52*, SETHDR+53 |
| >> BARCKIEN | INIT+6, SETHDR+6, SETHDR+7, SETHDR+33 |
| >> BARCTYP | SETHDR+65*, SETHDR+68, SETHDR+75 |
| >> BARDASH | INIT+4*, SETHDR+32, SETHDR+37 |
| >> BARDONE | EN+3, INIT+2*, STATUS+17*, STATUS+18* |
| BARIIEN | SETHDR+2!, SETHDR+13*, SETHDR+14, SETHDR+15, SETHDR+17 |
| BARINDX | EN+3, EN+5, EN+11, STATUS+9!, STATUS+28* |
| >> BARIOSL | BROWSE+4*, BROWSE+13 |
| >> BARLCNT | SETHDR+45*, SETHDR+47*, SETHDR+50, SETHDR+51*, SETHDR+55, SETHDR+56, SETHDR+62*, SETHDR+63, SETHDR+64*, SETHDR+71 , SETHDR+74, SETHDR+75, SETHDR+76 |
| >> BARMEDIA | EN+3, EN+6, EN+9, EN+11, EN+15, ASK+6* |
| >> BARMEDIA("NAME" | ASK+7* |
| BARPC | SETHDR+2!, SETHDR+8 |
| BARPC( | SETHDR+7*, SETHDR+58, SETHDR+59, SETHDR+63, SETHDR+65, SETHDR+66*, SETHDR+67, SETHDR+69*, SETHDR+70*, SETHDR+75 |
| BARPC(0 | SETHDR+57 |
| BARPC(1 | SETHDR+9*, SETHDR+10*, SETHDR+12*, SETHDR+14*, SETHDR+15*, SETHDR+16*, SETHDR+17* |
| BARPCIEN | SETHDR+2!, SETHDR+5*, SETHDR+6*, SETHDR+7 |
| >> BARQ("NS" | PRINT+4* |
| >> BARQ("RC" | PRINT+2* |
| >> BARQ("RP" | PRINT+3* |
| >> BARQ("RX" | PRINT+6* |
| >> BARSTAR | INIT+5* |
| >> BARTMP | SETHDR+20*, SETHDR+23, SETHDR+25*, SETHDR+28, SETHDR+29, SETHDR+33*, SETHDR+34*, SETHDR+36, SETHDR+39*, SETHDR+41 , SETHDR+42*, SETHDR+44, SETHDR+48*, SETHDR+50, SETHDR+53*, SETHDR+55, SETHDR+67*, SETHDR+69, SETHDR+70, SETHDR+72* , SETHDR+74, PAD+5, PAD+7* |
| BARTYP | EN+3, EN+6, EN+8, EN+11, RPTYP+3!, RPTYP+10* |
| BARTYP("NAME" | RPTYP+11*, SETHDR+19 |
| >> BARZ("C" | INIT+7*, INIT+8* |
| >> BARZ("E" | INIT+20*, INIT+21* |
| >> BARZ("M" | INIT+11*, INIT+12* |
| >> BARZ("N" | INIT+13*, INIT+14* |
| >> BARZ("P" | INIT+9*, INIT+10* |
| >> BARZ("R" | INIT+17*, INIT+18* |
| >> BARZ("W" | INIT+24*, INIT+25* |
| >> BARZ("X" | INIT+15*, INIT+16* |
| DA | ASK+4! |
| DIR | STATUS+9!, STATUS+13!, RPTYP+3!, RPTYP+7!, ASK+2! |
| DIR("A" | RPTYP+5* |
| DIR(0 | STATUS+11*, RPTYP+4* |
| DIRUT | EN+9, ASK+2!, ASK+5 |
| >> DTOUT | RPTYP+8 |
| >> DUOUT | RPTYP+8 |
| DUZ(2 | SETHDR+11, SETHDR+13 |
| I | INIT+6*, STATUS+24*, SETHDR+57*, SETHDR+58, SETHDR+59, SETHDR+60!, SETHDR+61*, SETHDR+63*, SETHDR+65, SETHDR+66 , SETHDR+67, SETHDR+69, SETHDR+70, SETHDR+75, PAD+4~, PAD+7* |
| IMP | DISP+2! |
| IMP( | DISP+4, DISP+5, SETHDR+20, SETHDR+31 |
| >> IMPDA | DISP+3 |
| IOF | DISP+4 |
| IOSL | BROWSE+4, BROWSE+5*, BROWSE+13* |
| J | SETHDR+60! |
| K | SETHDR+60! |
| L | PAD+4~, PAD+5*, PAD+7 |
| U | SETHDR+9, SETHDR+10, SETHDR+11, SETHDR+13, SETHDR+15, SETHDR+17, SETHDR+27, SETHDR+28, SETHDR+29, SETHDR+31 , SETHDR+36, SETHDR+39, SETHDR+42, SETHDR+46, SETHDR+48, SETHDR+52, SETHDR+53, SETHDR+59, SETHDR+65, SETHDR+66 , SETHDR+67, SETHDR+69, SETHDR+70, SETHDR+75 |
| VALM | BROWSE+10! |
| VALMAR | BROWSE+10! |
| VALMBCK | BROWSE+10! |
| VALMBG | BROWSE+10! |
| VALMCAP | BROWSE+10! |
| VALMCNT | BROWSE+10! |
| VALMCOFF | BROWSE+12! |
| VALMCON | BROWSE+11! |
| VALMDN | BROWSE+11! |
| VALMEVL | BROWSE+11! |
| VALMIOXY | BROWSE+11! |
| VALMKEY | BROWSE+10! |
| VALMLFT | BROWSE+11! |
| VALMLST | BROWSE+11! |
| VALMMENU | BROWSE+11! |
| VALMOFF | BROWSE+10! |
| VALMSGR | BROWSE+11! |
| VALMUP | BROWSE+11! |
| VALMY | BROWSE+12! |
| >> XBFLD("BROWSE" | BROWSE+3* |
| XQORNEST | BROWSE+10! |
| XQORS | BROWSE+12! |
| XQORSPEW | BROWSE+12! |
| Y | STATUS+14*, STATUS+15, STATUS+18, STATUS+21*, STATUS+24, STATUS+25, STATUS+28, RPTYP+9, RPTYP+10, ASK+2! , ASK+3*, ASK+6 |
| Y(0 | RPTYP+11, ASK+7 |
| >> Z | STATUS+20*, STATUS+21, STATUS+23*, STATUS+24 |
| >> ZTSAVE("IMPDA" | PRINT+5* |