ECUMRPC2 ;ALB/JAM - Event Capture Management Broker Utils ;12/22/21 18:54
Source file <ECUMRPC2.m>
| Package | Total | Call Graph |
|---|---|---|
| Event Capture | 5 | (END,KILLVAR,PARSE)^ECFLRPC GETLOC^ECL DELDSS^ECMDDSSU DELECSR^ECMDECS SETENV^ECUMRPC |
| Kernel | 5 | ^%ZTLOAD ($$DT,$$FMADD,$$FMTE,$$NOW)^XLFDT $$GET^XUA4A72 $$PROD^XUPROD $$ACTIVE^XUSER |
| Lexicon Utility | 3 | LOOK^LEXA CONFIG^LEXSET ($$IMPDATE,$$ONE)^LEXU |
| VA FileMan | 2 | FIND^DIC $$GET1^DIQ |
| DRG Grouper | 1 | ($$ICDDX,$$SINFO)^ICDEX |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| Event Capture | 7 | EC DELETE FILE ENTRY EC DELETE TEST PATIENT DATA EC GETCPTLST EC GETLOC EC GETPXLST EC2P134 ECUMRPC1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GLOC(RESULTS,ECARY) | ;
|
|
| CPTFND(RESULTS,ECARY) | ;
|
|
| PXFND(RESULTS,ECARY) | ;
|
|
| CPTSRH(FILE,CPTSTR) | ;Searches either file 81 or 725 for a CPT string
|
|
| FINDIC(ECFL,ECIEN,ECFLD,ECFLG,ECVAL,ECN,ECINDX,ECSCN,ECID,ECTG,ECER) | ;
|
|
| PROV(ECNUM) | ;Return a set of providers from the NEW PERSON file
|
|
| LEX | ; returns a list of ICD code from lexicon lookup; called from ECUMRPC1
|
|
| ICD | ;ICD code
|
|
| DTPD(RESULTS,ECARY) | ;Delete test patient data
|
|
| ECDEL(RESULTS,ECARY) | ;156 - Broker entry point to delete data in Event Capture files
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | DTPD+22 |
| FIND^DIC | FINDIC+3 |
| $$GET1^DIQ | GLOC+29, DTPD+16 |
| END^ECFLRPC | ECDEL+13, ECDEL+15, ECDEL+16 |
| KILLVAR^ECFLRPC | ECDEL+18 |
| PARSE^ECFLRPC | ECDEL+11 |
| GETLOC^ECL | GLOC+20 |
| DELDSS^ECMDDSSU | ECDEL+16 |
| DELECSR^ECMDECS | ECDEL+15 |
| SETENV^ECUMRPC | GLOC+17, CPTFND+12, PXFND+12, DTPD+10, ECDEL+10 |
| $$ICDDX^ICDEX | LEX+17, ICD+3 |
| $$SINFO^ICDEX | LEX+13, ICD+2 |
| LOOK^LEXA | LEX+21 |
| CONFIG^LEXSET | LEX+20 |
| $$IMPDATE^LEXU | LEX+18 |
| $$ONE^LEXU | ICD+1 |
| $$DT^XLFDT | DTPD+24 |
| $$FMADD^XLFDT | DTPD+24 |
| $$FMTE^XLFDT | DTPD+15 |
| $$NOW^XLFDT | DTPD+21, DTPD+24 |
| $$GET^XUA4A72 | PROV+23 |
| $$PROD^XUPROD | DTPD+13 |
| $$ACTIVE^XUSER | PROV+24 |
| RPC Name | Call Tags |
|---|---|
| EC GETCPTLST | CPTFND |
| EC GETPXLST | PXFND |
| EC GETLOC | GLOC |
| EC DELETE TEST PATIENT DATA | DTPD |
| EC DELETE FILE ENTRY | ECDEL |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^DIC(5 - [#5] | GET1^DIQ |
| ^ICD9 - [#80] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(4 - [#4] | GLOC+23, GLOC+26, GLOC+30, GLOC+31 |
| ^DIC(4.1 - [#4.1] | GLOC+30 |
| ^DISV( | LEX+15 |
| ^EC(722 - [#722] | PROV+25, PROV+26 |
| ^ECD - [#724] | PROV+26 |
| ^TMP("ECCPT" | CPTFND+14!, CPTFND+16, CPTFND+17, CPTFND+18!, PXFND+14!, PXFND+19, PXFND+20, PXFND+21, PXFND+28! |
| ^TMP("ECCPT1" | PXFND+14!, PXFND+24, PXFND+25, PXFND+26, PXFND+28! |
| ^TMP("LEXFND" | LEX+28, LEX+31, LEX+34, LEX+36! |
| ^TMP("LEXHIT" | LEX+36! |
| ^TMP("LEXSCH" | LEX+19! |
| ^TMP($J | GLOC+18!, GLOC+32*, GLOC+33, CPTFND+14!, CPTFND+17*, CPTFND+19, PXFND+14!, PXFND+22*, PXFND+23, PXFND+27* , PXFND+29, PROV+22*, PROV+24*, PROV+27*, LEX+22*, LEX+25*, LEX+26*, LEX+34*, LEX+35*, DTPD+11! , DTPD+12, DTPD+13*, DTPD+14*, DTPD+15*, DTPD+16*, DTPD+17*, DTPD+20, DTPD+23*, ECDEL+12!, ECDEL+13* , ECDEL+17*, ECDEL+19 |
| ^VA(200 - [#200] | PROV+19, PROV+20 |
| ^XMB("NETNAME" | DTPD+14 |
| ^XTMP("ECDELETE" | DTPD+15, DTPD+16, DTPD+17, DTPD+24* |
| Name | Field # of Occurrence |
|---|---|
| ^( | PXFND+26 |
| ^(2 | PXFND+21 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACT | GLOC+16~, GLOC+19*, GLOC+24*, GLOC+26*, GLOC+27 |
| APP | LEX+9~, LEX+18*, LEX+20, LEX+21, ICD+1 |
| CLOC | GLOC+16~, GLOC+28*, GLOC+32 |
| CNT | GLOC+16~, GLOC+19*, GLOC+29*, GLOC+32, PXFND+11~, PXFND+23*, PXFND+25*, PXFND+27, PROV+17~*, PROV+19 |
| CPTSTR | CPTFND+11~, CPTFND+13*, CPTFND+15, PXFND+11~, CPTSRH~, CPTSRH+2, CPTSRH+4 |
| DATE | PROV+17~, PROV+18*, PROV+23, PROV+25 |
| DIC | CPTFND+11~, PXFND+11~, LEX+9~, LEX+11*, LEX+15 |
| DT | LEX+11 |
| DUZ | LEX+15, DTPD+24, ECDEL+14 |
| ECARY | GLOC~, GLOC+19, CPTFND~, CPTFND+13, PXFND~, PXFND+13, DTPD~, DTPD+9, ECDEL~ |
| ECCD | LEX+9~, LEX+17* |
| ECCS | LEX+9~, LEX+13*, LEX+17, ICD+2*, ICD+3 |
| >> ECDIR | PROV+19, PROV+20 |
| ECDSS | PROV+17~, PROV+18*, PROV+26 |
| ECDT | LEX+9~, LEX+10*, LEX+11*, LEX+13, LEX+17, LEX+18, LEX+20, LEX+21, ICD+1, ICD+2 , ICD+3 |
| ECDUZ | ECDEL+9~, ECDEL+14* |
| ECER | CPTFND+11~, PXFND+11~, FINDIC~, FINDIC+2*, FINDIC+3 |
| ECFILE | ECDEL+9~, ECDEL+13, ECDEL+15, ECDEL+16 |
| ECFL | FINDIC~, FINDIC+3, FINDIC+4! |
| ECFLD | FINDIC~, FINDIC+3, FINDIC+4! |
| ECFLG | FINDIC~, FINDIC+3, FINDIC+4! |
| ECFT | GLOC+16~, GLOC+30*, GLOC+32 |
| ECID | PXFND+20*, PXFND+22, PXFND+25*, PXFND+27, FINDIC~, FINDIC+3, FINDIC+4! |
| ECIEN | FINDIC~, FINDIC+3, FINDIC+4! |
| ECINDX | FINDIC~, FINDIC+3, FINDIC+4! |
| ECLOC | GLOC+16~, GLOC+20 |
| ECLOC( | GLOC+21 |
| ECN | FINDIC~, FINDIC+3, FINDIC+4! |
| ECNT | CPTFND+11~, CPTFND+13*, CPTFND+16*, CPTFND+17, PXFND+11~, PXFND+13*, PXFND+19*, PXFND+20, PXFND+21, PXFND+22 , PXFND+23*, PXFND+24*, PXFND+25, PXFND+26 |
| ECNUM | PROV~, PROV+17 |
| ECSCN | FINDIC~, FINDIC+3, FINDIC+4! |
| ECSN | GLOC+16~, GLOC+31*, GLOC+32 |
| ECSTR | PXFND+11~, PXFND+21*, PXFND+22, PXFND+26*, PXFND+27, PROV+18, LEX+10 |
| ECTG | CPTFND+11~, PXFND+11~, FINDIC~, FINDIC+3 |
| ECUTN | PROV+17~, PROV+23*, PROV+24, PROV+25, PROV+27 |
| ECVAL | FINDIC~, FINDIC+3, FINDIC+4! |
| ECX | PXFND+11~, PXFND+18*, LEX+9~, LEX+10*, LEX+15, LEX+17*, LEX+21 |
| ELOC | GLOC+16~ |
| ELOC( | GLOC+21*, GLOC+28 |
| FILE | CPTSRH~, CPTSRH+1, CPTSRH+3 |
| FROM | PROV+17~, PROV+18*, PROV+19*, PROV+20, PROV+22, PROV+24, PROV+27 |
| I | PROV+17~*, PROV+19, PROV+22*, PROV+24*, PROV+27*, LEX+9~, LEX+26*, LEX+28*, LEX+31, LEX+34 |
| ICD | LEX+9~, LEX+26, LEX+34, ICD+1*, ICD+3 |
| ICDIEN | LEX+9~, LEX+25, LEX+26, LEX+32, LEX+34, ICD+3* |
| IEN | PROV+17~, PROV+20*, PROV+21, PROV+22, PROV+23, PROV+24, PROV+25, PROV+26, PROV+27, LEX+9~ , LEX+15*, LEX+17, LEX+24*, LEX+30*, LEX+31*, LEX+34, ICD+1 |
| ILST | LEX+9~, LEX+24*, LEX+26, LEX+28, LEX+33*, LEX+34 |
| IMP | LEX+9~, LEX+18* |
| LEX | LEX+9~ |
| LEX("LIST" | LEX+22, LEX+24, LEX+26 |
| LOC | GLOC+16~, GLOC+19*, GLOC+21*, GLOC+22*, GLOC+23*, GLOC+26, GLOC+28, GLOC+30, GLOC+31, GLOC+32 |
| MODE | DTPD+8~, DTPD+9*, DTPD+12, DTPD+20 |
| NODE | GLOC+16~, GLOC+23*, GLOC+25, GLOC+26, GLOC+29, GLOC+32 |
| PXSTR | PXFND+11~, PXFND+13*, PXFND+16, PXFND+17, PXFND+18 |
| >> REPORT | PROV+18*, PROV+22, PROV+24 |
| RESULTS | GLOC~, GLOC+33*, CPTFND~, CPTFND+19*, PXFND~, PXFND+29*, DTPD~, DTPD+12*, DTPD+20*, ECDEL~ , ECDEL+19* |
| ST | GLOC+16~, GLOC+29*, GLOC+32 |
| STAT | GLOC+16~, GLOC+19*, GLOC+27 |
| U | GLOC+19, GLOC+21, GLOC+25, GLOC+26, GLOC+29, GLOC+30, GLOC+31, GLOC+32, CPTFND+13, CPTFND+17 , PXFND+13, PXFND+22, PXFND+27, PROV+26, LEX+17, LEX+26, LEX+34, DTPD+9, DTPD+13, DTPD+14 , DTPD+15, DTPD+16, DTPD+17 |
| >> ZTDESC | DTPD+21* |
| ZTDTH | DTPD+8~, DTPD+21* |
| ZTIO | DTPD+8~, DTPD+21* |
| ZTRTN | DTPD+8~, DTPD+21* |
| ZTSK | DTPD+8~, DTPD+23, DTPD+24 |