Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ECEFPAT

Package: Event Capture

Routine: ECEFPAT


Information

ECEFPAT ;ALB/JAM-Enter Event Capture Data Patient Filer ;9/6/19 15:40

Source Information

Source file <ECEFPAT.m>

Call Graph

Call Graph

Call Graph Total: 19

Package Total Call Graph
Event Capture 6 (PCE,PCEE)^ECBEN2U  GETCLN^ECEDF  PCETASK^ECPCEU  $$FILPRV^ECPRVMUT  $$FNDVST^ECUTL  $$PXUPD^ECUTL2  
VA FileMan 5 $$FIND1^DIC  FILE^DICN  (,CHK)^DIE  ^DIK  $$GET1^DIQ  
Kernel 3 ($$DT,$$FMADD)^XLFDT  $$PATCH^XPDUTL  $$GET^XUA4A72  
Scheduling 2 $$LOC^SCDXUAPI  $$CLNCK^SDUTL2  
CPT HCPCS Codes 1 $$CPT^ICPTCOD  
DRG Grouper 1 ($$ICDDX,$$SINFO)^ICDEX  
PCE Patient Care Encounter 1 $$DELVFILE^PXAPI  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Event Capture 2 ECDTPD  ECFLRPC  

Entry Points

Name Comments DBIA/ICR reference
FILE ;Used by the RPC broker to file patient encounter in file #721
; Uses Supported IA 1995 - allow access to $$CPT^ICPTCOD
PCE ; format PCE data to send
NEWIEN ;Create new IEN in file #721
RLCK
RECDEL ; Delete record
MSG ;Record not filed
CHKDT(FLG) ;Required Data Check
VALDATA ;validate data
CVTREAS ;119 Section added to convert procedure reason IEN in 720.4 to EC Code Screen/Procedure reason link in file 720.5.
GETVAL(SCREENO,REASNO) ;119 section added to get link from 720.5 or add it if necessary
TABLE(OPTION,RECNO) ;134 Section added to add/delete state home records from XTMP table.
STAT() ;139 Returns status of record
LED() ;139 Determine last extract date for Event Capture
OOSCLIN ;139 Create an OOS related clinic for a location and DSS unit when DSS unit is an OOS type

External References

