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

Package: Mental Health

Routine: YSASCSC


Information

YSASCSC ;692/DCL-ASI MISSING COMPOSITE SCORES ;1/23/97 11:41

Source Information

Source file <YSASCSC.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Kernel 1 $$LN^XLFMTH  
VA FileMan 1 $$GET1^DIQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Mental Health 1 YSASCSB  

Entry Points

Name Comments DBIA/ICR reference
IF(YSASIEN,YSASFLD,YSASFLG) ;pass ien and field - return content
C(X,Y,Z) ;return score/msg - pass data in X, Item # in Y and optional comment in Z.
EM(X) ;Error Message
SM(X) ;Score Message
EN ;Entry point continuation from YSASCSB
CSLS ;Composite Score for Legal Status
CSFSR ;Composite Score for Family/Social Relationships
CSPS ;Composite Score for Psychiatric Status
FF() ;Form Feed
HDR ;Header

External References

Name Field # of Occurrence
$$GET1^DIQ IF+4
$$LN^XLFMTH CSLS+18

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,"Items for Legal Composite Scores"
  • Line Location: CSLS+4
Function Call: WRITE
  • Prompt: !,"--------------------------------",!
  • Line Location: CSLS+5
Function Call: WRITE
  • Prompt: !,$$C(YSASA,"L24")
  • Line Location: CSLS+8
Function Call: WRITE
  • Prompt: !,$$C(YSASB,"L27")
  • Line Location: CSLS+10
Function Call: WRITE
  • Prompt: !,$$C(YSASC,"L28")
  • Line Location: CSLS+12
Function Call: WRITE
  • Prompt: !,$$C(YSASD,"L29")
  • Line Location: CSLS+14
Function Call: WRITE
  • Prompt: !,$$C(YSASE,"E17","<Item 17 from Employment Domain>")
  • Line Location: CSLS+16
Function Call: WRITE
  • Prompt: !!,$$EM("Legal")
  • Line Location: CSLS+17
Function Call: WRITE
  • Prompt: !!,$$SM("Legal"),$J(YSASA+YSASB+YSASC+YSASD+YSASE,6,4)
  • Line Location: CSLS+21
Function Call: WRITE
  • Prompt: !!!,"Items for Family/Social Composite Scores"
  • Line Location: CSFSR+3
Function Call: WRITE
  • Prompt: !,"----------------------------------------",!
  • Line Location: CSFSR+4
Function Call: WRITE
  • Prompt: !,$$C(YSASA,"F3")
  • Line Location: CSFSR+8
Function Call: WRITE
  • Prompt: !,$$C(YSASB,"F30")
  • Line Location: CSFSR+10
Function Call: WRITE
  • Prompt: !,$$C(YSASC,"F32")
  • Line Location: CSFSR+12
Function Call: WRITE
  • Prompt: !,$$C(YSASD,"F34")
  • Line Location: CSFSR+14
Function Call: WRITE
  • Prompt: !!,$$EM("Family/Social")
  • Line Location: CSFSR+30
Function Call: WRITE
  • Prompt: !!,$$SM("Family/Social"),$J(YSASA+YSASB+YSASC+YSASD+YSASR,6,4)
  • Line Location: CSFSR+33
Function Call: WRITE
  • Prompt: !!!,"Items for Psychiatric Composite Scores"
  • Line Location: CSPS+3
Function Call: WRITE
  • Prompt: !,"--------------------------------------",!
  • Line Location: CSPS+4
Function Call: WRITE
  • Prompt: !,$$C(YSASA,"P3")
  • Line Location: CSPS+7
Function Call: WRITE
  • Prompt: !,$$C(YSASB,"P4")
  • Line Location: CSPS+9
Function Call: WRITE
  • Prompt: !,$$C(YSASC,"P5")
  • Line Location: CSPS+11
Function Call: WRITE
  • Prompt: !,$$C(YSASD,"P6")
  • Line Location: CSPS+13
Function Call: WRITE
  • Prompt: !,$$C(YSASE,"P7")
  • Line Location: CSPS+15
Function Call: WRITE
  • Prompt: !,$$C(YSASF,"P8")
  • Line Location: CSPS+17
Function Call: WRITE
  • Prompt: !,$$C(YSASG,"P9")
  • Line Location: CSPS+19
Function Call: WRITE
  • Prompt: !,$$C(YSASH,"P10")
  • Line Location: CSPS+21
Function Call: WRITE
  • Prompt: !,$$C(YSASI,"P11")
  • Line Location: CSPS+23
Function Call: WRITE
  • Prompt: !,$$C(YSASJ,"P12")
  • Line Location: CSPS+25
Function Call: WRITE
  • Prompt: !,$$C(YSASK,"P13")
  • Line Location: CSPS+27
Function Call: WRITE
  • Prompt: !!,$$EM("Paychiatric")
  • Line Location: CSPS+28
Function Call: WRITE
  • Prompt: !!,$$SM("Psychiatric"),$J(YSASA+YSASB+YSASC+YSASD+YSASE+YSASF+YSASG+YSASH+YSASI+YSASJ+YSASK,6,4)
  • Line Location: CSPS+32
Function Call: WRITE
  • Prompt: !!,"<press <cr> to continue>"
  • Line Location: FF+4
