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

Package: Patient Care Component Reports

Routine: APCLVLP1


Information

APCLVLP1 ; IHS/CMI/LAB - CONT OF APCLVLP ;

Source Information

Source file <APCLVLP1.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Patient Care Component Reports 3 SETRECS^APCLSTMP  SETRECS^APCLSTMV  PAUSE^APCLVL01  
VA Fileman 1 ^DIWP  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Patient Care Component Reports 2 APCLVLP  APCLVLP8  

Entry Points

Name Comments DBIA/ICR reference
COUNT ;if COUNTING entries only
PAUSE
SHOW ;
COVPAGE ;EP
WP ;EP - Entry point to print wp fields pass node in APCLNODE
SHOWP ;

External References

Name Field # of Occurrence
SETRECS^APCLSTMP SHOWP+7, SHOWP+8
SETRECS^APCLSTMV SHOWP+9
PAUSE^APCLVL01 SHOW+7, SHOWP+2, SHOWP+11, SHOWP+13, SHOWP+15, SHOWP+16, SHOWP+28, SHOWP+30, SHOWP+33, SHOWP+35
, PAUSE, COUNT+1
^DIWP WP+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?20,"PCC MANAGEMENT REPORTS ",$S(APCLPTVS="P":"PATIENT",1:"VISIT")," ",$S(APCLCTYP="D":"LISTING",1:"COUNT")
  • Line Location: COVPAGE+2
Function Call: WRITE
  • Prompt: !?34,"SUMMARY PAGE"
  • Line Location: COVPAGE+3
Function Call: WRITE
  • Prompt: !!,"REPORT REQUESTED BY: ",$P(^VA(200,DUZ,0),U),!
  • Line Location: COVPAGE+4
Function Call: WRITE
  • Prompt: !,$S(APCLPTVS="P":"PATIENT",1:"VISIT")," Selection Criteria"
  • Line Location: SHOW+1
Function Call: WRITE
  • Prompt: !!?6,"Search Template used: ",$P(^DIBT(APCLSEAT,0),U),!
  • Line Location: SHOW+3
Function Call: WRITE
  • Prompt: !!?6,"CMS Register: ",$P(^ACM(41.1,APCLCMSR,0),U)
  • Line Location: SHOW+4
Function Call: WRITE
  • Prompt: " Status: ",$O(APCLCMSS(""))
  • Line Location: SHOW+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SHOW+7
Function Call: WRITE
  • Prompt: " ; "
  • Condition for execution: C'=1&(APCLY'="")
  • Line Location: SHOW+9
Function Call: WRITE
  • Prompt: X
  • Line Location: SHOW+9
Function Call: WRITE
  • Prompt: !!,"REPORT/OUTPUT TYPE",!
  • Line Location: SHOWP+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SHOWP+2
Function Call: WRITE
  • Prompt: !,?6,"SEARCH TEMPLATE Created: "_$P(^DIBT(APCLSTMP,0),U),!
  • Line Location: SHOWP+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SHOWP+11
Function Call: WRITE
  • Prompt: !!,"NO DATA TO REPORT.",!
  • Line Location: SHOWP+13
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $D(IOF)
  • Line Location: SHOWP+13
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SHOWP+16
Function Call: WRITE
  • Prompt: ?6,"Detailed Listing containing"
  • Line Location: SHOWP+17
Function Call: WRITE
  • Prompt: !?6,"Delimited output file will contain:"
  • Line Location: SHOWP+25
Function Call: WRITE
  • Prompt: " ("
  • Line Location: SHOWP+29
Function Call: WRITE
  • Prompt: $P(^APCLVRPT(APCLRPT,12,X,0),U,2),")"
  • Line Location: SHOWP+29
Function Call: WRITE
  • Prompt: !?10," TOTAL column width: ",APCLTCW
  • Line Location: SHOWP+31
Function Call: WRITE
  • Prompt: !!,$S(APCLPTVS="V":"Visits",1:"Patients")," will be SORTED by: ",$P(^APCLVSTS(APCLSORT,0),U),!
  • Line Location: SHOWP+34
Function Call: WRITE
  • Prompt: !?6,"Each ",$P(^APCLVSTS(APCLSORT,0),U)," will be on a separate page.",!
  • Line Location: SHOWP+36
Function Call: WRITE
  • Prompt: !!,"NO DATA TO REPORT.",!
  • Line Location: SHOWP+37
Function Call: WRITE
  • Prompt: !!!,"Total ",$S(APCLPTVS="P":"Patients",1:"Visits"),": ",APCLRCNT
  • Line Location: SHOWP+39
