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 |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SRORACE

Package: Surgery

Routine: SRORACE


Information

SRORACE ;B'HAM ISC/ADM - PATIENT DEMOGRAPHIC INFO ; [ 04/05/04 9:47 AM ]

Source Information

Source file <SRORACE.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
Registration 1 DEM^VADPT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SROAPCA3  

Entry Points

Name Comments DBIA/ICR reference
WRAP ;Wrap multiple race entries so that wrapped line
ENTH
EXT

External References

Name Field # of Occurrence
DEM^VADPT ENTH

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," Ethnicity:"
  • Line Location: ENTH+2
Function Call: WRITE
  • Prompt: ?40,$P(VADM(11,1),U,2)
  • Line Location: ENTH+3
Function Call: WRITE
  • Prompt: ?40,"UNANSWERED"
  • Line Location: ENTH+4
Function Call: WRITE
  • Prompt: !," Race Category(ies):"
  • Line Location: ENTH+18
Function Call: WRITE
  • Prompt: ?40,"UNANSWERED"
  • Line Location: ENTH+23
Function Call: WRITE
  • Prompt: ?40,SREXT
  • Line Location: EXT+0
Function Call: WRITE
  • Prompt: $S(SREXT="":"",SREXT=1:" Day",SREXT=0:" Days",SREXT>1:" Days",1:"")
  • Condition for execution: SRFLD=247
  • Line Location: EXT+0
Function Call: WRITE
  • Prompt: ?40,X
  • Line Location: EXT+1
Function Call: WRITE
  • Prompt: ?40,$E(X,1,J-1)
  • Line Location: EXT+2

Label References

Name Line Occurrences
WRAP ENTH+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> C ENTH+7*, ENTH+8, ENTH+9, ENTH+10, ENTH+11, ENTH+12*
>> D ENTH+19*, ENTH+20, ENTH+21
>> E WRAP+3*, WRAP+4, WRAP+7, WRAP+8*
I WRAP+4*, WRAP+5, WRAP+6, WRAP+7, WRAP+10, WRAP+11, WRAP+12, EXT+1~, EXT+2*
J EXT+1~, EXT+2*
>> K WRAP+5*, WRAP+6, WRAP+7
>> N ENTH+7*, ENTH+15
>> SREXT EXT, EXT+1
>> SRFLD EXT
>> SRNUM WRAP+15*, WRAP+16*, WRAP+17
SRNUM1 ENTH+15*, ENTH+19, ENTH+25!, WRAP+15*, WRAP+17, WRAP+18*
SROL ENTH+7*, ENTH+25!, WRAP+3*
SROL( ENTH+15*, ENTH+20, ENTH+21, WRAP+17*
SROLINE ENTH+7*, ENTH+10*, ENTH+11*, ENTH+15, ENTH+16, ENTH+25!, WRAP+3, WRAP+4
SROLN ENTH+25!, WRAP+3*
SROLN( WRAP+4*, WRAP+5, WRAP+6, WRAP+7, WRAP+10
SROLN1 ENTH+25!, WRAP+3*
SROLN1( WRAP+6*, WRAP+10*, WRAP+11*, WRAP+12*, WRAP+16, WRAP+17
>> SROLNGTH WRAP+3*, WRAP+4
SRORACE ENTH+7*, ENTH+25!
SRORACE( ENTH+9*, ENTH+10, ENTH+11
SRORC ENTH+7*, ENTH+8*, ENTH+9, ENTH+25!
SROWRAP ENTH+25!, WRAP+3*, WRAP+4, WRAP+7*, WRAP+10*, WRAP+11, WRAP+12
U ENTH+3, ENTH+9
>> VADM(11 ENTH+3, ENTH+4
>> VADM(12 ENTH+8, ENTH+9, ENTH+19, ENTH+23
X EXT+1~*, EXT+2*
Y EXT+1~, EXT+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All