Function Call: WRITE
  • Prompt: !,$$IF(YSASDA,.02)," ASI date of interview: ",$$IF(YSASDA,.05)
  • Line Location: HDR+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^YSTX(604 - [#604] GET1^DIQ

Label References

Name Line Occurrences
$$C CSLS+8, CSLS+10, CSLS+12, CSLS+14, CSLS+16, CSFSR+8, CSFSR+10, CSFSR+12, CSFSR+14, CSFSR+22
, CSPS+7, CSPS+9, CSPS+11, CSPS+13, CSPS+15, CSPS+17, CSPS+19, CSPS+21, CSPS+23, CSPS+25
, CSPS+27
$$EM CSLS+17, CSFSR+30, CSPS+28
$$FF CSLS+2, CSFSR+1, CSPS+1
$$IF CSLS+7, CSLS+9, CSLS+11, CSLS+13, CSLS+15, CSFSR+6, CSFSR+9, CSFSR+11, CSFSR+13, CSFSR+21
, CSPS+6, CSPS+8, CSPS+10, CSPS+12, CSPS+14, CSPS+16, CSPS+18, CSPS+20, CSPS+22, CSPS+24
, CSPS+26, HDR+1
$$SM CSLS+21, CSFSR+33, CSPS+32
CSFSR EN+1
CSLS EN+1
CSPS EN+1
HDR CSLS+3, CSFSR+2, CSPS+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIERR IF+3~
DTIME FF+5
IOF CSLS+1, FF+6
IOST CSLS+1, CSFSR+2, CSPS+2, FF+1
X C~, C+1, C+2, EM~, EM+1, SM~, SM+1, FF+3~, FF+5*, FF+7
Y C~, C+1, C+2
YSASA CSLS+6~, CSLS+7*, CSLS+8, CSLS+17, CSLS+19*, CSLS+21, CSFSR+5~, CSFSR+6*, CSFSR+7*, CSFSR+8
, CSFSR+30, CSFSR+31*, CSFSR+33, CSPS+5~, CSPS+6*, CSPS+7, CSPS+28, CSPS+29*, CSPS+32
YSASB CSLS+6~, CSLS+9*, CSLS+10, CSLS+17, CSLS+19*, CSLS+21, CSFSR+5~, CSFSR+9*, CSFSR+10, CSFSR+30
, CSFSR+31*, CSFSR+33, CSPS+5~, CSPS+8*, CSPS+9, CSPS+28, CSPS+29*, CSPS+32
YSASC CSLS+6~, CSLS+11*, CSLS+12, CSLS+17, CSLS+19*, CSLS+21, CSFSR+5~, CSFSR+11*, CSFSR+12, CSFSR+20*
, CSFSR+21, CSFSR+22, CSFSR+30, CSFSR+31*, CSFSR+33, CSPS+5~, CSPS+10*, CSPS+11, CSPS+28, CSPS+29*
, CSPS+32
YSASD CSLS+6~, CSLS+13*, CSLS+14, CSLS+17, CSLS+19*, CSLS+21, CSFSR+5~, CSFSR+13*, CSFSR+14, CSFSR+30
, CSFSR+31*, CSFSR+33, CSPS+5~, CSPS+12*, CSPS+13, CSPS+28, CSPS+29*, CSPS+32
>> YSASDA CSLS+7, CSLS+9, CSLS+11, CSLS+13, CSLS+15, CSFSR+6, CSFSR+9, CSFSR+11, CSFSR+13, CSFSR+21
, CSPS+6, CSPS+8, CSPS+10, CSPS+12, CSPS+14, CSPS+16, CSPS+18, CSPS+20, CSPS+22, CSPS+24
, CSPS+26, HDR+1
YSASE CSLS+6~, CSLS+15*, CSLS+16, CSLS+17, CSLS+18*, CSLS+20*, CSLS+21, CSPS+5~, CSPS+14*, CSPS+15
, CSPS+28, CSPS+30*, CSPS+32
YSASF CSFSR+18*, CSFSR+21, CSPS+5~, CSPS+16*, CSPS+17, CSPS+28, CSPS+30*, CSPS+32
YSASFLD IF~, IF+2, IF+4
YSASFLG IF~, IF+4
YSASG CSPS+5~, CSPS+18*, CSPS+19, CSPS+28, CSPS+30*, CSPS+32
YSASH CSPS+5~, CSPS+20*, CSPS+21, CSPS+28, CSPS+30*, CSPS+32
YSASI CSFSR+16~, CSFSR+19*, CSPS+5~, CSPS+22*, CSPS+23, CSPS+28, CSPS+31*, CSPS+32
YSASIEN IF~, IF+1, IF+4
YSASJ CSPS+5~, CSPS+24*, CSPS+25, CSPS+28, CSPS+31*, CSPS+32
YSASK CSPS+5~, CSPS+26*, CSPS+27, CSPS+28, CSPS+31*, CSPS+32
>> YSASQUIT FF+2, FF+7*
YSASR CSFSR+5~, CSFSR+17*, CSFSR+23*, CSFSR+24, CSFSR+25*, CSFSR+27, CSFSR+28*, CSFSR+30, CSFSR+32*, CSFSR+33
YSASX CSFSR+16~, CSFSR+21*, CSFSR+22, CSFSR+23, CSFSR+25
Z C~, C+1, C+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables  | All