©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
BTPWPDSP ;VNGT/HS/BEE - Display CMET Queued Records ; 17 Jul 2008 1:24 PM
Source file <BTPWPDSP.m>
| Package | Total | Call Graph |
|---|---|---|
| iCare | 5 | $$AGE^BQIAGE BLD^BQITUTL ($$DATE,$$FMTE,$$TKO)^BQIUL1 ($$ICD0,$$ICD9,$$ICPT)^BQIUL3 ($$CALR,$$DCAT,$$DPCP,$$HRNL,$$SENS)^BQIULPT |
| Tracking Procedure Workflow | 3 | ($$FND,$$FOL,$$NOT)^BTPWPCLO $$SCOMM^BTPWPDS1 $$QLNK^BTPWPTRG |
| Kernel | 2 | ^%ZTER $$NOW^XLFDT |
| VA Fileman | 2 | DT^DICRW ($$GET1,GETS)^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RET(DATA,CNT,SRC,PARMS) | ; EP - BTPW GET QUEUED EVENTS
; Input parameters ; CNT - Count of # of records to return ; SRC - Values to continue search on ; PARMS - Delimited list of input variables ; -> STATUS - Status ; -> TMFRAME - Time frame ; -> CAT - Category ; -> COMM - Community ; -> COMMTX - Community Taxonomy |
|
| CAT(PIEN,TYP) | ; EP - Get Procedure Category
|
|
| ERR | ;
|
|
| CMSTVD(STATUS,BDT,EDT,COMM,CTLST,OSRC) | ; EP - Search 1 - COMMUNITY, STATUS, VISIT DATE - Now INACTIVE
|
|
| VD(COMM,BDT,EDT,OSRC) | ; EP - Search 4 - VISIT DATE
|
|
| REC(SQIEN,COMM) | ; EP - Assemble Single Record
|
|
| SV(STATUS,COMM,BDT,EDT,OSRC) | ; EP - Search 3 - STATUS, VISIT DATE
|
|
| PAD(X,LEN) | ;Truncate or Pad the variable with spaces
|
|
| ST(COMM,CTLST,STATUS,OSRC) | ;EP - Search 5 - Default search on STATUS
|
|
| DONE | ;
|
|
| FNDCMT(TIEN) | ;EP - Get Findings Comments - 90506.1 code BTPWTFNC
|
|
| CMIEN(CMIEN,COMM,OSRC) | ; EP - Search 0 - List of IENs
|
|
| NOTCMT(TIEN) | ;EP - Get Notification Comments - 90506.1 code BTPWTNOC
|
|
| CSVD(CATS,STATUS,COMM,BDT,EDT,OSRC) | ; EP - Search 2 - CATEGORY, STATUS, VISIT DATE
|
|
| EVTCOM(TIEN) | ;EP - Get Event Comments - called by 90506.1 - BTPWQECM
|
|
| FUPCMT(TIEN) | ;EP - Get Followup Comments - 90506.1 code BTPWTFUC
|
|
| FLG(TIEN) | ;EP - Determine if Panel View Flag Indicator should be set
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTER | ERR+1 |
| $$AGE^BQIAGE | REC+40 |
| BLD^BQITUTL | RET+57 |
| $$DATE^BQIUL1 | RET+50, RET+51 |
| $$FMTE^BQIUL1 | REC+14, REC+19, REC+41 |
| $$TKO^BQIUL1 | REC+45 |
| $$ICD0^BQIUL3 | REC+30 |
| $$ICD9^BQIUL3 | REC+29 |
| $$ICPT^BQIUL3 | REC+31 |
| $$CALR^BQIULPT | REC+51 |
| $$DCAT^BQIULPT | REC+38 |
| $$DPCP^BQIULPT | REC+37 |
| $$HRNL^BQIULPT | REC+16 |
| $$SENS^BQIULPT | REC+50 |
| $$FND^BTPWPCLO | FLG+15 |
| $$FOL^BTPWPCLO | FLG+20 |
| $$NOT^BTPWPCLO | FLG+25 |
| $$SCOMM^BTPWPDS1 | REC+48 |
| $$QLNK^BTPWPTRG | REC+34 |
| DT^DICRW | RET+15 |
| $$GET1^DIQ | CAT+3, CAT+4, REC+7, REC+9, REC+15, REC+17, REC+18, REC+19, REC+26, REC+27 , REC+43, ST+17, CMSTVD+22, FLG+6 |
| GETS^DIQ | FNDCMT+4, FUPCMT+4, NOTCMT+4, FLG+9 |
| $$NOW^XLFDT | ERR+3 |
| RPC Name | Call Tags |
|---|---|
| BTPW GET QUEUED EVENTS | RET |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^AUPNPAT - [#9000001] | GET1^DIQ |
| ^BTPWP - [#90620] | GET1^DIQ, GETS^DIQ |
| ^BTPW(90621 - [#90621] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUTTCOM - [#9999999.05] | RET+67 |
| ^BTPW(90621 - [#90621] | REC+11 |
| ^BTPW(90621.1 - [#90621.1] | REC+23, REC+25 |
| ^BTPWP - [#90620] | EVTCOM+4, EVTCOM+5 |
| ^BTPWQ( | REC+3, REC+44 |
| ^BTPWQ("AC" | ST+11 |
| ^BTPWQ("AF" | SV+13, SV+14 |
| ^BTPWQ("AG" | CSVD+15, CSVD+16 |
| ^BTPWQ("AH" | VD+11, VD+12 |
| ^BTPWQ("AI" | CMSTVD+15, CMSTVD+16 |
| ^DD("DD" | ERR+3 |
| ^TMP("BTPWPDSP" | RET+13 |
| Name | Line Occurrences |
|---|---|
| $$CAT | REC+12 |
| CMIEN | RET+77 |
| CSVD | RET+80 |
| DONE | RET+77, RET+80, RET+83, RET+86 |
| REC | ST+22, CMIEN+12, VD+14, SV+16, CSVD+18, CMSTVD+27 |
| ST | RET+89 |
| SV | RET+83 |
| VD | RET+86 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | REC+25 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BDT | RET+11~, RET+48*, RET+51*, RET+80, RET+83, RET+86, VD~, VD+10, SV~, SV+11 , SV+19, CSVD~, CSVD+12, CSVD+21, CMSTVD~, CMSTVD+12, CMSTVD+30 |
| >> BMXSEC | RET+32, ERR+4* |
| BN | RET+23~, RET+24*, RET+25* |
| BP | RET+33~, RET+37* |
| BQ | RET+11~, RET+32*, RET+34, RET+62*, RET+67* |
| BV | RET+33~, RET+37* |
| CAT | RET+11~, RET+31*, RET+61, RET+62, RET+80, CSVD+1~, CSVD+4*, CSVD+13*, CSVD+15, CSVD+16 , CSVD+17 |
| CATLST | RET+11~, RET+89 |
| CATLST( | RET+62* |
| CATP | CSVD+1~, CSVD+13* |
| CATS | CSVD~, CSVD+4, CSVD+13 |
| CFND | CSVD+1~, CSVD+4*, CMSTVD+1~, CMSTVD+4* |
| CIEN | FNDCMT+1~, FNDCMT+13*, FNDCMT+14, FUPCMT+1~, FUPCMT+13*, FUPCMT+14, NOTCMT+1~, NOTCMT+13*, NOTCMT+14 |
| CII | RET+11~, RET+17*, RET+69, RET+70, RET+71, RET+72, DONE+1*, REC+50*, REC+51, REC+52 , ST+12, ST+23, CMIEN+11, CMIEN+13, VD+13, VD+15, SV+15, SV+17, CSVD+17, CSVD+19 , CMSTVD+17, CMSTVD+28, ERR+5* |
| CIN | RET+11~, RET+62*, RET+67* |
| CLN | FNDCMT+1~, FNDCMT+13*, FUPCMT+1~, FUPCMT+13*, NOTCMT+1~, NOTCMT+13* |
| CM | RET+55~, RET+58*, CMSTVD+1~, CMSTVD+4*, CMSTVD+13*, CMSTVD+15, CMSTVD+16, CMSTVD+17 |
| CMIEN | RET+11~, RET+31*, RET+77, CMIEN~, CMIEN+9, CMIEN+10 |
| CNT | RET~, RET+42*, ST+24, CMIEN+14, VD+16, SV+18, CSVD+20, CMSTVD+29 |
| COM | FNDCMT+1~, FNDCMT+2*, FNDCMT+11*, FNDCMT+15*, FNDCMT+16*, FNDCMT+18, FUPCMT+1~, FUPCMT+2*, FUPCMT+11*, FUPCMT+15* , FUPCMT+16*, FUPCMT+18, NOTCMT+1~, NOTCMT+2*, NOTCMT+11*, NOTCMT+15*, NOTCMT+16*, NOTCMT+18 |
| COMM | RET+11~, RET+31*, RET+58*, RET+65*, RET+66, RET+67, RET+77, RET+80, RET+83, RET+86 , RET+89, REC~, REC+8, ST~, ST+22, CMIEN~, CMIEN+12, VD~, VD+14, SV~ , SV+16, CSVD~, CSVD+18, CMSTVD~, CMSTVD+4, CMSTVD+13, CMSTVD+27 |
| COMM( | RET+58!, RET+67*, REC+8 |
| COMMTX | RET+11~, RET+31*, RET+54, RET+57 |
| COMP | CMSTVD+1~, CMSTVD+13* |
| CSTRT | CSVD+1~, CSVD+4*, CSVD+13, CMSTVD+1~, CMSTVD+4*, CMSTVD+13 |
| CT | ST+1~, ST+7*, ST+24*, CMIEN+1~, CMIEN+6*, CMIEN+14*, VD+1~, VD+7*, VD+16*, SV+1~ , SV+8*, SV+18*, CSVD+1~, CSVD+9*, CSVD+20*, CMSTVD+1~, CMSTVD+9*, CMSTVD+29* |
| CTG | ST+15~, ST+17*, ST+18, ST+20!, CMSTVD+20~, CMSTVD+22*, CMSTVD+23, CMSTVD+25! |
| CTGCHK | ST+15~*, ST+16, ST+19*, ST+20!, CMSTVD+20~*, CMSTVD+21, CMSTVD+24*, CMSTVD+25! |
| CTLST | ST~, ST+16, CMSTVD~, CMSTVD+21 |
| CTLST( | ST+18, CMSTVD+23 |
| DATA | RET~, RET+13*, RET+14, RET+69, RET+70, RET+71, RET+72, DONE+1, REC+50, REC+51 , REC+52, ERR+5 |
| DFN | REC+1~, REC+4*, REC+7, REC+9, REC+16, REC+17, REC+18, REC+19, REC+37, REC+38 , REC+40, REC+50, REC+51 |
| DOB | REC+1~, REC+19*, REC+50 |
| DPCP | REC+2~, REC+37*, REC+51 |
| DT | RET+15, FLG+16, FLG+21, FLG+26 |
| DXTG | REC+2~, REC+38*, REC+51 |
| ECAT | REC+1~, REC+12*, REC+50 |
| EDT | RET+11~, RET+48*, RET+50*, RET+80, RET+83, RET+86, VD~, VD+11, SV~, SV+13 , CSVD~, CSVD+15, CMSTVD~, CMSTVD+15 |
| ERRDTM | ERR+2~, ERR+3*, ERR+4 |
| FC | REC+2~, REC+44* |
| FCOM | FNDCMT+1~, FNDCMT+14*, FNDCMT+16, FUPCMT+1~, FUPCMT+14*, FUPCMT+16, NOTCMT+1~, NOTCMT+14*, NOTCMT+16 |
| FCOMM | REC+2~, REC+44*, REC+45*, REC+51 |
| FDATA | FNDCMT+1~, FUPCMT+1~, NOTCMT+1~, FLG+8~ |
| FDATA( | FNDCMT+6, FNDCMT+9, FNDCMT+13, FNDCMT+14, FUPCMT+6, FUPCMT+9, FUPCMT+13, FUPCMT+14, NOTCMT+6, NOTCMT+9 , NOTCMT+13, NOTCMT+14 |
| FDATA(90620 | FLG+16, FLG+21, FLG+26 |
| FIEN | FNDCMT+1~, FNDCMT+6*, FNDCMT+9, FNDCMT+13, FNDCMT+14, FUPCMT+1~, FUPCMT+6*, FUPCMT+9, FUPCMT+13, FUPCMT+14 , NOTCMT+1~, NOTCMT+6*, NOTCMT+9, NOTCMT+13, NOTCMT+14, FLG+8~ |
| FIL | REC+24~, REC+25*, REC+26, REC+27 |
| >> FIND | REC+43*, REC+51 |
| FLD | REC+24~, REC+25*, REC+26, REC+27 |
| FLG | FLG+8~, FLG+12*, FLG+15*, FLG+16*, FLG+17, FLG+20*, FLG+21*, FLG+22, FLG+25*, FLG+26* , FLG+28 |
| FND | FLG+8~, FLG+15*, FLG+16, FLG+17, FLG+20*, FLG+21, FLG+22, FLG+25*, FLG+26 |
| FNDT | FLG+8~, FLG+16*, FLG+21*, FLG+26* |
| FULLE | REC+2~, REC+21*, REC+23*, REC+26*, REC+29*, REC+30*, REC+31*, REC+51 |
| FULLR | REC+2~, REC+20*, REC+34*, REC+52 |
| HRES | REC+2~, REC+34*, REC+51 |
| HRN | REC+1~, REC+16*, REC+50 |
| IEN | ST+1~, ST+5*, ST+11*, ST+12, ST+17, ST+22, CMIEN+1~, CMIEN+4*, CMIEN+9, CMIEN+10* , CMIEN+11, CMIEN+12, VD+1~, VD+5*, VD+12*, VD+13, VD+14, SV+1~, SV+6*, SV+14* , SV+15, SV+16, CSVD+1~, CMSTVD+1~, CMSTVD+7*, CMSTVD+16*, CMSTVD+17, CMSTVD+22, CMSTVD+27 |
| IFND | CMIEN+1~, CMIEN+9* |
| ILST | CMIEN+1~ |
| ISTRT | CMIEN+1~, CMIEN+9*, CMIEN+10 |
| ITSP | CMIEN+1~, CMIEN+10* |
| LEN | PAD~, PAD+2, PAD+3 |
| LIEN | REC+2~, REC+27*, REC+29, REC+30, REC+31 |
| LII | ST+1~, ST+12*, ST+23, CMIEN+1~, CMIEN+11*, CMIEN+13, VD+1~, VD+13*, VD+15, SV+1~ , SV+15*, SV+17, CSVD+1~, CSVD+17*, CSVD+19, CMSTVD+1~, CMSTVD+17*, CMSTVD+28 |
| LIST | RET+23~, RET+24*, RET+25*, RET+27, RET+28! |
| LMBY | REC+1~, REC+42*, REC+51 |
| LMDT | REC+1~, REC+41*, REC+51 |
| NAME | RET+33~, RET+35*, RET+37 |
| OSRC | ST~, ST+4, ST+5, CMIEN~, CMIEN+4, VD~, VD+4, VD+5, SV~, SV+4 , SV+5, SV+6, CSVD~, CSVD+4, CSVD+5, CSVD+6, CSVD+7, CMSTVD~, CMSTVD+4, CMSTVD+5 , CMSTVD+6, CMSTVD+7 |
| OSTAT | RET+11~, RET+40*, RET+83 |
| PARMS | RET~, RET+21*, RET+22, RET+26!, RET+27*, RET+32, RET+34 |
| PARMS( | RET+25 |
| PCAT | CAT+1~, CAT+3*, CAT+4*, CAT+5 |
| PCOM | REC+1~, REC+7*, REC+8, REC+9*, REC+51 |
| PDATA | RET+33~, RET+34*, RET+35, RET+36 |
| PIEN | CAT~, CAT+3, CAT+4 |
| PRCDT | REC+1~, REC+14*, REC+50 |
| PROC | REC+1~, REC+11*, REC+12, REC+50 |
| PROCNM | REC+1~, REC+11*, REC+50 |
| PTAGE | REC+1~, REC+40*, REC+51 |
| PTNAME | REC+1~, REC+17*, REC+50 |
| QFL | RET+11~, RET+74*, ST+10, ST+11, ST+24*, CMIEN+10, CMIEN+14*, VD+11, VD+12, VD+16* , SV+12, SV+13, SV+14, SV+18*, CSVD+13, CSVD+14, CSVD+15, CSVD+16, CSVD+20*, CMSTVD+13 , CMSTVD+14, CMSTVD+15, CMSTVD+16, CMSTVD+29* |
| RCFILE | REC+2~, REC+22*, REC+23, REC+25 |
| RCIEN | REC+2~, REC+22*, REC+26, REC+27 |
| RES | REC+2~, REC+34*, REC+51 |
| SBDT | VD+1~, VD+4*, VD+10*, VD+11*, VD+12, VD+13, SV+1~, SV+5*, SV+11*, SV+13* , SV+14, SV+15, SV+19*, CSVD+1~, CSVD+6*, CSVD+12*, CSVD+15*, CSVD+16, CSVD+17, CSVD+21* , CMSTVD+1~, CMSTVD+6*, CMSTVD+12*, CMSTVD+15*, CMSTVD+16, CMSTVD+17, CMSTVD+30* |
| SCOMM | REC+1~, REC+48*, REC+52, EVTCOM+1~, EVTCOM+2*, EVTCOM+5*, EVTCOM+6 |
| SEX | REC+2~, REC+18*, REC+50 |
| SFND | ST+1~, ST+4*, SV+1~, SV+4*, CSVD+1~, CSVD+5*, CMSTVD+1~, CMSTVD+5* |
| SIEN | REC+2~, EVTCOM+1~, EVTCOM+3*, EVTCOM+4*, EVTCOM+5 |
| SPACE | PAD+1~, PAD+2*, PAD+3 |
| SQIEN | REC~, REC+3, REC+15, REC+34, REC+43, REC+44, REC+48, REC+50, CSVD+1~, CSVD+7* , CSVD+16*, CSVD+17, CSVD+18 |
| SRC | RET~, RET+41*, RET+77, RET+80, RET+83, RET+86, RET+89, REC+52, ST+1~, ST+12* , CMIEN+1~, CMIEN+11*, VD+1~, VD+13*, SV+1~, SV+15*, CSVD+1~, CSVD+17*, CMSTVD+1~, CMSTVD+17* |
| SSTRT | ST+1~, ST+4*, ST+10, SV+1~, SV+4*, SV+12, CSVD+1~, CSVD+5*, CSVD+14, CSVD+22* , CMSTVD+1~, CMSTVD+5*, CMSTVD+14, CMSTVD+31* |
| STAT | REC+1~, REC+15*, REC+50 |
| STATUS | RET+11~, RET+31*, RET+40, RET+45*, RET+80, RET+83, RET+89, ST~, ST+4, ST+10 , SV~, SV+4, SV+12, CSVD~, CSVD+5, CSVD+14, CMSTVD~, CMSTVD+5, CMSTVD+14 |
| STS | ST+1~, ST+4*, ST+10*, ST+11, ST+12, SV+1~, SV+4*, SV+12*, SV+13, SV+14 , SV+15, CSVD+1~, CSVD+5*, CSVD+14*, CSVD+15, CSVD+16, CSVD+17, CMSTVD+1~, CMSTVD+5*, CMSTVD+14* , CMSTVD+15, CMSTVD+16, CMSTVD+17 |
| STSP | ST+1~, ST+10*, SV+1~, SV+12*, CSVD+1~, CSVD+14*, CMSTVD+1~, CMSTVD+14* |
| TAB | REC+2~, REC+25*, REC+28, REC+29, REC+30, REC+31 |
| TDATA | REC+1~, REC+3*, REC+4, REC+11, REC+13, REC+14, REC+20, REC+22, REC+41, REC+42 |
| TIEN | REC+2~, REC+20*, EVTCOM~, EVTCOM+4, EVTCOM+5, FNDCMT~, FNDCMT+4, FUPCMT~, FUPCMT+4, NOTCMT~ , NOTCMT+4, FLG~, FLG+3, FLG+6, FLG+9, FLG+15, FLG+16, FLG+20, FLG+21, FLG+25 , FLG+26 |
| TMFRAME | RET+11~, RET+31*, RET+49, RET+50*, RET+51, RET+80, RET+83, RET+86 |
| TREF | RET+55~, RET+56*, RET+57 |
| TYP | CAT~, CAT+2*, CAT+3, CAT+4 |
| U | RET+15, RET+67, REC+4, REC+11, REC+13, REC+14, REC+20, REC+22, REC+37, REC+41 , REC+42, REC+50, REC+51, REC+52, FLG+15, FLG+20, FLG+25 |
| UID | RET+11~, RET+12*, RET+13 |
| VALUE | RET+33~, RET+36*, RET+37 |
| VISIT | REC+1~, REC+13*, REC+50 |
| X | PAD~, PAD+3 |
| Y | ERR+2~, ERR+3* |
| >> ZTSK | RET+12 |