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

Package: Patient Care Component Reports

Routine: APCLBIN1


Information

APCLBIN1 ; IHS/CMI/LAB - MAKES AGE BIN REPORTS ;

Source Information

Source file <APCLBIN1.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Kernel 1 ^%ZISC  
Patient Care Component Reports 1 HDR^APCLAGE  

Entry Points

Name Comments DBIA/ICR reference
PAUSE
SETA
HEADER
REP
ATT
FAIL
SETV
BLIST
EXIT
B1
VAR
BLVAR
SETBIN ;

External References

Name Field # of Occurrence
^%ZISC BLVAR+7, BLVAR+8
HDR^APCLAGE HEADER+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *13,APCLZZZ
  • Line Location: VAR+3
Function Call: WRITE
  • Prompt: " (",APCLXXX,")"
  • Line Location: VAR+3
Function Call: WRITE
  • Prompt: !!!!,"CRUNCH, CRUNCH....",!!
  • Line Location: REP+3
Function Call: WRITE
  • Prompt: *13,APCLZZZ," (",APCLXXX,")"
  • Line Location: FAIL+1
Function Call: WRITE
  • Prompt: !!,"<>"
  • Line Location: BLIST+0
Function Call: WRITE
  • Prompt: !,$E(N,1,12)
  • Line Location: BLVAR+2
Function Call: WRITE
  • Prompt: !!,"TOTAL"
  • Line Location: BLVAR+3
Function Call: WRITE
  • Prompt: ?J,$J(^(I),6)
  • Line Location: BLVAR+4
Function Call: WRITE
  • Prompt: ?J,$J(APCLZ,6)
  • Line Location: BLVAR+5
Function Call: WRITE
  • Prompt: !!,APCLXXX," ENTR",$S(APCLXXX>1:"IES",1:"Y")," NOT INCLUDED BECAUSE OF BAD POINTERS OR LACK OF DOB"
  • Line Location: BLVAR+6
Function Call: WRITE
  • Prompt: ?J,$J($S($D(@G@(1,N,I)):^(I),1:"."),6)
  • Line Location: B1+0
Function Call: WRITE
  • Prompt: ?(J+7),$J(@G@("V",N),6)
  • Line Location: B1+0
Function Call: READ
  • Prompt: "<>"
  • Formatting: !
  • Timeout: DTIME
  • Variable: APCLQ
  • Line Location: PAUSE+0
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: APCLNN
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: ?APCLJ,$S($P(APCLX,":")=$P(APCLX,":",2):" ",1:($P(APCLX,":")_"-")),$P(APCLX,":",2)
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: ?(APCLJ+2),"TOT"
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !,APCLX
  • Line Location: HEADER+10

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] VAR, VAR+1
^TMP("APCLAGE" REP+4!, EXIT!

Label References

Name Line Occurrences
ATT VAR+5, REP+8
B1 BLVAR+2
EXIT BLVAR+7
FAIL VAR, VAR+2
HEADER BLIST+2, PAUSE+1
PAUSE BLVAR+2
SETA REP+5
SETBIN REP
SETV ATT+1

Naked Globals

Name Field # of Occurrence
^( SETV*, SETV+3*, BLVAR+4, B1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A EXIT!
>> APCLA REP+1*, REP+6, REP+7, SETA+1*, SETA+2*, ATT*, ATT+1
APCLAGEG REP, REP+1, EXIT!, B1, HEADER+6, SETBIN+1*
APCLAV EXIT!
APCLBIN VAR+5, REP+6*, ATT, EXIT!
APCLDEEP VAR, EXIT!
APCLDFN VAR*, VAR+1, EXIT!
APCLI HEADER+6*, HEADER+8*, HEADER+11!
APCLJ HEADER+7*, HEADER+8*, HEADER+9, HEADER+11!
APCLLINE BLVAR+1*, BLVAR+2*, EXIT!, PAUSE*
APCLNN REP+1*, REP+5, ATT+1*, EXIT!, HEADER+4*, HEADER+5, HEADER+6*, HEADER+8
APCLQ PAUSE*!
APCLSNA EXIT!, HEADER+3*, HEADER+4
APCLSNO EXIT!
APCLVAL VAR*, VAR+4*, SETV, SETV+1, SETV+3, SETV+4, EXIT!
APCLX REP+5*, SETA, ATT+1*, BLVAR+8*, HEADER+8*, HEADER+10*, HEADER+11!
APCLXXX APCLBIN1+2*, VAR+3, FAIL*, FAIL+1, BLVAR+6, EXIT!
>> APCLY SETA*, SETA+2, ATT+1*
>> APCLZ SETA*, SETA+2, BLVAR+4*, BLVAR+5
APCLZZZ APCLBIN1+2*, APCLBIN1+3*, VAR+3, FAIL+1, EXIT!
>> DD0 VAR
>> DIOEND REP+2*
DOB VAR+1*, VAR+2, ATT+1, EXIT!
DT SETA+2
DTIME BLVAR+8, PAUSE
G REP+6*, REP+7, SETV, SETV+1, SETV+2, SETV+3, SETV+4, BLVAR*, BLVAR+2, BLVAR+4
, EXIT!, B1
>> I REP+5*, REP+7*, ATT+1*, SETV+2, SETV+3, SETV+4, BLVAR+2*, BLVAR+4*, B1*
IOF BLVAR+7, HEADER
IOSL BLVAR+2
IOST VAR+3, REP+3, BLIST, BLVAR+7, PAUSE
>> J BLVAR+4*, BLVAR+5, B1*
N BLVAR*, BLVAR+2*, EXIT!, B1
U VAR+1, PAUSE
X EXIT!
Y VAR, EXIT!
Z EXIT!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All