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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: YTQROPT

Package: Mental Health

Routine: YTQROPT


Information

YTQROPT ;SLC/KCM - MHA Assignment Options ; 1/25/2017

Source Information

Source file <YTQROPT.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 ^DIC  ($$GET1,EN)^DIQ  ^DIR  
Kernel 1 $$FMTE^XLFDT  

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

Package Total Caller Graph
Mental Health 2 YTQR ADMINISTRATION DETAIL  YTQR ASSIGNMENT BY PATIENT  

Entry Points

Name Comments DBIA/ICR reference
LSTBYPT ; List assignments by patient
; Option: YTQR ASSIGNMENT BY PATIENT
BLD4PT(YSDFN,OUT) ; List assignments for patient in OUT
; ^XTMP("YTQASMT-INDEX","AD",DFN,ORDBY,SETID)=EXPIRE
SHO4PT(OUT) ; Display assignment information
LSTALL ; List all active assignments
ADMDTL ; List details of an administration
; Option: YTQR ADMINISTRATION DETAIL
OKDETAIL() ; return 1 if OK to show details
SHOADM(YSAD) ; Show all fields for administration
SHOFULL(YSAD) ; Show answers & results for administration

External References

Name Field # of Occurrence
^DIC LSTBYPT+3, ADMDTL+5
$$GET1^DIQ BLD4PT+6, LSTALL+4
EN^DIQ SHOADM+3
^DIR ADMDTL+7, OKDETAIL+3
$$FMTE^XLFDT BLD4PT+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?5,"No assignments found for this patient",!
  • Line Location: LSTBYPT+5
Function Call: WRITE
  • Prompt: !
  • Line Location: LSTBYPT+6
Function Call: WRITE
  • Prompt: !
  • Line Location: LSTBYPT+6
Function Call: WRITE
  • Prompt: !,?5,"Provider",?34,"PIN",?40,"Expires"
  • Line Location: SHO4PT+2
Function Call: WRITE
  • Prompt: !,?5,"--------",?34,"---",?40,"-------"
  • Line Location: SHO4PT+3
Function Call: WRITE
  • Prompt: !,?5,PRVNM,?32,$J(SET,6),?40,OUT(PRVNM,SET)
  • Line Location: SHO4PT+6
Function Call: WRITE
  • Prompt: !!,?10,"---- ",PTNM," ----"
  • Line Location: LSTALL+5
Function Call: WRITE
  • Prompt: !,"--- List Administration Details ---",!
  • Line Location: ADMDTL+4
Function Call: WRITE
  • Prompt: !
  • Line Location: ADMDTL+10
Function Call: WRITE
  • Prompt: !,"No administrations found."
  • Line Location: ADMDTL+16
Function Call: WRITE
  • Prompt: !," --- Answer Records ---"
  • Line Location: SHOFULL+3
Function Call: WRITE
  • Prompt: !,?2,I,"=",$G(^YTT(601.85,I,0))
  • Line Location: SHOFULL+5
Function Call: WRITE
  • Prompt: !,?4,$G(^YTT(601.85,I,1,J,0))
  • Line Location: SHOFULL+7
Function Call: WRITE
  • Prompt: !," --- Result Records ---"
  • Line Location: SHOFULL+9
Function Call: WRITE
  • Prompt: !,?2,I,"=",$G(^YTT(601.92,I,0))
  • Line Location: SHOFULL+11
Function Call: WRITE
  • Prompt: !
  • Line Location: SHOFULL+12
Routine Call
  • DIC
  • Line Location:
    • LSTBYPT+3
    • ADMDTL+5
Routine Call
  • DIR
  • Line Location:
    • ADMDTL+7
    • OKDETAIL+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls,  GET1^DIQ