Name Field # of Occurrence
$$FIND1^DIC OOSCLIN+4
FILE^DICN FILE+118, FILE+128, RLCK+3, RECDEL+6, RECDEL+10, GETVAL+5
^DIE FILE+81, FILE+97, FILE+141
CHK^DIE VALDATA+2, VALDATA+4, VALDATA+6, VALDATA+8, VALDATA+10, VALDATA+16, VALDATA+18, VALDATA+20
^DIK FILE+58, FILE+103, FILE+107, RECDEL+12
$$GET1^DIQ LED+4, OOSCLIN+2, OOSCLIN+3
PCE^ECBEN2U PCE+3
PCEE^ECBEN2U PCE+3
GETCLN^ECEDF FILE+67
PCETASK^ECPCEU FILE+57
$$FILPRV^ECPRVMUT FILE+111
$$FNDVST^ECUTL FILE+51
$$PXUPD^ECUTL2 FILE+132
$$ICDDX^ICDEX FILE+127
$$SINFO^ICDEX FILE+37
$$CPT^ICPTCOD FILE+75, VALDATA+13
$$DELVFILE^PXAPI FILE+55
$$LOC^SCDXUAPI OOSCLIN+5
$$CLNCK^SDUTL2 FILE+70
$$DT^XLFDT TABLE+5, LED+7
$$FMADD^XLFDT TABLE+5, LED+7
$$PATCH^XPDUTL TABLE+1
$$GET^XUA4A72 FILE+42

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] GET1^DIQ
^DIC(40.7 - [#40.7] GET1^DIQ
^SC - [#44] FIND1^DIC
^ECL - [#720.5] Classic Fileman Calls
^ECH - [#721] Classic Fileman Calls,  CHK^DIE
^ECX(727 - [#727] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(721 FILE+115, FILE+123, RECDEL+4, RECDEL+8
^DIC(9.4 - [#9.4] FILE+54
^DISV( FILE+98*, FILE+99*, FILE+130*
^EC(725 - [#725] FILE+73, VALDATA+14
^ECD - [#724] FILE+42, FILE+62, OOSCLIN+2
^ECH - [#721] FILE+46, FILE+48, FILE+80*, FILE+103, FILE+104!, FILE+107, FILE+108!, PCE+3, PCE+5, RLCK+1
^ECH(0 RLCK, RLCK+1*, RLCK+2
^ECJ("B" CVTREAS+3
^ECL("AD" GETVAL+2
^ECX(727 - [#727] LED+3
^SC - [#44] FILE+68
^TMP($J FILE+43*, FILE+46*, FILE+47!, FILE+60*, FILE+61*, FILE+71*, PCE+2*, PCE+6*, PCE+7*, MSG+1*
, CHKDT+5*, CHKDT+6!, CHKDT+10*, VALDATA+3*, VALDATA+5*, VALDATA+7*, VALDATA+9*, VALDATA+11*, VALDATA+15*, VALDATA+17*
, VALDATA+19*, VALDATA+21*, CVTREAS+3*
^XTMP("EC LED" LED+2, LED+5, LED+7*, LED+8
^XTMP("ECEFPAT" TABLE+3*, TABLE+4!, TABLE+5*

Label References

Name Line Occurrences
$$GETVAL CVTREAS+4
$$LED STAT+2
$$STAT FILE+93
CHKDT FILE+39, FILE+69
CVTREAS FILE+85
MSG FILE+62, FILE+81, FILE+97, FILE+109, FILE+112, FILE+120, FILE+134, FILE+143
NEWIEN FILE+72
OOSCLIN FILE+66
RECDEL FILE+81, FILE+97, FILE+109, FILE+112, FILE+120, FILE+134, FILE+143, PCE+5
RLCK RLCK+1
TABLE FILE+59, FILE+72, RECDEL+13

Naked Globals

Name Field # of Occurrence
^("R" PCE+5
^(0 RLCK+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C CHKDT+1~, CHKDT+2*, CHKDT+5*, CHKDT+10*
CLNAME OOSCLIN+1~, OOSCLIN+3*, OOSCLIN+4, OOSCLIN+5
CLSTR FILE+138*, FILE+139, FILE+140, FILE+142!
DA FILE+58*!, FILE+77!*, FILE+82!, FILE+83*, FILE+102*, FILE+103*, FILE+104!, FILE+106*, FILE+107*, FILE+108!
, FILE+133!, FILE+135*, NEWIEN+1~, RECDEL+11!, RECDEL+12*!
DA(1 FILE+102*, FILE+106*, FILE+115*, FILE+116, FILE+123*, FILE+124, RECDEL+4*, RECDEL+5, RECDEL+8*, RECDEL+9
DD FILE+118!, FILE+128!, FILE+133!, NEWIEN+1~, RECDEL+6!, RECDEL+10!, RECDEL+11!, GETVAL+5!
DIC FILE+116*, FILE+119!, FILE+124*, FILE+133!, NEWIEN+1~, RLCK+2*, RECDEL+5*, RECDEL+9*, RECDEL+11!, GETVAL+1~
, GETVAL+4*
DIC("DR" GETVAL+4*
DIC("P" FILE+115*, FILE+123*, RECDEL+4*, RECDEL+8*
DIC(0 FILE+115*, FILE+123*, RLCK+2*, RECDEL+4*, RECDEL+8*, GETVAL+4*
DIE FILE+77!*, FILE+82!*, FILE+142!
DIK FILE+58*!, FILE+102*, FILE+104!, FILE+106*, FILE+108!, RECDEL+12*!
DO FILE+118!, FILE+128!, FILE+133!, NEWIEN+1~, RECDEL+6!, RECDEL+10!, RECDEL+11!, GETVAL+5!
DR FILE+77!, FILE+78*, FILE+79*, FILE+82!, FILE+83*, FILE+86*, FILE+87*, FILE+88*, FILE+89*, FILE+90*
, FILE+95*, FILE+138*, FILE+140*, FILE+141*, FILE+142!
DT FILE+36
>> DTOUT FILE+81, FILE+97, FILE+109, FILE+120, FILE+134, FILE+143
DUZ FILE+98, FILE+99, FILE+130
DXCDE FILE+127*, FILE+129*, FILE+133!
DXS FILE+123*, FILE+133!
DXSIEN FILE+125*, FILE+127, FILE+128, FILE+129, FILE+130, FILE+133!
EC PCE+3!
EC(0 PCE+3*
EC2PCE FILE+51!, FILE+57!
>> EC4 FILE+67, FILE+68, FILE+70, FILE+87, FILE+132, VALDATA+20, OOSCLIN+4*, OOSCLIN+6*
>> ECC FILE+79, VALDATA+10, CVTREAS+2
ECCLN OOSCLIN+1~, OOSCLIN+5*, OOSCLIN+6
ECCPT FILE+33~, FILE+73*, FILE+75*, FILE+76*, FILE+86
ECCS FILE+34~, FILE+36*, FILE+37*, FILE+127
>> ECD FILE+42, FILE+62, FILE+79, VALDATA+8, CVTREAS+2, OOSCLIN+2
ECDA FILE+102*, FILE+103, FILE+104!, FILE+106*, FILE+107, FILE+108!
>> ECDEL FILE+47, CHKDT+6
>> ECDFN FILE+78, FILE+132, VALDATA+2
>> ECDT FILE+36, FILE+42, FILE+62*, FILE+83, FILE+127, FILE+132, VALDATA+4, VALDATA+13, STAT+3
>> ECDUZ FILE+83
>> ECDX FILE+86, FILE+98, FILE+124, VALDATA+18
>> ECDXS FILE+122, FILE+125
ECDXX FILE+124!, FILE+132, FILE+133!
ECDXX( FILE+129*
ECDXY FILE+124*, FILE+132, FILE+133!
ECERR FILE+33~, FILE+39*, FILE+40, FILE+42*, FILE+45, FILE+46*, FILE+70*, FILE+72, FILE+85, PCE+4
, CHKDT+5*, CHKDT+6*, CHKDT+10*, VALDATA+3*, VALDATA+5*, VALDATA+7*, VALDATA+9*, VALDATA+11*, VALDATA+12, VALDATA+15*
, VALDATA+17*, VALDATA+19*, VALDATA+21*, CVTREAS+3*
ECFIL FILE+34~, FILE+111*, FILE+112
ECFLG FILE+33~, FILE+39*, FILE+45*, FILE+72, FILE+101, PCE+3, RECDEL+2
>> ECFN FILE+63*, FILE+77*, FILE+78, FILE+80, FILE+83, FILE+102, FILE+104, FILE+106, FILE+108, FILE+111
, FILE+115, FILE+123, FILE+132, FILE+135, PCE+3, PCE+5, RECDEL+4, RECDEL+8, RECDEL+12, RECDEL+13
ECID FILE+33~, FILE+68*, FILE+87
ECIEN FILE+45, FILE+46, FILE+48, FILE+58, FILE+59, FILE+63, FILE+72, FILE+77!, PCE+7, RLCK+3*
, CHKDT+6
>> ECINP FILE+68*
ECINT FILE+33~
>> ECL FILE+78, FILE+132, VALDATA+6, CVTREAS+2, OOSCLIN+3, OOSCLIN+5
>> ECLASS FILE+137, FILE+140
ECM FILE+33~, FILE+63*, FILE+79
>> ECMN FILE+83, VALDATA+16
>> ECMOD FILE+114, FILE+117
ECOUT FILE+33~, FILE+111!, PCE+4
>> ECP FILE+73, FILE+80, VALDATA+13, VALDATA+14, CVTREAS+2
ECPCE FILE+33~, FILE+64*, FILE+66, FILE+69, PCE+1
ECPKG FILE+53~, FILE+54*, FILE+55
ECPRV FILE+34~, FILE+61, FILE+111
ECPRV( FILE+44*, FILE+99
ECPRV("A" FILE+99
>> ECPTSTAT FILE+68, FILE+87
>> ECPXREA2 FILE+89
>> ECPXREA3 FILE+90
>> ECPXREAS FILE+88
ECRES FILE+33~, FILE+70*, FILE+71
ECRN NEWIEN+1~, RLCK*, RLCK+1, RLCK+2
ECRRX VALDATA+1~, VALDATA+2, VALDATA+4, VALDATA+6, VALDATA+8, VALDATA+10, VALDATA+13*, VALDATA+16, VALDATA+18, VALDATA+20
ECS FILE+33~, FILE+63*, FILE+78
>> ECSHNAME FILE+95
ECSOU FILE+53~, FILE+54*, FILE+55
>> ECSOURCE FILE+72, FILE+91, FILE+95
>> ECSSID FILE+94, FILE+95
ECVAR1 FILE+51*!
>> ECVOL FILE+63*, FILE+79
ECVST FILE+48*, FILE+51, FILE+55!
ECVV FILE+55*, FILE+58!
ECX FILE+33~, FILE+40*, FILE+41, FILE+42, FILE+44, FILE+99*, FILE+117*, FILE+125*, FILE+139*, FILE+140
, RECDEL+5*, RECDEL+6*, RECDEL+9*, RECDEL+10*, RECDEL+11!
EXTNO LED+1~, LED+2*, LED+3*, LED+4, LED+7
EXTNOLED LED+1~, LED+4*, LED+6, LED+7
FLG CHKDT~, CHKDT+3, CHKDT+8
I CHKDT+1~, CHKDT+4*, CHKDT+5, CHKDT+9*, CHKDT+10, CVTREAS+1~, CVTREAS+4*
IMPDT FILE+92~, FILE+94*, FILE+95
LAST LED+1~, LED+5*, LED+6
LED STAT+1~, STAT+2*, STAT+3
LINK GETVAL+1~, GETVAL+2*, GETVAL+3, GETVAL+6*, GETVAL+7
MODIEN FILE+117*, FILE+118, FILE+119!
NODE FILE+33~, FILE+42*, FILE+62*, FILE+63, FILE+64
OLDDXS FILE+106!, RECDEL+11!
OLDDXS( FILE+107*, RECDEL+10
OLDDXS("" RECDEL+7
OLDMOD FILE+102!, RECDEL+11!
OLDMOD( FILE+103*, RECDEL+6
OLDMOD("" RECDEL+3
OPTION TABLE~, TABLE+2, TABLE+3, TABLE+4
PXUPD FILE+132*, FILE+133!
REASNO GETVAL~, GETVAL+2, GETVAL+4
RECNO TABLE~, TABLE+2, TABLE+3, TABLE+4
SCREEN CVTREAS+1~, CVTREAS+2*, CVTREAS+3
SCREENID CVTREAS+1~, CVTREAS+3*, CVTREAS+4
SCREENO GETVAL~, GETVAL+2, GETVAL+4
STATUS FILE+92~, FILE+93*, FILE+95
STOP OOSCLIN+1~, OOSCLIN+2*, OOSCLIN+3, OOSCLIN+5
STR PCE+5*, PCE+6!
U FILE+42, FILE+63, FILE+73, FILE+115, FILE+117, FILE+123, FILE+125, FILE+127, FILE+129, FILE+140
, PCE+7, RECDEL+4, RECDEL+8, VALDATA+13, LED+2, LED+5, LED+8, OOSCLIN+2
VALQUIET FILE+55*!
X FILE+118*, FILE+128*, RLCK+2*, RECDEL+6*, RECDEL+10*, GETVAL+1~, GETVAL+4*
Y RLCK+3, GETVAL+1~, GETVAL+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All