BQIGPRA5 ;VNGT/HS/ALA-GPRA Aggregate Call ; 24 Oct 2005 1:11 PM
Source file <BQIGPRA5.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| COML(DATA,FAKE) | ;EP - BQI GET GPRA COMM LIST | |
| ERR | ; | |
| COMP | ;EP - Compile the CRS Aggregate for entire database | |
| DDEF(GDATA,GNUM,GDEN,GDIV) | ; | |
| DDDEF(GDATA,GNUM,GDEN,GCOMM) | ; | |
| DEF(GDATA,GNUM,GDEN) | ;EP | |
| DONE | ; | |
| INIT(VER,MSIEN) | ; Initialize array | |
| AGG(DATA,DIV,COMM) | ; EP -- BQI GET GPRA AGG TOTAL | |
| RPT(VER) | ;  Get the CRS Clinical Performance information | 
| Name | Field # of Occurrence | 
|---|---|
| ^%ZTER | ERR+1 | 
| $$LKP^BQIGPUTL | COMP+25 | 
| GFN^BQIGPUTL | COMP+26 | 
| $$CIPC^BQIIPCUT | RPT+20, INIT+25 | 
| $$CLIN^BQIIPCUT | RPT+21, INIT+26 | 
| $$ROOT^DILFD | COMP+27, COMP+28 | 
| $$GET1^DIQ | COMP+24, RPT+10, RPT+11, RPT+18, RPT+19, RPT+22, INIT+5, INIT+7, INIT+8, INIT+10 , INIT+11, INIT+12, INIT+13, INIT+15, INIT+16, INIT+20, INIT+21, INIT+23, INIT+24, INIT+27 | 
| $$DT^XLFDT | COMP+13, COMP+14, COMP+15 | 
| $$FMADD^XLFDT | COMP+13, COMP+14, COMP+15 | 
| $$FMTE^XLFDT | RPT+16 | 
| $$NOW^XLFDT | ERR+3 | 
| $$STRIP^XLFSTR | INIT+14 | 
| $$VERSION^XPDUTL | COMP+29, INIT+19 | 
| RPC Name | Call Tags | 
|---|---|
| BQI GET GPRA AGG TOTAL | AGG | 
| BQI GET GPRA COMM LIST | COML | 
| FileNo | Call Tags | 
|---|---|
| ^BQI(90506.1 - [#90506.1] | GET1^DIQ | 
| ^BQI(90508 - [#90508] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUPNPAT - [#9000001] | RPT+28, RPT+29, RPT+35, INIT+39 | 
| ^AUPNPAT("AC" | INIT+36, INIT+38 | 
| ^AUTTCOM - [#9999999.05] | COML+8 | 
| ^BQI(90506.1 - [#90506.1] | COMP+32, COMP+33, RPT+7, RPT+8, RPT+9, INIT+1 | 
| ^BQI(90508 - [#90508] | RPT+30, INIT+33 | 
| ^BQIPAT( | COMP+37, RPT+4, RPT+5, RPT+6, RPT+14, RPT+15 | 
| ^DD("DD" | ERR+3 | 
| ^TMP("BQIGDIV" | COMP+10 | 
| ^TMP("BQIGPC" | COML+3 | 
| ^TMP("BQIGPCOM" | COMP+11 | 
| ^TMP("BQIGTOT" | AGG+5, AGG+6, AGG+7, COMP+9 | 
| ^XTMP("BQIGPCOM" | AGG+6, COML+4, COMP+11 | 
| ^XTMP("BQIGPDIV" | AGG+7, COMP+10 | 
| ^XTMP("BQIGPTOT" | AGG+5, COMP+9 | 
| Name | Line Occurrences | 
|---|---|
| DDDEF | COMP+90 | 
| DDEF | COMP+70 | 
| DEF | COMP+50 | 
| INIT | COMP+34, RPT+23 | 
| RPT | COMP+37 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(0 | RPT+6, INIT+1 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| BMEAS | COMP+4~, RPT+1~, RPT+12*, RPT+18, RPT+19 | 
| >> BMXSEC | ERR+4* | 
| >> BQCODE | RPT+20, RPT+21, INIT+2*, INIT+25, INIT+26 | 
| BQCOMM | RPT+2~, RPT+35*, RPT+36, RPT+37, RPT+38, RPT+39 | 
| BQDV | COMP+5~, RPT+2~, RPT+27*, RPT+28*, RPT+29, RPT+30, RPT+31, RPT+32, RPT+33, RPT+34 | 
| BQI | AGG+1~, AGG+3*, AGG+11, AGG+12, AGG+13, AGG+14*, AGG+15*, DONE+1*, COML+1~, COML+5* , COML+7*, COML+8 | 
| BQICAT | COMP+1~, DEF+1*, DEF+22, DDEF+1*, DDEF+22, DDDEF+1*, DDDEF+22 | 
| BQICLN | COMP+3~, DEF+2*, DEF+22, DDEF+2*, DDEF+22, DDDEF+2*, DDDEF+22 | 
| BQIEN | COMP+2~, COMP+45*, COMP+46*, COMP+47, COMP+48, COMP+49, COMP+65*, COMP+66*, COMP+67, COMP+68 , COMP+69, COMP+85*, COMP+86*, COMP+87, COMP+88, COMP+89 | 
| BQIH | COMP+3~, COMP+26 | 
| BQIIND | COMP+1~ | 
| BQIINDF | COMP+4~, COMP+27 | 
| BQIINDG | COMP+4~, COMP+27* | 
| BQIMEASF | COMP+2~, COMP+28, RPT+18, RPT+19, INIT+5, INIT+7, INIT+8, INIT+10, INIT+11, INIT+12 , INIT+13, INIT+15, INIT+16, INIT+20, INIT+21 | 
| BQIMEASG | COMP+4~, COMP+28* | 
| BQIND | COMP+2~, RPT+1~, RPT+3*, RPT+4, RPT+5*, RPT+6 | 
| BQIY | COMP+3~, COMP+25*, COMP+26 | 
| BQIYR | COMP+2~, RPT+1~, RPT+14* | 
| BQMEAS | COMP+2~, DEF+3*, DEF+22, DDEF+3*, DDEF+22, DDDEF+3*, DDDEF+22, RPT+1~, RPT+6*, RPT+7 , RPT+12, INIT+1*, INIT+2*, INIT+5, INIT+7, INIT+8, INIT+10, INIT+11, INIT+12, INIT+13 , INIT+15, INIT+16, INIT+20, INIT+21 | 
| CAT | COMP+2~, COMP+39*, COMP+40*, COMP+42, COMP+44, COMP+46, COMP+47, COMP+48, COMP+49, COMP+59* , COMP+60*, COMP+62, COMP+64, COMP+66, COMP+67, COMP+68, COMP+69, COMP+79*, COMP+80*, COMP+82 , COMP+84, COMP+86, COMP+87, COMP+88, COMP+89, RPT+1~, RPT+10*, RPT+21*, RPT+23, RPT+24 , RPT+25, RPT+26, RPT+31, RPT+32, RPT+34, RPT+36, RPT+37, RPT+39, INIT+23*, INIT+26* , INIT+31, INIT+33, INIT+40 | 
| CIEN | INIT+34~, INIT+39*, INIT+40 | 
| CLIN | COMP+3~, COMP+41*, COMP+42*, COMP+44, COMP+46, COMP+47, COMP+48, COMP+49, COMP+61*, COMP+62* , COMP+64, COMP+66, COMP+67, COMP+68, COMP+69, COMP+81*, COMP+82*, COMP+84, COMP+86, COMP+87 , COMP+88, COMP+89, RPT+1~, RPT+11*, RPT+21*, RPT+22*, RPT+23, RPT+24, RPT+25, RPT+26 , RPT+31, RPT+32, RPT+34, RPT+36, RPT+37, RPT+39, INIT+24*, INIT+26*, INIT+27*, INIT+31 , INIT+33, INIT+40 | 
| COMM | AGG~, AGG+2*, AGG+5, AGG+6, COMP+74*, COMP+75*, COMP+77, COMP+78, COMP+79, COMP+80 , COMP+82, COMP+84, COMP+86, COMP+87, COMP+88, COMP+89, COMP+90, INIT+34~, INIT+35*, INIT+36* , INIT+38 | 
| DATA | AGG~, AGG+5*, AGG+6*, AGG+7*, AGG+8, AGG+11, AGG+12, AGG+13, AGG+15, DONE+1 , COML~, COML+3*, COML+6, COML+8, COML+9, COMP+5~, COMP+9*, COMP+12, COMP+13, COMP+18 , COMP+19, COMP+20, COMP+21, DEF+22, ERR+5 | 
| DDATA | COMP+5~, COMP+10*, COMP+12, COMP+14, DDEF+22 | 
| DDDATA | COMP+5~, COMP+11*, COMP+12, COMP+15, DDDEF+22 | 
| DEN | COMP+1~, DEF+13*, DEF+14, DEF+15, DEF+17, DEF+19, DEF+20*, DEF+22, DDEF+13*, DDEF+14 , DDEF+15, DDEF+17, DDEF+19, DDEF+20*, DDEF+22, DDDEF+13*, DDDEF+14, DDDEF+15, DDDEF+17, DDDEF+19 , DDDEF+20*, DDDEF+22, RPT+1~, RPT+6*, RPT+25, RPT+32, RPT+37 | 
| DFN | COMP+1~, COMP+6*, COMP+36*, COMP+37*, COMP+56*, COMP+57*, COMP+76*, COMP+77*, RPT+4, RPT+5 , RPT+6, RPT+14, RPT+15, RPT+28, RPT+29, RPT+33, RPT+35, RPT+38, INIT+34~, INIT+37* , INIT+38*, INIT+39 | 
| DIV | AGG~, AGG+2*, AGG+5, AGG+6, AGG+7, COMP+5~, COMP+54*, COMP+55*, COMP+57, COMP+58 , COMP+59, COMP+60, COMP+62, COMP+64, COMP+66, COMP+67, COMP+68, COMP+69, COMP+70, INIT+32* , INIT+33* | 
| DT | COMP+13, COMP+14, COMP+15 | 
| ERRDTM | ERR+2~, ERR+3*, ERR+4 | 
| EXCEPT | COMP+5~, DEF+21*, DEF+22, DDEF+21*, DDEF+22, DDDEF+21*, DDDEF+22 | 
| FAKE | COML~ | 
| FDT | COMP+2~, RPT+1~, RPT+15*, RPT+16 | 
| GCOMM | DDDEF~, DDDEF+22 | 
| GDATA | COMP+4~, COMP+47*, COMP+50, COMP+67*, COMP+70, COMP+87*, COMP+90, DEF~, DEF+1, DEF+2 , DEF+3, DEF+4, DEF+6, DEF+7, DEF+8, DEF+9, DEF+10, DDEF~, DDEF+1, DDEF+2 , DDEF+3, DDEF+4, DDEF+6, DDEF+7, DDEF+8, DDEF+9, DDEF+10, DDDEF~, DDDEF+1, DDDEF+2 , DDDEF+3, DDDEF+4, DDDEF+6, DDDEF+7, DDDEF+8, DDDEF+9, DDDEF+10 | 
| GDEN | COMP+4~, COMP+49*, COMP+50, COMP+69*, COMP+70, COMP+89*, COMP+90, DEF~, DEF+13, DDEF~ , DDEF+13, DDDEF~, DDDEF+13 | 
| GDIV | DDEF~, DDEF+22 | 
| GNUM | COMP+4~, COMP+48*, COMP+50, COMP+68*, COMP+70, COMP+88*, COMP+90, DEF~, DEF+12, DDEF~ , DDEF+12, DDDEF~, DDDEF+12 | 
| GOAL | COMP+5~, DEF+10*, DEF+22, DDEF+10*, DDEF+22, DDDEF+10*, DDDEF+22, INIT+18*, INIT+20*, INIT+21* , INIT+31, INIT+33, INIT+40 | 
| HDR | COML+5*, COML+6, COMP+5~, COMP+21*, COMP+59, COMP+79 | 
| II | AGG+1~, AGG+3*, AGG+10, AGG+15*, COML+1~, COML+5*, COML+6, COML+8*, COML+9*, COMP+1~ , COMP+6*, COMP+13, COMP+14, COMP+15, COMP+16*, COMP+18, COMP+19, COMP+20, COMP+21, COMP+59* , COMP+79*, DEF+22*, DDEF+22*, DDDEF+22*, ERR+5* | 
| IPC | COMP+5~, RPT+19*, RPT+20, INIT+8*, INIT+25, INIT+29* | 
| MDESC | COMP+1~, DEF+4*, DEF+22, DDEF+4*, DDEF+22, DDDEF+4*, DDDEF+22 | 
| MSIEN | COMP+3~, COMP+31*, COMP+32*, COMP+33, COMP+34, RPT+1~, RPT+7*, RPT+8, RPT+9, RPT+10 , RPT+11, RPT+22, RPT+23, RPT+24, RPT+25, RPT+26, RPT+31, RPT+32, RPT+34, RPT+36 , RPT+37, RPT+39, INIT~, INIT+1, INIT+23, INIT+24, INIT+27, INIT+31, INIT+33, INIT+40 | 
| NAFLG | COMP+4~, DEF+9*, DEF+18, DEF+20, DEF+21, DDEF+9*, DDEF+18, DDEF+20, DDEF+21, DDDEF+9* , DDDEF+18, DDDEF+20, DDDEF+21, INIT+5*, INIT+6*, INIT+31, INIT+33, INIT+40 | 
| NCURR | COMP+1~, DEF+6*, DEF+22, DDEF+6*, DDEF+22, DDDEF+6*, DDDEF+22, INIT+12*, INIT+13*, INIT+14* , INIT+31, INIT+33, INIT+40 | 
| NUM | COMP+1~, DEF+12*, DEF+15, DEF+17, DEF+19, DEF+22, DDEF+12*, DDEF+15, DDEF+17, DDEF+19 , DDEF+22, DDDEF+12*, DDDEF+15, DDDEF+17, DDDEF+19, DDDEF+22, RPT+1~, RPT+6*, RPT+24, RPT+31 , RPT+36 | 
| ORDER | COMP+2~, INIT+4* | 
| PER | COMP+3~, DEF+14*, DEF+15*, DEF+17*, DEF+18*, DEF+19*, DEF+22, DDEF+14*, DDEF+15*, DDEF+17* , DDEF+18*, DDEF+19*, DDEF+22, DDDEF+14*, DDDEF+15*, DDDEF+17*, DDDEF+18*, DDDEF+19*, DDDEF+22 | 
| PIND | COMP+3~ | 
| PLID | COMP+1~ | 
| RPERIOD | COMP+2~, DEF+8*, DEF+22, DDEF+8*, DDEF+22, DDDEF+8*, DDDEF+22, RPT+1~, RPT+16*, RPT+26 , RPT+34, RPT+39, INIT+29*, INIT+31, INIT+33, INIT+40 | 
| SUM | COMP+3~, RPT+1~, RPT+18*, INIT+7* | 
| TDATA | AGG+1~, AGG+5*, AGG+6*, AGG+7*, AGG+10, AGG+15, COML+1~, COML+4*, COML+7, COMP+3~ , COMP+5~, COMP+9*, COMP+12, COMP+40, COMP+42, COMP+44, COMP+46, COMP+47, COMP+48, COMP+49 , COMP+52, RPT+23, RPT+24, RPT+25, RPT+26*, INIT+31 | 
| TDT | COMP+2~, RPT+1~, RPT+15*, RPT+16 | 
| TIT | COMP+4~, COMP+43*, COMP+44*, COMP+46, COMP+47, COMP+48, COMP+49, COMP+63*, COMP+64*, COMP+66 , COMP+67, COMP+68, COMP+69, COMP+83*, COMP+84*, COMP+86, COMP+87, COMP+88, COMP+89 | 
| TITLE | COMP+2~, RPT+1~, RPT+9*, RPT+23, RPT+24, RPT+25, RPT+26, RPT+31, RPT+32, RPT+34 , RPT+36, RPT+37, RPT+39, INIT+1*, INIT+4, INIT+31, INIT+33, INIT+40 | 
| TOTP | COMP+1~, COMP+36*, COMP+56*, COMP+57*, COMP+76*, COMP+77*, DEF+22, DDEF+22, DDDEF+22, RPT+4* | 
| TPERIOD | COMP+4~, DEF+8, DDEF+8, DDDEF+8, RPT+26*, RPT+34*, RPT+39* | 
| TWTEN | COMP+1~, INIT+10*, INIT+11* | 
| U | COML+8, COMP+13, COMP+14, COMP+15, COMP+33, DEF+22, DDEF+22, DDDEF+22, RPT+6, RPT+8 , RPT+9, RPT+14, RPT+15, RPT+26, RPT+29, RPT+34, RPT+35, RPT+39, INIT+1, INIT+31 , INIT+33, INIT+40 | 
| UDATA | COMP+5~, COMP+11*, COMP+12, COMP+75, COMP+77, COMP+78, COMP+79, COMP+80, COMP+82, COMP+84 , COMP+86, COMP+87, COMP+88, COMP+89, RPT+36, RPT+37, RPT+38, RPT+39*, INIT+40 | 
| UID | AGG+1~, AGG+4*, AGG+5, AGG+6, AGG+7, COML+1~, COML+2*, COML+3, COMP+1~, COMP+8* , COMP+9, COMP+10, COMP+11 | 
| VALUE | COMP+3~, RPT+1~, RPT+6*, INIT+29*, INIT+31, INIT+33, INIT+40 | 
| VDATA | COMP+5~, COMP+10*, COMP+12, COMP+55, COMP+57, COMP+58, COMP+59, COMP+60, COMP+62, COMP+64 , COMP+66, COMP+67, COMP+68, COMP+69, COMP+72, RPT+31, RPT+32, RPT+33, RPT+34*, INIT+33 | 
| VER | COMP+29*, COMP+34, COMP+37, RPT~, RPT+23, INIT~ | 
| X | COMP+3~ | 
| Y | ERR+2~, ERR+3* | 
| YCURR | COMP+3~, DEF+7*, DEF+22, DDEF+7*, DDEF+22, DDDEF+7*, DDDEF+22, INIT+15*, INIT+16*, INIT+31 , INIT+33, INIT+40 | 
| YEAR | COMP+3~, COMP+24*, COMP+25 | 
| >> ZTSK | AGG+4, COML+2 |