Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: YSASCSB

Package: Mental Health

Routine: YSASCSB


Information

YSASCSB ;692/DCL-ASI MISSING COMPOSITE SCORES ;1/23/97 11:39

Source Information

Source file <YSASCSB.m>

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(YSASDA) ;Entry point
QTEP ;Queued Task Entry Point
CSMS ;Composit Score for Medical Status
CSES ;Composit Score for Employment Status
CSA ;Composit Score for Alcohol
CSD ;Composit Score for Drug
FF() ;Form Feed
HDR ;Header

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Fields for Medical Composite Scores"
  • Line Location: CSMS+3
Function Call: WRITE
  • Prompt: !,"-----------------------------------",!
  • Line Location: CSMS+4
Function Call: WRITE
  • Prompt: !,$$C(YSASA,"M6")
  • Line Location: CSMS+7
Function Call: WRITE
  • Prompt: !,$$C(YSASB,"M7")
  • Line Location: CSMS+9
Function Call: WRITE
  • Prompt: !,$$C(YSASC,"M8")
  • Line Location: CSMS+11
Function Call: WRITE
  • Prompt: !!,$$EM("Medical")
  • Line Location: CSMS+12
Function Call: WRITE
  • Prompt: !!,$$SM("Medical"),$J((YSASA/90)+(YSASB/12)+(YSASC/12),6,4)
  • Line Location: CSMS+13
Function Call: WRITE
  • Prompt: !!!,"Items for Employment Composite Scores"
  • Line Location: CSES+1
Function Call: WRITE
  • Prompt: !,"-------------------------------------",!
  • Line Location: CSES+2
Function Call: WRITE
  • Prompt: !,$$C(YSASA,"E4")
  • Line Location: CSES+5
Function Call: WRITE
  • Prompt: !,$$C(YSASB,"E5")
  • Line Location: CSES+7
Function Call: WRITE
  • Prompt: !,$$C(YSASC,"E11")
  • Line Location: CSES+9
Function Call: WRITE
  • Prompt: !,$$C(YSASD,"E12")
  • Line Location: CSES+11
Function Call: WRITE
  • Prompt: !!,$$EM("Employment")
  • Line Location: CSES+12
Function Call: WRITE
  • Prompt: !!,$$SM("Employment"),$J(1.000-(YSASA+YSASB+YSASC+YSASD),6,4)
  • Line Location: CSES+15
Function Call: WRITE
  • Prompt: !!!,"Items for Alcohol Composite Scores"
  • Line Location: CSA+3
Function Call: WRITE
  • Prompt: !,"----------------------------------",!
  • Line Location: CSA+4
Function Call: WRITE
  • Prompt: !,$$C(YSASA,"D1")
  • Line Location: CSA+7
Function Call: WRITE
  • Prompt: !,$$C(YSASB,"D2")
  • Line Location: CSA+9
Function Call: WRITE
  • Prompt: !,$$C(YSASC,"D26")
  • Line Location: CSA+11
Function Call: WRITE
  • Prompt: !,$$C(YSASD,"D28")
  • Line Location: CSA+13
Function Call: WRITE
  • Prompt: !,$$C(YSASE,"D30")
  • Line Location: CSA+15
Function Call: WRITE
  • Prompt: !,$$C(YSASF,"D23")
  • Line Location: CSA+17
Function Call: WRITE
  • Prompt: !!,$$EM("Alcohol")
  • Line Location: CSA+18
Function Call: WRITE
  • Prompt: !!,$$SM("Alcohol"),$J(YSASA+YSASB+YSASC+YSASD+YSASE+YSASF,6,4)
  • Line Location: CSA+22
Function Call: WRITE
  • Prompt: !!!,"Items for Drug Composite Scores"
  • Line Location: CSD+3
Function Call: WRITE
  • Prompt: !,"-------------------------------",!
  • Line Location: CSD+4
Function Call: WRITE
  • Prompt: !,$$C(YSASA,"D3")
  • Line Location: CSD+7
Function Call: WRITE
  • Prompt: !,$$C(YSASB,"D4")
  • Line Location: CSD+9
Function Call: WRITE
  • Prompt: !,$$C(YSASC,"D5")
  • Line Location: CSD+11
Function Call: WRITE
  • Prompt: !,$$C(YSASD,"D6")
  • Line Location: CSD+13
Function Call: WRITE
  • Prompt: !,$$C(YSASE,"D7")
  • Line Location: CSD+15
Function Call: WRITE
  • Prompt: !,$$C(YSASF,"D8")
  • Line Location: CSD+17
Function Call: WRITE
  • Prompt: !,$$C(YSASG,"D9")
  • Line Location: CSD+19
Function Call: WRITE
  • Prompt: !,$$C(YSASH,"D10")
  • Line Location: CSD+21
Function Call: WRITE
  • Prompt: !,$$C(YSASI,"D11")
  • Line Location: CSD+23
Function Call: WRITE
  • Prompt: !,$$C(YSASJ,"D13")
  • Line Location: CSD+25
Function Call: WRITE
  • Prompt: !,$$C(YSASK,"D27")
  • Line Location: CSD+27
Function Call: WRITE
  • Prompt: !,$$C(YSASL,"D29")
  • Line Location: CSD+29
Function Call: WRITE
  • Prompt: !,$$C(YSASM,"D31")
  • Line Location: CSD+31
Function Call: WRITE
  • Prompt: !!,$$EM("Drug")
  • Line Location: CSD+32
Function Call: WRITE
  • Prompt: !!,$$SM("Drug"),$J(YSASA+YSASB+YSASC+YSASD+YSASE+YSASF+YSASG+YSASH+YSASI+YSASJ+YSASK+YSASL+YSASM,6,4)
  • Line Location: CSD+37
Function Call: WRITE
  • Prompt: !!,"<press <cr> to continue>"
  • Line Location: FF+4
Function Call: WRITE
  • Prompt: !,$$IF(YSASDA,.02)," ASI interview date: ",$$IF(YSASDA,.05)
  • Line Location: HDR+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^YSTX(604 - [#604] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call