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

Package: Scheduling

Routine: SDAMBMR2


Information

SDAMBMR2 ;ALB/MLI - PRINT AMBULATORY PROCEDURES MANAGEMENT REPORTS ; 4/27/00 12:14pm

Source Information

Source file <SDAMBMR2.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
DRG Grouper 2 ($$CPT,$$CPTD)^ICPTCOD  $$MOD^ICPTMOD  
Kernel 1 $$FMTE^XLFDT  
Registration 1 ^VADATE  
Scheduling 1 P^SDAMBMR3  
VA Fileman 1 ^%DT  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Scheduling 3 SDAMBMR  SDAMBMR1  SDAMBMR3  

Entry Points

Name Comments DBIA/ICR reference
C
SET
CONT
HD2
LIST
TOT
CD
1
3
2
PNAME
T
C2
HD3
DT
N
PN
HD

External References

Name Field # of Occurrence
^%DT CD+2, LIST+1, N+1
$$CPT^ICPTCOD CD+3, CD+4, LIST+5
$$CPTD^ICPTCOD N+6
$$MOD^ICPTMOD CD+12, LIST+10
P^SDAMBMR3 1, 1+1, 2+1, 3+1, TOT
^VADATE PNAME+1, C2+1
$$FMTE^XLFDT DT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!?20,"AMBULATORY PROCEDURE MANAGEMENT REPORTS",!!,"DATE RANGE: ",SDB,"-",SDE,?50,"DATE PRINTED: ",SDNOW,!,$S(SDFL:SDSTR_" NAME:",1:"ALL "_SDSTR_"S"),?16,SDT,?71,"PAGE: ",$J(SDPG,3)
  • Line Location: HD+0
Function Call: WRITE
  • Prompt: !,?8,$E(K,1,18),?28,$P(SDINFO,U,10),?39,"AGE: ",$J($P(SDINFO,U,2),3),?49,$S($P(SDINFO,U)=1:"VETERAN",1:"NON-VET"),?58,$P(SDINFO,U,3),?61
  • Line Location: PNAME+1
Function Call: WRITE
  • Prompt: VADATE("E")
  • Line Location: PNAME+1
Function Call: WRITE
  • Prompt: !!,$G(KK)
  • Line Location: CD+5
Function Call: WRITE
  • Prompt: ?7,$E(SDN,1,72)
  • Line Location: CD+6
Function Call: WRITE
  • Prompt: !?2,MODCODE,?8,$E(MODTEXT,1,65)
  • Line Location: CD+16
Function Call: WRITE
  • Prompt: !
  • Line Location: CD+18
Function Call: READ
  • Prompt: "Enter <RETURN> to continue"
  • Formatting: !?20
  • Timeout: DTIME
  • Variable: SDFG1
  • Line Location: HD2+0
Function Call: WRITE
  • Prompt: !!?25,"SUMMARY OF PROCEDURES PERFORMED",!
  • Line Location: HD2+1
Function Call: WRITE
  • Prompt: Y
  • Line Location: HD2+1
Function Call: READ
  • Prompt: "Enter <RETURN> to continue"
  • Formatting: !?20
  • Timeout: DTIME
  • Variable: SDFG1
  • Line Location: HD3+0
Function Call: WRITE
  • Prompt: !!?31,"SUMMARY BY PATIENT",!,"NAME",?27,"SSN",?38,"AGE",?43,"VET/NON",?53,"SEX",?60,"DATE/TIME OF STOP",!
  • Line Location: HD3+1
Function Call: WRITE
  • Prompt: Y
  • Line Location: HD3+1
Function Call: WRITE
  • Prompt: !?8,"TOTAL PROCEDURES==>",?30,"VETERAN:",?39,$J($S($D(^TMP($J,"*PRO",I,J,1)):$P(^(1),"^",1),1:0),4),?47,"NON-VETERAN:",$J($S($D(^(0)):$P(^(0),"^",1),1:0),4)
  • Line Location: T+0
Function Call: WRITE
  • Prompt: !!,$E(J,1,24),?27,$P(SDINFO,U,10)
  • Line Location: C2+0
Function Call: WRITE
  • Prompt: ?38,$P(SDINFO,U),?43,$S(L=1:"VETERAN",1:"NON-VET"),?52,$S($P(SDINFO,U,2)="M":" MALE",1:"FEMALE"),?60
  • Line Location: C2+1
Function Call: WRITE
  • Prompt: VADATE("E")
  • Line Location: C2+1
Function Call: WRITE
  • Prompt: !?5,$P($$CPT^ICPTCOD(SDPRO,ICPTVDT),U,2)
  • Line Location: LIST+5
