BARRSEL ; IHS/SD/LSL - Selective Report Parameters ;
Source file <BARRSEL.m>
Package | Total | Call Graph |
---|---|---|
IHS Accounts Receivable | 4 | OBAL^BARRCXL (CLIN,DISP,VTYP)^BARRSEL1 $$EN^BARVDF ^BARVKL0 |
DRG Grouper | 1 | ^ICDEX |
IHS VA Utilities | 1 | ^XBFMK |
VA Fileman | 1 | ^DIR |
Name | Comments | DBIA/ICR reference |
---|---|---|
DISP | ;
; Display current inclusion parameters ; IHS/SD/PKD 1.8*20 SAC size limitations: move code |
|
CXL | ||
MSG1 | ;
; Message if Site Parameter "Location type for Reports" is BILLING |
|
TDN | ||
MSG2 | ;
; Message if Site Parameter "Location type for Reports" is VISIT |
|
ASKSORT | ; EP
|
|
ASKAGAIN | ;EP
|
|
PARM | ;
; Choose additional inclusion parameters |
|
SORT | ; EP
; Sort criteria ; BAR*1.8*19 IHS/SD/PKD 6/9/10 |
|
CLIN | ; EP
; Select clinics to sort by ; IHS/SD/PKD 1.8*20 Move Code SAC size |
|
ASKAGAI1 | ;KEEP CURRENT BARY SELECTION
|
|
PAY | ||
MSG | ; EP
|
|
TDNCHK | ;
|
|
VTYP | ; EP
; Select Vitst Types to sort by ; IHS/SD/PKD 1.8*20 SAC Size limits move code |
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 |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^XUTL("XQ" | ASKAGAI1+5 |
Name | Line Occurrences |
---|---|
@( | PARM+54, CXL+4, PAY+5, TDN+4, TDN+13, TDN+24, TDN+35, TDN+44, TDN+51, TDN+59 , TDN+68 |
ASKAGAI1 | ASKAGAI1+58, ASKAGAI1+71 |
ASKAGAIN | ASKAGAI1+61, TDNCHK+1, TDNCHK+7 |
ASKSORT | TDNCHK+15 |
CLIN | SORT+14 |
DISP | ASKAGAI1+45 |
MSG | ASKAGAI1+41 |
MSG1 | MSG+3 |
MSG2 | MSG+4 |
PARM | ASKAGAI1+46 |
SORT | TDNCHK+16, TDNCHK+17 |
VTYP | SORT+15 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> BAR("LOC" | MSG+3 |
>> BAR("OPT" | ASKAGAI1+6*, ASKAGAI1+7*, ASKAGAI1+8*, ASKAGAI1+9*, ASKAGAI1+10*, ASKAGAI1+11*, ASKAGAI1+12*, ASKAGAI1+13*, ASKAGAI1+14*, ASKAGAI1+17* , ASKAGAI1+20*, ASKAGAI1+21*, ASKAGAI1+22, ASKAGAI1+26*, ASKAGAI1+33*, ASKAGAI1+36*, ASKAGAI1+38, ASKAGAI1+58, ASKAGAI1+59, ASKAGAI1+61 , ASKAGAI1+71, TDNCHK+1, TDNCHK+7, TDNCHK+12, TDNCHK+14, MSG+1, PARM+5, PARM+6, PARM+7, PARM+10 , PARM+11, PARM+12, PARM+13, PARM+15, PARM+20, PARM+23, PARM+25, PARM+27, PARM+41, CXL , PAY, TDN, TDN+7, TDN+15, TDN+26, TDN+37, TDN+41, TDN+42, TDN+46, TDN+54 , SORT+3 |
>> BAR("RTYP" | ASKAGAI1+22* |
>> BARASK | ASKAGAI1+4*, TDNCHK+16, ASKSORT+7* |
>> BARDONE | ASKAGAI1+4*, ASKAGAI1+43, ASKAGAI1+48, PARM+35*, SORT+12* |
>> BARDONE2 | ASKAGAI1+43, PARM+2*, PARM+36* |
>> BARDONE3 | PARM+2* |
>> BARMENU | ASKAGAI1+5*, ASKAGAI1+7, ASKAGAI1+8, ASKAGAI1+9, ASKAGAI1+10, ASKAGAI1+11, ASKAGAI1+12, ASKAGAI1+13, ASKAGAI1+14, ASKAGAI1+16 , ASKAGAI1+20, ASKAGAI1+21, ASKAGAI1+25, ASKAGAI1+32, ASKAGAI1+35 |
>> BARMSGPT | MSG+1 |
>> BARP("RTN" | ASKAGAIN+4 |
>> BARSEL | PARM+37*, PARM+42, PARM+43, PARM+44, PARM+45, PARM+46, PARM+47, PARM+48, PARM+49, PARM+50 , PARM+51, PARM+52, CXL+1, CXL+2, PAY+1, PAY+2, PAY+3, PAY+4, TDN+1, TDN+2 , TDN+3, TDN+9, TDN+10, TDN+11, TDN+17, TDN+18, TDN+19, TDN+20, TDN+21, TDN+22 , TDN+28, TDN+29, TDN+30, TDN+31, TDN+32, TDN+33, TDN+39, TDN+40, TDN+41, TDN+42 , TDN+48, TDN+49, TDN+56, TDN+57, TDN+63, TDN+64, TDN+65, TDN+66 |
>> BARSRT | TDN+2*, TDN+3* |
BARTAG | PARM+38!, PARM+42*, PARM+43*, PARM+44*, PARM+45*, PARM+46*, PARM+47*, PARM+48*, PARM+49*, PARM+50* , PARM+51*, PARM+52*, PARM+53*, PARM+54, CXL+1*, CXL+2*, CXL+3*, CXL+4, PAY+1*, PAY+2* , PAY+3*, PAY+4*, PAY+5, TDN+1*, TDN+2*, TDN+3*, TDN+4, TDN+8*, TDN+9*, TDN+10* , TDN+11*, TDN+12*, TDN+13, TDN+16*, TDN+17*, TDN+18*, TDN+19*, TDN+20*, TDN+21*, TDN+22* , TDN+23*, TDN+24, TDN+27*, TDN+28*, TDN+29*, TDN+30*, TDN+31*, TDN+32*, TDN+33*, TDN+34* , TDN+35, TDN+38*, TDN+39*, TDN+40*, TDN+41*, TDN+42*, TDN+43*, TDN+44, TDN+47*, TDN+48* , TDN+49*, TDN+50*, TDN+51, TDN+55*, TDN+56*, TDN+57*, TDN+58*, TDN+59, TDN+62*, TDN+63* , TDN+64*, TDN+65*, TDN+66*, TDN+67*, TDN+68 |
BARY | ASKAGAIN+1! |
BARY("DATA SR | C" , ASKAGAI1+30* |
BARY("DT" | ASKAGAI1+58, ASKAGAI1+61, ASKAGAI1+71, TDNCHK+1 |
BARY("DX-ICDVER" | ASKAGAIN+5*, ASKAGAIN+6* |
BARY("DX10" | ASKAGAIN+6* |
BARY("DX9" | ASKAGAIN+5*, ASKAGAIN+6* |
BARY("LBL" | ASKAGAI1+34* |
BARY("OBAL" | ASKAGAI1+18 |
BARY("RTYP" | ASKAGAI1+19*, ASKAGAI1+27*, ASKAGAI1+28*, ASKAGAI1+39*, ASKAGAI1+40* |
BARY("SBL" | ASKAGAI1+37* |
BARY("SORT" | TDNCHK+12*, SORT+13*, SORT+14 |
BARY("TDN" | TDNCHK+1 |
BARY("TRANS T | YPE" , ASKAGAI1+29*, TDNCHK+7 |
BARY("X" | ASKAGAI1+3* |
DIC | ASKAGAI1+1! |
DIR | ASKAGAI1+1!, PARM+3!, PARM+32!, ASKSORT+2!, ASKSORT+8!, SORT+5!, SORT+11! |
DIR("?" | PARM+30*, SORT+9* |
DIR("A" | PARM+29*, ASKSORT+4*, SORT+7* |
DIR("B" | ASKSORT+5*, SORT+8* |
DIR(0 | PARM+4*, PARM+5*, PARM+6*, PARM+7*, PARM+10*, PARM+11*, PARM+12*, PARM+13*, PARM+17*, PARM+20* , PARM+24*, PARM+25*, PARM+27*, ASKSORT+3*, SORT+6* |
>> DIROUT | SORT+12 |
>> DIRUT | ASKAGAI1+43, ASKAGAI1+44, PARM+33, PARM+36, SORT+12 |
>> DTOUT | PARM+36 |
>> DUOUT | ASKAGAI1+47, PARM+36 |
U | ASKAGAI1+5, CXL+1, PAY+1 |
X | MSG+1~* |
>> XQY0 | ASKAGAI1+5 |
>> Y | PARM+35, PARM+37, ASKSORT+7, SORT+13 |
Name | Field # of Occurrence |
---|---|
$T( | ASKAGAIN+5, ASKAGAIN+6 |