SDUTL2 ;ALB/CAW - Misc. utilities ; 6/28/07 11:48am
Source file <SDUTL2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
FYNUNK(SD) | ; return YES, NO, UNKNOWN
; input: SD=internal piece ; output: [returned] Y=YES, N=NO, U=UNKNOWN |
|
FMT(DFN) | ; return current status of means test in external form
; input: DFN=ifn of patient ; ouput: [returned] MT^SMT^LST ; MT=external format of current status ; SMT=shortened format of current staus ; LST=date of last test |
|
FCO(DFN) | ; return current status of copay test in external form
; input: DFN=ifn of patient ; ouput: [returned] COT^SCOT^LST ; COT=external format of current status ; SCOT=shortened format of current staus ; LST=date of last test |
|
XMY(GROUP,SDUZ,SDPOST) | ; -- set up XMY for mail group members
; input: GROUP := mail group efn [required] ; SDUZ := send to current user [ 0|no ; 1|yes] [optional] ; SDPOST := send to postmaster if XMY is undefined ; [ 0|no ; 1|yes] [optional] ; output: XMY := array of users ; XMDUZ := message sender set postmaster |
|
SCREEN(Y,SDDT) | ; -- screen called when entering a provider in the
; DEFAULT PROVIDER field (#16) or PROVIDER field (#.01) of the PROVIDER ; multiple (#2600) in the HOSPITAL LOCATION file (#44). |
|
HELP(SDDT) | ; -- executable help called when entering a provider in the
; DEFAULT PROVIDER field (#16) or PROVIDER field (#.01) of the PROVIDER ; multiple (#2600) in the HOSPITAL LOCATION file (#44), the PROVIDER ; (#.01) field of the V PROVIDER file (#9000010.06), or in the ; PROVIDER prompt of the Check-out screen. display active providers ; with an active entry in the NEW PERSON file (#200) for PERSON CLASS. |
|
SCAN(SDINDEX,SDBEG,SDEND,SDCB,SDFN,SDIR) | ; -- api to invoke scan
|
|
SCANQ | ||
MHCLIN(SDCL,SDSC) | ;;Determines if Mental health Clinic requiring GAF
|
|
NEWGAF(DFN) | ;;Determine if new GAF Score needed
|
|
GAFCM() | ;;
|
|
COLLAT(SDEC) | ;Determines if patient has a collateral eligibility status
|
|
ELSTAT(DA) | ;Retrieve patient eligibility status
|
|
SCREST(SCIEN,TYP,DIS) | ;check stop code restriction in file 40.7 for a clinic.
; INPUT: SCIEN = IEN of Stop Code ; TYP = Stop Code Type, Primary (P) or Secondary (S) ; DIS = Message Display, 1 - Display or 0 No Display |
|
MSG | ;display error message to screen
|
|
CLNCK(CLN,DSP) | ;Check clinic for valid stop code restriction.
; INPUT: CLN = IEN of Clinic ; DSP = Error Message Display, 1 - Display or 0 No Display |
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^VA(200 - [#200] | Classic Fileman Calls |
^DIC(8 - [#8] | GET1^DIQ |