Function Call: WRITE
  • Prompt: ?12,$E(SDN,1,67)
  • Line Location: LIST+6
Function Call: WRITE
  • Prompt: !?7,MODCODE,?13,$E(MODTEXT,1,65)
  • Line Location: LIST+14
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+16

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J 1, 1+1, 2+1, 3+1, CONT, PN+1, CD+8, CD+9, T, T+1
, C

Label References

Name Line Occurrences
2 1
3 2
C CONT
C2 C
CD 2+1
CONT 3+1
DT 1
HD HD2+1, HD3+1, LIST+4
HD2 2+1, PN+1, CD+1
HD3 3+1, CONT
LIST C2+1
N CD+6, LIST+5
PN 2+1
PNAME PN+1
SET 1+1, 2+1, 3+1
T 2+1
TOT 1+2, 2+2, 3+2

Naked Globals

Name Field # of Occurrence
^( PN+1, C
^("T" 1
^(0 T, T+1
^(1 T, T+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PNAME~, PNAME+1*
>> %DT CD+2*, LIST+1*, N+1*
BLKLN CD~, CD+1*, LIST~, LIST+2*
DATA N~, N+2*
>> DESCR( N+8
DT CD+2, LIST+1, N+1
DTIME HD2, HD3
I 1*, 1+1*, 2*, 2+1*, 3*, 3+1*, CONT, PN+1, CD+1, CD+6*
, CD+8, CD+9, SET, T, T+1, C, LIST+4, LIST+5*, LIST+6*, TOT!
, N+6
>> I1 1*, 2+1*, 3+1*
ICPTVDT CD~, CD+2*, CD+3, CD+4, CD+12, LIST~, LIST+1*, LIST+5, LIST+10, N~
, N+1*, N+6
IOF HD
IOSL 2+1, CONT, PN+1, CD+1, LIST+4
IOST HD2, HD3
>> J 2+1*, CONT*, PN+1, CD+3*, CD+4, CD+6, CD+8, CD+9, T, T+1
, C, C2
>> J1 CONT*
>> K CONT*, PN*, PN+1*, PNAME+1, C
>> K1 CONT*, PN+1*
KK CD~, CD+4*, CD+5
>> L PN*, PN+1*, C*, C2+1
>> L1 PN+1*
>> M PN+1*, PNAME+1, C*, C2+1
MODCODE CD~, CD+14*, CD+16, LIST~, LIST+12*, LIST+14
MODINFO CD~, CD+11*, CD+12*, CD+13, CD+14, CD+15, LIST~, LIST+9*, LIST+10*, LIST+11
, LIST+12, LIST+13
MODTEXT CD~, CD+15*, CD+16, LIST~, LIST+13*, LIST+14
MODVAL CD~, CD+1*, CD+8*, CD+9*, CD+10, CD+11, LIST~, LIST+8*, LIST+9
>> PR LIST+3*, LIST+8
>> SDAS 1+1
>> SDB HD, DT*
SDCOUNT N~, N+7*, N+8
SDDATA N~, N+6*, N+7
>> SDE HD, DT*, CD+2, LIST+1, N+1
>> SDFG 1, 1+1, 2+1, 3+1, CONT, PN+1, CD+1, HD2*, HD3*, LIST+4
, TOT
>> SDFG1 HD2*, HD3*
>> SDFL HD, 1*, 3*, 3+1*, SET*, TOT*
>> SDHI CD+1*, CD+6, LIST+4*, LIST+6
>> SDINFO PN+1*, PNAME+1, C*, C2, C2+1, LIST+3
>> SDINFO( LIST+8
SDIX N~, N+8*
SDJJ CD~, CD+11*, LIST~, LIST+9*
>> SDMOD CD+7, LIST+7
>> SDN CD+6, LIST+6, N+2*, N+8*, N+9*
>> SDNOW HD
>> SDPG HD*
>> SDPN 2
>> SDPRO LIST+3*, LIST+5
>> SDPT 2+1
>> SDRT 1
>> SDS( 1+1
>> SDSC 1, 1+1, 2+1, 3, SET
>> SDSTR HD, 1*, 3*
>> SDT HD, 1*, SET*, TOT*
U PNAME+1, C2, C2+1, LIST+3, LIST+5
>> VADAT("W" PNAME+1*, C2+1*
>> VADATE("E" PNAME+1, C2+1
>> VAUTC 1
>> VAUTC( 1
>> X CD+2*, LIST+1*, N+1*
Y CD+2, HD2+1!*, HD3+1!*, LIST+1, N+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All