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* |