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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PXRRMDR

Package: PCE Patient Care Encounter

Routine: PXRRMDR


Information

PXRRMDR ;BP/WLC - PCE Missing Data Report ;11 Feb 04 10:10 AM

Source Information

Source file <PXRRMDR.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  
PCE Patient Care Encounter 3 $$CSDATE^PXDXUTL  ENCEVENT^PXKENC  (DATASRC,PRINT)^PXRRMDR1  
VA FileMan 3 ^%DT  $$GET1^DIQ  ^DIR  
Registration 2 $$CVEDT^DGCV  $$TESTPAT^VADPT  
Scheduling 2 ($$AO,$$EC,$$HNC,$$IR,$$MST,$$SC,$$SHAD)^SDCO22  $$EXOE^SDCOU2  
CPT HCPCS Codes 1 $$CPT^ICPTCOD  
DRG Grouper 1 $$ICDDATA^ICDXCODE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
PCE Patient Care Encounter 1 PXRRMDR  

Entry Points

Name Comments DBIA/ICR reference
EN
RUN ;
EDT
CTR(X) ;
6 ; Default Sort
STOP ;Check for stop task request
SET1(PR) ; set temp global
1 ; Data Source
3 ; ICD
2 ; CPT
EXIT
4
EVAL ;
SET(SDX,PRIO) ;
DISPLYP(PXCECPT) ;
DISPLYDX(PXCEPOV) ;
5 ; Eligibility

External References

Name Field # of Occurrence
^%DT EN+8, EDT
^%ZIS EDT+10
HOME^%ZIS EN+4, EDT+16
^%ZISC RUN+39
^%ZTLOAD EDT+15
$$S^%ZTLOAD STOP+1
$$CVEDT^DGCV RUN+26
$$GET1^DIQ RUN+19, EVAL+1, EVAL+4, 1+1, 2+3, 3+3, 4, 5+1, SET1+2
^DIR EDT+6, EDT+7
$$ICDDATA^ICDXCODE DISPLYDX+2, 3+4
$$CPT^ICPTCOD DISPLYP+2
$$CSDATE^PXDXUTL DISPLYDX+2, 3+4
ENCEVENT^PXKENC RUN+9
DATASRC^PXRRMDR1 EN+6
PRINT^PXRRMDR1 RUN+39
$$AO^SDCO22 RUN+20
$$EC^SDCO22 RUN+23
$$HNC^SDCO22 RUN+25
$$IR^SDCO22 RUN+21
$$MST^SDCO22 RUN+24
$$SC^SDCO22 RUN+22
$$SHAD^SDCO22 RUN+27
$$EXOE^SDCOU2 RUN+14
$$TESTPAT^VADPT RUN+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: @IOF,!!
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !!!
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !
  • Line Location: EDT+0
Function Call: WRITE
  • Prompt: !!,$C(7),"End date cannot be before begin date!",!
  • Line Location: EDT+1
Function Call: WRITE
  • Prompt: @IOF,!!
  • Line Location: EDT+3
Function Call: WRITE
  • Prompt: !!!
  • Line Location: EDT+4
Function Call: WRITE
  • Prompt: !,"("_LOOP_") "_DESC
  • Line Location: EDT+5
Function Call: WRITE
  • Prompt: !
  • Line Location: EDT+6
Function Call: WRITE
  • Prompt: !!,"This report requires 132 column output.",!
  • Line Location: EDT+9
Function Call: WRITE
  • Prompt: !!,$S($D(ZTSK):"This job has been queued. The task number is "_ZTSK_".",1:"Unable to queue this job.")
  • Line Location: EDT+15
Function Call: WRITE
  • Prompt: ?(IOM-$L(X))\2,X
  • Line Location: CTR+1
Routine Call
  • %ZIS
  • Line Location:
    • EN+4
    • EDT+16
Routine Call
  • DIR
  • Line Location:
    • EDT+6
    • EDT+7
