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 |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: YTQPXRM8

Package: Mental Health

Routine: YTQPXRM8


Information

YTQPXRM8 ;ALB/ASF - PSYCH TEST API FOR CLINICAL REMINDERS ;Jan 19, 2024@12:23:12

Source Information

Source file <YTQPXRM8.m>

Entry Points

Name Comments DBIA/ICR reference
SETSCR(YSDATA,YS) ;save scratch CR
NEW(YSFILEN) ;Adding New Entries - return an internal number - EXTRINSIC FUNCTION
GETSCR(YSDATA,YS) ;get CR scratch -for a user,patient and instrument
; input: DFN as Patient Ien
; input: CODE as Instrument name- 601.71
; input: HANDLE= identifer for cprs GIU
; output: SCRATCH list in format
; QuestionID^AnswerValue^AnswerLegacyValue^IsMultipleChoice^Response Date
KILLSCR(YSDATA,YS) ;delete scratch data
MULTT ;multiple test remover
KILLS(YSDFN,YSTN,YSIEN) ;
OLDKILL ;clean up scratch file
GETTSC(YSCRA,YS) ;patch 123, calculate Scale scores from Scratch Global
; input: DFN as Patient Ien
; input: CODE as Instrument name- 601.71
; input: HANDLE= identifer for cprs GIU
; output: Temp SCALE SCORES in format: '*' + Scale IEN + '~' + Scale Score
MAPSCR ;
CMPLX ;
SETARR(SCARR,NODE) ;
ANSWER(YSQN) ;

Used in RPC

RPC Name Call Tags
YTQ SET SCRATCH SETSCR
YTQ GET SCRATCH GETSCR
YTQ KILL SCRATCH KILLSCR
YTQ GET SCRATCH SCORES GETTSC

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^YTT(601.71 - [#601.71] GET1^DIQ
^YTT(601.72 - [#601.72] GET1^DIQ
^YTT(601.94 - [#601.94] Classic Fileman Calls
Info |  Source |  Entry Points |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call