Function Call: WRITE
  • Prompt: !,"Total Patients: ",APCLPTCT
  • Line Location: SHOWP+40
Function Call: WRITE
  • Prompt: ?6,"Totals Displayed"
  • Line Location: COUNT+2
Function Call: WRITE
  • Prompt: !!!,"NO DATA TO REPORT.",!
  • Line Location: COUNT+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACM(41.1 - [#9002241.1] SHOW+4
^APCLVRPT - [#9001003.8] SHOW+5, SHOW+6, SHOW+9, SHOWP+26, SHOWP+27, SHOWP+29, WP+5
^APCLVSTS - [#9001003.7] SHOW+8, SHOW+9, SHOWP+12, SHOWP+29, SHOWP+34, SHOWP+36
^DIBT( SHOW+3, SHOWP+6
^DIC - [#1] WP+4
^UTILITY($J WP+2!, WP+8, WP+11!
^VA(200 - [#200] COVPAGE+4
^XTMP("APCLVL" SHOWP+13, SHOWP+37, COUNT+3

Label References

Name Line Occurrences
COUNT SHOWP+5, SHOWP+7, SHOWP+8, SHOWP+9
PAUSE SHOWP+26
SHOWP SHOW+5

Naked Globals

Name Field # of Occurrence
^(2 SHOW+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCLBDD SHOW+2
>> APCLBTH SHOWP+13, SHOWP+37, COUNT+3
>> APCLCMSR SHOW+4
>> APCLCMSS SHOW+4
>> APCLCMSS("" SHOW+4
>> APCLCRIT SHOWP+27*, SHOWP+29
>> APCLCTYP COVPAGE+2, SHOWP+2, SHOWP+5, SHOWP+6, SHOWP+7, SHOWP+8, SHOWP+9, SHOWP+10, SHOWP+15, SHOWP+17
, SHOWP+18, SHOWP+25, SHOWP+29, SHOWP+31, SHOWP+38
APCLDA WP+4, WP+11!
>> APCLDELF SHOWP+24
>> APCLEDD SHOW+2
APCLFILE WP+4, WP+11!
>> APCLG WP+4*, WP+5
APCLG1 WP+4*, WP+11!
APCLGR WP+4*, WP+6, WP+11!
>> APCLI SHOW+6*, SHOW+8, SHOW+9, SHOWP+27*, WP+5
>> APCLJOB SHOWP+13, SHOWP+37, COUNT+3
APCLNODE WP+4, WP+11!
>> APCLOUTF SHOWP+3
>> APCLPCNT WP+8*, WP+9*
>> APCLPRNM( WP+8*
>> APCLPTCT SHOWP+40, COUNT+5
>> APCLPTVS COVPAGE+2, SHOW+1, SHOWP+7, SHOWP+9, SHOWP+34, SHOWP+39, SHOWP+40, COUNT+4, COUNT+5
APCLQ SHOW+9!, SHOW+10!
>> APCLRCNT SHOWP+4, SHOWP+39, COUNT+4
APCLRLX WP+3*, WP+5*, WP+11!
>> APCLRPT SHOW+5, SHOW+6, SHOW+9, SHOWP+26, SHOWP+27, SHOWP+29, WP+5
>> APCLSEAT SHOW+3
>> APCLSORT SHOWP+12, SHOWP+32, SHOWP+34, SHOWP+36
>> APCLSPAG SHOWP+36
>> APCLSTMP SHOWP+6
>> APCLTCW SHOWP+31
>> APCLTYPE SHOW+2, SHOW+3, SHOW+4
>> APCLY SHOW+9*
>> C SHOW+9*
DIWF WP+10!
DIWL WP+5*, WP+8, WP+10!
DIWR WP+5*, WP+10!
DUZ COVPAGE+4
IOF SHOW+7, SHOWP+2, SHOWP+11, SHOWP+13, SHOWP+15, SHOWP+16, SHOWP+28, SHOWP+30, SHOWP+33, SHOWP+35
, PAUSE, COUNT+1
IOSL SHOW+7, SHOWP+11, SHOWP+16, SHOWP+28, SHOWP+30, SHOWP+33, SHOWP+35, COUNT+1
U COVPAGE+4, SHOW+3, SHOW+4, SHOW+8, SHOWP+6, SHOWP+12, SHOWP+27, SHOWP+29, SHOWP+34, SHOWP+36
, WP+5
>> X SHOW+9*, SHOWP+29*, WP+6*
>> Y WP+6*
Z WP+8*, WP+10!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All