Routine Call
  • %ZIS
  • Line Location:
    • EDT+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNVSIT - [#9000010] GET1^DIQ
^AUPNVPRV - [#9000010.06] GET1^DIQ
^AUPNVPOV - [#9000010.07] GET1^DIQ
^AUPNVCPT - [#9000010.18] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVCPT("AD" 2+2
^AUPNVPOV("AD" 3+2
^AUPNVPRV("AD" EVAL+3
^AUPNVSIT - [#9000010] RUN+7, DISPLYP+2
^AUPNVSIT("ADEL" RUN+5, RUN+6
^DD("DD" SET1+2
^SCE - [#409.68] RUN+12
^SCE("AVSIT" RUN+12
^TMP("PXCRPW" RUN+2!, RUN+4!, RUN+40!, SET1+4*
^TMP("PXKENC" RUN+10, RUN+11, RUN+13, RUN+15, RUN+16, RUN+17, RUN+18, RUN+28, RUN+30, RUN+31
, RUN+32, RUN+33, RUN+34, RUN+35, RUN+36, RUN+37, RUN+38

Label References

Name Line Occurrences
$$CTR EN+5, EN+7, EDT+3
$$DISPLYDX RUN+28, RUN+31, RUN+32, RUN+33, RUN+34, RUN+35, RUN+36, RUN+37, RUN+38
$$DISPLYP RUN+17
@( SET+5
EDT EDT+1
EVAL SET+3
EXIT EN+6, EN+8, EDT, EDT+11
SET RUN+13, RUN+17, RUN+28, RUN+31, RUN+32, RUN+33, RUN+34, RUN+35, RUN+36, RUN+37
, RUN+38
SET1 SET+4, 1+3, 2+4, 3+6, 4+2, 5+3, 6+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT EN~, EN+8*
%DT("A" EN+8*, EDT*
>> %ZIS EDT+10*
A1 SET+1~, SET+4*, 1+1*, 1+2*, 2+4*, 3+5*, 4*, 4+1*, 5+1*, 5+2*
, 6+1*, SET1+1*, SET1+4
CBU EN~
CLASSIF RUN+3~, RUN+19!, RUN+28
CLASSIF( RUN+29
CLASSIF(1 RUN+20*
CLASSIF(2 RUN+21*
CLASSIF(3 RUN+22*
CLASSIF(4 RUN+23*
CLASSIF(5 RUN+24*
CLASSIF(6 RUN+25*
CLASSIF(7 RUN+26*
CLASSIF(8 RUN+27*
CNT EN~, RUN+15*, RUN+16*, RUN+17
CPT 2+1~, 2+2*, 2+3
CPT1 2+1~, 2+3*, 2+4
CPTSTR DISPLYP+1~, DISPLYP+2*, DISPLYP+3
>> DESC EDT+5*
>> DFN RUN+19*, RUN+20, RUN+21, RUN+22, RUN+23, RUN+24, RUN+25, RUN+26, RUN+27
DIR EN~, EDT+4!, RUN+2!
DIR("A" EDT+6*, EDT+7*
DIR("B" EDT+7*
DIR(0 EDT+6*, EDT+7*
>> DIRUT EDT+6, EDT+7
DT EN~
DTOUT EN~
DUOUT EN~
EDT EN~
>> FF EN+4
I RUN+3~, RUN+15~*, RUN+16, RUN+17, RUN+18*, RUN+28, RUN+30, RUN+31, RUN+32, RUN+33
, RUN+34, RUN+35, RUN+36, RUN+37, RUN+38
ICD 3+1~*, 3+2*, 3+3
ICDCD 3+1~*, 3+3*, 3+4, 3+5
ICDDATA 3+1~, 3+4*, 3+5
ICDSTR DISPLYDX+1~, DISPLYDX+2*, DISPLYDX+3
IO RUN+1, RUN+39
IO("Q" EDT+11, EDT+16!
IOF EN+4*, EN+7, EDT+3
IOM CTR+1
J RUN+15~, RUN+16*, RUN+18*, RUN+29*, RUN+31, RUN+32, RUN+33, RUN+34, RUN+35, RUN+36
, RUN+37, RUN+38
LOC EN~
LOOP EDT+5*, RUN+3~
OE RUN+12~*, RUN+14
PAT EN~
POP EN~, EN+2*, EN+6, EDT+10
PR SET1~, SET1+4
PRIO EN~, SET~, SET+2*, SET+4, 1+3, 2+4, 3+6, 4+2, 5+3, 6+1
PROV EN~
>> PRPRV EVAL+5
PX EN~
PX("BDT" EN+8*, EDT+1, RUN+4
PX("EDT" EDT+2*, RUN+5
PXCECPT DISPLYP~, DISPLYP+2
PXCEPOV DISPLYDX~, DISPLYDX+2
PXDS EN~, EN+3!
PXDS( RUN+8
PXDT EN~, RUN+3~, RUN+4*, RUN+5*, RUN+6, RUN+26
PXLOC EN+1~, EVAL+1*, EVAL+2*, SET1+4
>> PXOUT RUN+2*, STOP+1*
PXPAGE EN+1~, EN+2*
PXPROV EN+1~
>> PXPRV EVAL+4*, EVAL+5*, SET1+4
PXPTR EVAL+3~*, EVAL+4
>> PXSRT EDT+6*, SET+4, SET+5
RPTYP EN+1~, EDT+8*
SCEIREC RUN+30~*, RUN+31, RUN+32, RUN+33, RUN+34, RUN+35, RUN+36, RUN+37, RUN+38
SDDIV EN+1~
SDX SET~, SET1+4
SORT EN+1~
SORTHDR EN+1~, EDT+4*, EDT+5
SSN EN+1~
TY EN+1~
U EDT+5, RUN+7, RUN+10, RUN+11, RUN+12, RUN+16, RUN+17, RUN+28, RUN+31, RUN+32
, RUN+33, RUN+34, RUN+35, RUN+36, RUN+37, RUN+38, DISPLYP+2, DISPLYP+3, 3+5
VDT EN+1~, SET1+2*, SET1+3*, SET1+4
VISITS RUN+3~, RUN+7*, RUN+8
VSN RUN+3~, RUN+6*, RUN+7, RUN+9, RUN+10, RUN+11, RUN+12, RUN+13, RUN+15, RUN+16
, RUN+17, RUN+18, RUN+19, RUN+28, RUN+30, RUN+31, RUN+32, RUN+33, RUN+34, RUN+35
, RUN+36, RUN+37, RUN+38, EVAL+1, EVAL+3, DISPLYDX+2, DISPLYP+2, 1+1, 2+2, 3+2
, 3+4, 4, 5+1, SET1+2, SET1+4
X EN+1~, EN+5*, EN+7*, EDT+3*, EDT+6, CTR~, CTR+1
Y EN+1~, EN+8, EDT, EDT+1, EDT+2, EDT+8, SET1+2*
>> ZTDESC EDT+12*
>> ZTQUEUED STOP+1
>> ZTRTN EDT+12*
ZTSAVE EN+1~, EDT+16!
ZTSAVE("PX*" EDT+13*
ZTSAVE("RPTYP" EDT+14*
ZTSAVE("SORTHDR" EDT+14*
ZTSK EDT+15, EDT+16!
>> ZTSTOP STOP+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All