BKMQSSR ;PRXM/HC/CJS - STATE SURV. REPORT ; 14 Jun 2005 3:06 PM
Source file <BKMQSSR.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
GDATA | ; Retrieve patient information
|
|
PATDEMO | ;GET PATIENT DEMOGRAPHICS
|
|
EN(DATA,PLIST) | ;EP - PRIMARY REPORT ENTRY POINT
; values for DATA and PLIST are supplied by the calling routine ; ; Check taxonomies - added per bugzilla #1497 ; This will be accomplished through an RPC call to BQITAXX |
|
DQUE | ;ENTRY FROM QUEUE
|
|
QUE(DFN) | ;QUEUE REPORT FOR PRINT/DISPLAY
|
|
ERR | ;
|
|
AGE | ;GET PATIENT DOB AND DIAGNOSIS INFO AND CALCULATE AGE AT DIAGNOSIS
|
|
CKAGE() | ;Call AGE subroutine and confirm eligibility for report
|
|
HDR | ;
|
|
DONE | ;
|
|
XIT | ;KILL LOCALS AND EXIT
|
|
FAC | ;GATHER FACILITY DATA
|
|
DQUE1 | ;
|
|
PRACDIAG | ;GATHER PROVIDER DATA
|
Name | Field # of Occurrence |
---|---|
^%ZTER | ERR+1 |
EN^BKMQSSR1 | DQUE+7 |
EN^BKMQSSR2 | DQUE+8 |
EN^BKMQSSR3 | DQUE1+1 |
EN^BKMQSSR4 | DQUE1+2 |
EN^BKMQSSR5 | DQUE1+3 |
EN^BKMQSSR6 | DQUE1+4 |
UPD^BKMQUTL | EN+20 |
$$FIND1^DIC | AGE+4 |
$$GET1^DIQ | AGE+2, AGE+3, AGE+6, AGE+8, AGE+9, FAC+1, FAC+2, FAC+3, FAC+4, FAC+5 , FAC+6, FAC+7, PATDEMO+1, PATDEMO+2, PATDEMO+5, PATDEMO+6, PATDEMO+7, PATDEMO+9, PATDEMO+12, PATDEMO+13 , PATDEMO+14, PATDEMO+15, PATDEMO+16, PATDEMO+17, PATDEMO+18, PATDEMO+19, PATDEMO+20, PATDEMO+21, PRACDIAG+1, PRACDIAG+2 , PRACDIAG+3, PRACDIAG+4 |
$$FMDIFF^XLFDT | AGE+14, AGE+15, AGE+16 |
$$NOW^XLFDT | ERR+3 |
FileNo | Call Tags |
---|---|
^DIC(10.2 - [#10.2] | GET1^DIQ |
^DPT - [#2] | GET1^DIQ |
^VA(200 - [#200] | GET1^DIQ |
^DIC(4 - [#4] | GET1^DIQ |
^AUPNPAT - [#9000001] | GET1^DIQ |
9000001.41 | GET1^DIQ |
^BKM(90451 - [#90451] | FIND1^DIC |
90451.01 | GET1^DIQ |
^AUTTSITE - [#9999999.39] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("DD" | ERR+3 |
^DPT - [#2] | PATDEMO+11 |
Name | Line Occurrences |
---|---|
AGE | GDATA+10, CKAGE+1 |
DONE | EN+27 |
DQUE1 | EN+25 |
FAC | EN+19 |
GDATA | EN+20 |
HDR | EN+25, GDATA+15 |
PATDEMO | DQUE+6 |
PRACDIAG | DQUE+6 |
QUE | GDATA+17 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | XIT+9! |
%H | XIT+9! |
APCHSPAT | EN+23~, DQUE+2~ |
APCHSTYP | EN+23~, DQUE+2~ |
BKM | GDATA+7~, PATDEMO+10*, PATDEMO+11* |
BKM0 | GDATA+7~ |
BKM1 | GDATA+6~ |
BKM2 | GDATA+7~ |
BKMCC | GDATA+7~ |
BKMCKDT | GDATA+8~ |
BKMDAY | GDATA+8~ |
BKMDDT | GDATA+1~, AGE+1*, AGE+8*, AGE+9*, AGE+14 |
BKMDIAG | GDATA+1~, AGE+6*, AGE+7*, AGE+8, AGE+9 |
BKMDT | GDATA+7~ |
BKMHAART | GDATA+9~ |
BKMHDR | GDATA+6~ |
BKMHDR1 | GDATA+6~ |
BKMICD | GDATA+9~ |
BKMIEN | GDATA+8~ |
BKMLINE | GDATA+1~ |
BKMLINE1 | GDATA+6~ |
BKMLOC | EN+6~, FAC+1*, FAC+2, FAC+3, FAC+4, FAC+5, FAC+6, FAC+7, PATDEMO+6 |
BKMNDT | GDATA+7~ |
BKMPAD | GDATA+6~ |
BKMPCP | GDATA+9~ |
BKMPROV | GDATA+5~, PRACDIAG+1*, PRACDIAG+2*, PRACDIAG+3, PRACDIAG+4* |
BKMQTY | GDATA+8~ |
BKMSEC | GDATA+6~ |
BKMSICD | GDATA+9~ |
BKMSIG | GDATA+8~ |
BKMVADD1 | GDATA+3~, PATDEMO+15*, PATDEMO+22 |
BKMVADD2 | GDATA+3~, PATDEMO+16*, PATDEMO+23 |
BKMVADD3 | GDATA+3~, PATDEMO+17*, PATDEMO+24 |
BKMVADDL | GDATA+4~, PATDEMO+22*, PATDEMO+23*, PATDEMO+24*, PATDEMO+25*, PATDEMO+26*, PATDEMO+27* |
BKMVAGED | GDATA+1~, AGE+14*, AGE+15*, AGE+16*, AGE+17*, CKAGE+3 |
BKMVCITY | GDATA+3~, PATDEMO+18*, PATDEMO+25 |
BKMVCNTY | GDATA+4~, PATDEMO+21* |
BKMVDOB | GDATA+1~, AGE+2*, AGE+14, AGE+15, AGE+16 |
BKMVDOD | GDATA+1~, AGE+3*, AGE+15, PATDEMO+3 |
BKMVETH | GDATA+2~, PATDEMO+10*, PATDEMO+11*, PATDEMO+12* |
BKMVETO | GDATA+8~ |
BKMVHRN | GDATA+2~, PATDEMO+6* |
BKMVLABS | GDATA+9~ |
BKMVLAD | EN+6~, FAC+3* |
BKMVLAD1 | EN+6~, FAC+4* |
BKMVLCTY | EN+6~, FAC+6* |
BKMVLN | GDATA+8~ |
BKMVLOC | EN+6~, FAC+2* |
BKMVLST | EN+6~, FAC+5* |
BKMVLZIP | EN+6~, FAC+7* |
BKMVNDT | GDATA+8~ |
BKMVPHN | GDATA+3~, PATDEMO+13* |
BKMVPOB | GDATA+3~, PATDEMO+14* |
BKMVPPH | GDATA+5~, PRACDIAG+3* |
BKMVPST | GDATA+3~, PATDEMO+19*, PATDEMO+26 |
BKMVPZP | GDATA+4~, PATDEMO+20*, PATDEMO+27 |
BKMVRCE | GDATA+2~, PATDEMO+7*, PATDEMO+8*, PATDEMO+9* |
BKMVSDTH | GDATA+2~, PATDEMO+2* |
BKMVSEX | GDATA+2~, PATDEMO+1* |
BKMVSTAT | GDATA+2~, PATDEMO+3*, PATDEMO+5* |
BKMX | EN+5~, GDATA+6~, GDATA+16* |
>> BMXSEC | CKAGE+4*, ERR+4* |
BN | EN+14*, EN+15*, GDATA+7~ |
BQII | EN+5~, EN+11*, EN+26*, GDATA+15, HDR+1, DONE+1* |
CNT | EN+5~ |
DATA | EN~, EN+26, HDR+1, DONE+1 |
DENPOP | EN+5~ |
DFN | EN+5~, EN+20*, GDATA+17, AGE+2, AGE+3, AGE+4, PATDEMO+1, PATDEMO+2, PATDEMO+6, PATDEMO+7 , PATDEMO+9, PATDEMO+11, PATDEMO+13, PATDEMO+14, PATDEMO+15, PATDEMO+16, PATDEMO+17, PATDEMO+18, PATDEMO+19, PATDEMO+20 , PATDEMO+21, QUE~ |
DIR | XIT+9! |
DIWF | XIT+9! |
DIWL | XIT+9! |
DIWR | XIT+9! |
DT | AGE+16 |
DTOUT | XIT+9! |
DUOUT | XIT+9! |
ERRDTM | ERR+2~, ERR+3*, ERR+4 |
GLOB | EN+5~ |
GLOBAL | XIT+9! |
IEN | GDATA+1~, AGE+4*, AGE+5, AGE+6, AGE+8, AGE+9, PATDEMO+5, PRACDIAG+1, PRACDIAG+2, XIT+9! |
II | EN+5~, EN+20* |
LINE | EN+22~, DQUE+1~ |
LIST | EN+5~, EN+14*, EN+15*, EN+17, EN+18! |
LNLEN | EN+22~, EN+24*, DQUE+1~, DQUE+4* |
PAGE | GDATA+6~ |
PLIST | EN~, EN+12*, EN+13, EN+16!, EN+17*, EN+19, EN+20, EN+21 |
PLIST( | EN+15 |
POP | XIT+9! |
TYPE | XIT+9! |
U | PATDEMO+11 |
X | EN+22~, DQUE+1~, XIT+9! |
Y | XIT+9!, ERR+2~, ERR+3* |