^VA(200 - [#200] GET1^DIQ
^YTT(601.84 - [#601.84] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XTMP("YTQASMT-INDEX" BLD4PT+3, BLD4PT+4, BLD4PT+7, LSTALL+2
^XTMP("YTQASMT-SET-" BLD4PT+5
^YTT(601.84 - [#601.84] ADMDTL+11, ADMDTL+12
^YTT(601.85 - [#601.85] SHOFULL+4, SHOFULL+5, SHOFULL+6, SHOFULL+7
^YTT(601.92 - [#601.92] SHOFULL+10, SHOFULL+11

Label References

Name Line Occurrences
$$OKDETAIL ADMDTL+9
BLD4PT LSTBYPT+4, LSTALL+3
SHO4PT LSTBYPT+6, LSTALL+6
SHOADM ADMDTL+14
SHOFULL ADMDTL+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA SHOADM+1~, SHOADM+2*
DIC LSTBYPT+2~, LSTBYPT+3*, ADMDTL+2~, ADMDTL+5*, SHOADM+1~, SHOADM+2*
DIC(0 LSTBYPT+3*, ADMDTL+5*
DIR ADMDTL+2~, OKDETAIL+1~
DIR("A" ADMDTL+7*, OKDETAIL+2*
DIR("B" OKDETAIL+3*
DIR(0 ADMDTL+7*, OKDETAIL+3*
DIROUT ADMDTL+2~, OKDETAIL+1~
DIRUT ADMDTL+2~, ADMDTL+7, OKDETAIL+1~
DR SHOADM+1~
DTOUT LSTBYPT+2~, ADMDTL+2~, OKDETAIL+1~
DUOUT LSTBYPT+2~, ADMDTL+2~, OKDETAIL+1~
EXPIRE BLD4PT+2~, BLD4PT+7*, BLD4PT+8
I SHOFULL+1~, SHOFULL+4*, SHOFULL+5, SHOFULL+6, SHOFULL+7, SHOFULL+10*, SHOFULL+11
J SHOFULL+1~, SHOFULL+6*, SHOFULL+7
OUT LSTBYPT+2~, LSTBYPT+4, LSTBYPT+5, LSTBYPT+6, BLD4PT~, BLD4PT+2!, SHO4PT~, LSTALL+1~, LSTALL+3, LSTALL+6
OUT( BLD4PT+8*, SHO4PT+4, SHO4PT+5, SHO4PT+6
PRV BLD4PT+2~, BLD4PT+3*, BLD4PT+4, BLD4PT+6, BLD4PT+7
PRVNM BLD4PT+2~, BLD4PT+6*, BLD4PT+8, SHO4PT+1~, SHO4PT+4*, SHO4PT+5, SHO4PT+6
PTNM LSTALL+1~, LSTALL+4*, LSTALL+5
SET BLD4PT+2~, BLD4PT+4*, BLD4PT+5, BLD4PT+7, BLD4PT+8, SHO4PT+1~, SHO4PT+5*, SHO4PT+6
U ADMDTL+12
X LSTBYPT+2~, ADMDTL+2~, OKDETAIL+1~, SHOFULL+1~
Y LSTBYPT+2~, LSTBYPT+3, LSTBYPT+4, ADMDTL+2~, ADMDTL+5, ADMDTL+6, ADMDTL+8, OKDETAIL+1~, OKDETAIL+4
YSAD ADMDTL+3~, ADMDTL+11*, ADMDTL+12, ADMDTL+14, ADMDTL+15, SHOADM~, SHOADM+2, SHOFULL~, SHOFULL+4, SHOFULL+10
YSCNT ADMDTL+3~, ADMDTL+8*, ADMDTL+13*, ADMDTL+16
YSDETAIL ADMDTL+3~, ADMDTL+9*, ADMDTL+15
YSDFN LSTBYPT+2~, BLD4PT~, BLD4PT+3, BLD4PT+4, BLD4PT+7, LSTALL+1~, LSTALL+2*, LSTALL+3, LSTALL+4, ADMDTL+3~
, ADMDTL+6*, ADMDTL+11
YSDT ADMDTL+3~, ADMDTL+8*, ADMDTL+12
YSDTX ADMDTL+3~
YSTST ADMDTL+3~, ADMDTL+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All