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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ECED2

Package: Event Capture

Routine: ECED2


Information

ECED2 ;BIR/MAM,JPW-Enter Event Capture Data (cont'd) ;7 May 96

Source Information

Source file <ECED2.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Event Capture 4 ($$GETPRO,$$PRLST,KILLV,SRCHTM)^ECDSUTIL  ^ECEDF  (HDR,HDR1,MSG,MSGC)^ECEDU  PROS^ECHECK1  
CPT HCPCS Codes 1 $$CPT^ICPTCOD  

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: 1

Package Total Caller Graph
Event Capture 1 ECED1  

Entry Points

Name Comments DBIA/ICR reference
NEW ; create new procedure
LIST
PICK
P ; get procedure
P1 ;
P2 ;ask mul proc
PROS ;
LISTP
FILE ;file pro
SETP ;set proc info
SELC ; select category

External References

Name Field # of Occurrence
$$GETPRO^ECDSUTIL P2+6
$$PRLST^ECDSUTIL P2+18
KILLV^ECDSUTIL P2+7, P2+12, P2+17, P2+19, P2+23
SRCHTM^ECDSUTIL P2+8
^ECEDF FILE+2
HDR^ECEDU FILE+1
HDR1^ECEDU LISTP+2
MSG^ECEDU P+1, P2+7, P2+19
MSGC^ECEDU SELC+3, SELC+4
PROS^ECHECK1 P+2
$$CPT^ICPTCOD SETP+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,CNT_". ",?5,$P(ECC(CNT),"^",2)
  • Line Location: LIST+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PICK+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PICK+1
Function Call: WRITE
  • Prompt: !!,"Select the number corresponding to the category, or ^ to quit.",!!,"Press <RET> to continue ",!
  • Line Location: PICK+1
Function Call: WRITE
  • Prompt: !,"Category: "_ECCN,!
  • Line Location: PICK+3
Function Call: WRITE
  • Prompt: !!,"Category not defined.",!
  • Line Location: P+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: P+6
Function Call: WRITE
  • Prompt: !,"Procedure: "
  • Line Location: P1+1
Function Call: WRITE
  • Prompt: $S(ECCPT="":"",1:ECPTCD_" ")_$E(ECPN,1,50)
  • Line Location: P1+2
Function Call: WRITE
  • Prompt: !,"Available Procedures within "_ECDN_": ",!
  • Line Location: LISTP+2
Function Call: WRITE
  • Prompt: ?72,"National",!,?5,"Procedure Name",?40,"Synonym",?72,"Number",!
  • Line Location: LISTP+3
Function Call: WRITE
  • Prompt: !,CNT_".",?5,$E($P(^TMP("ECPRO",$J,CNT),"^",4),1,30),?38,$E($P(^(CNT),"^",3),1,30),?72,$P(^(CNT),"^",5)
  • Line Location: LISTP+5
Function Call: WRITE
  • Prompt: " "_$S(ECCPT="":"",1:ECPTCD_" ")_$E(ECPN,1,50)
  • Line Location: SETP+7
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SELC+1
Function Call: WRITE
  • Prompt: @IOF,!,$S(EC1:"Available Procedures",1:"Categories")_" within ",ECDN," : ",!
  • Line Location: SELC+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^EC(725 - [#725] SETP+3
^ECJ - [#720.3] SETP+9
^SC - [#44] SETP+10
^TMP("ECLKUP" SETP+11*
^TMP("ECPRO" P+3, P1+1, LISTP+5, SETP+2, SELC+4

Label References

Name Line Occurrences
@( P2+11
FILE P1+1, P2+13, P2+20
LIST PICK+1
P NEW+2, NEW+3, LIST+1
P2 P2+10
SELC LIST, LISTP+5
SETP P1+1, P2+15, P2+21

Naked Globals

Name Field # of Occurrence
^( LISTP+5, SETP+2
^(0 SETP+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT NEW+4*, LIST*, PICK+1*, P1+1*, P2+2*, P2+14*, P2+18*, P2+19, P2+20, LISTP~
, LISTP+1*, LISTP+5*, SETP+2, SETP+11
>> DIR("?" P2+5*
DTIME PICK, PICK+1, P+6, SELC+1
>> EC(1 LIST
>> EC1 NEW+1*, LIST*, P2+1*, LISTP+4*, SELC+1, SELC+2, SELC+3, SELC+4, SELC+6
>> EC4 SETP+2*, SETP+9*, SETP+10
>> EC4N SETP+10*
>> ECC NEW+2*, NEW+3*, PICK+2*, P+1, SELC+6*
>> ECC( LIST, PICK+1, PICK+2, SELC+3, SELC+6
>> ECC(0 NEW+2
>> ECC(1 NEW+2, NEW+3
>> ECC(2 NEW+3
>> ECCN NEW+2*, NEW+3*, PICK+2*, PICK+3, SELC+6*
>> ECCPT P1+2, SETP+3*, SETP+4, SETP+5, SETP+7
>> ECDN LIST, P+5, LISTP+2, SELC+2
>> ECDT SETP+5
ECHOICE NEW+1!, LIST, LIST+1, PICK+1!, P2+2!, LISTP+1!, LISTP+5, SELC+1*, SELC+5*
>> ECID SETP+10*
>> ECJJ SETP+1*
>> ECLN P+4
>> ECOUT PICK*, P+3, P+6*
>> ECP SETP+2*, SETP+3
>> ECPCNT P2+2*, P2+9*, P2+10, P2+11, P2+13, P2+14, P2+18
>> ECPN P1+2, SETP+2*, SETP+7
>> ECPNAME P2+18
>> ECPTCD P1+2, SETP+4*, SETP+5*, SETP+6*, SETP+7
ECSTOP NEW+1!, LIST+1, PICK+1!, P2+2!, LISTP+1!, SELC+1*
>> ECVOL SETP+2*
>> ECX P2+2*, P2+6*, P2+7, P2+8
>> I LIST*
IOF LIST, SELC+2
IOSL LIST, LISTP+5
>> JJ LISTP+2*
>> NATN P1+3, SETP+2*, SETP+8
>> OK NEW+1*, P2+2*, P2+16*, P2+22*
>> SYN P1+3, SETP+2*, SETP+8
U SETP+6
X NEW+4*, LIST, PICK*, PICK+1*, PICK+2, P+6*, LISTP~, LISTP+1*, LISTP+5, LISTP+6
, SELC+1*, SELC+2, SELC+3, SELC+4, SELC+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All