OTHBTN(DGDFN,DGDATE,RET) |
This function entry point is to retrieve a text to
display the following information about the patient:
a)the OTH (Other Than Honorable) eligibility data for a specific patient. The
patient for the function call is specified by IEN in the PATIENT file (#2) in
the first parameter.
b) the Presumptive Psychosis (PP) status based on
- settings in the following fields in the PATIENT file (#2):
(#.361) PRIMARY ELIGIBILITY CODE
(#391) TYPE
(#1901) VETERAN (Y/N)?
(#.301) SERVICE CONNECTED?
(#.302) SERVICE CONNECTED PERCENTAGE
(#.3721) RATED DISABILITIES (VA)
(#.5601) PRESUMPTIVE PSYCHOSIS CATEGORY
- and a presence of the insurance buffer entry in the INSURANCE VERIFICATION
PROCESSOR file (#355.33) for the patient.
c) PRF status for the patient in the PRF ASSIGNMENT file (#26.13) and entries
in the PRF ASSIGNMENT HISTORY file (#26.14).
The date, for which the appropriate text with the status to be composed and
returned, is specified in the 2nd parameter of the API in FileMan format.
The 3rd parameter is used to pass a local array to return the composed text to
the calling application in the form of array elements as described in the
description of the RET array.
MUMPS code example of use,
- results for EXTENDED MH OTH patient:
>K RET S DFN=100913,DATE=DT
>D OTHBTN^DGOTHBTN(DFN,DATE,.RET)
>ZW RET
RET(0)=6
RET(1)="OTH-EXT^Other than Honorable, click for details"
RET(2)=" "
RET(3)="Other than Honorable - Extended"
RET(4)="Eligible for Mental Health care only"
RET(5)="Not time limited - pending VBA adjudication"
RET(6)="Adjudication will determine eligibility for continuing care"
|
VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
DGDFN |
Input |
IEN of patient in the PATIENT File (#2).
|
DGDATE |
Input |
(Optional) The date to calculate status in FileMan
format.
|
RET |
Output |
The array returns:
OTH (Other Than Honorable) status,
PP (Presumptive Psychosis) status,
Inactive PRF (Patient Record Flags) and history of PRF changes as a text to
display in OTH/PP/inactive PRF history button and associated pop-up window in
CPRS.
Return array: If RET(0)<0 : error code less than zero ^ error message - it is
an error, and do not display anything
If RET(0)=0 : then do not display anything
If RET(0)>0 : see the description below
RET(0) = number of lines to return
RET(1) = text for the 1st line on the button ^ text to display when hover over
the 1st line on the button
RET(2) = text for the 2nd line on the button ^ text to display when hover over
the 2nd line on the button
RET(3) = text for the 1st line of the button-click pop-up message ^ text for
the 1st line of the warning pop-up message (see the example for the OTH-90
below)
RET(>3)= text lines for the rest of the text in the pop-up message when the
user clicks on the button or for the warning pop-up message
NOTE: empty or null values in array elements greater than 3 will not be
displayed in the pop-up message. Enter at least a blank space in the piece to
include a blank line in the displayed text.
Example for OTH-90 with zero days remaining:
-------------------------------------------
RET(0)=10
RET(1)="OTH^Other than Honorable, click for details"
RET(2)="0D,P1^Zero days remaining in the most recent period"
RET(3)="Other Than Honorable Status"
RET(4)=" "
RET(5)="Zero days remaining in the most recent period^WARNING: EMERGENT MH
OTH"
RET(6)="^Zero days remaining in the most recent period."
RET(7)="^Authorization from VISN Chief Medical Officer is required for an
additional 90-Day period."
RET(8)=" "
RET(9)="Call Registration team for details."
RET(10)="Clinician: Determine and document in 1st line of Progress Note if MH
treatment related to service."
Example for PP workaround settings only:
---------------------------------------
RET(0)=7
RET(1)="PP^Presumptive Psychosis Authority, click for details"
RET(2)="^"
RET(3)="Eligible for mental health care only under Presumptive Psychosis"
RET(4)="Authority."
RET(5)="PP Category: No value was selected as PP Indicator is not completed."
RET(6)="Patients who experienced MST are eligible for MST related mental"
RET(7)="health and medical care."
Example for inactive PRFs:
-------------------------
RET(0)=11
RET(1)="Inactive Flag^Patient has Inactive Flag(s), click to view"
RET(2)=" "
RET(3)="Flag name: HIGH RISK FOR SUICIDE Status: INACTIVE"
RET(4)=" Initial Assigned Date: OCT 12, 2019@16:27:10"
RET(5)=" Originating Site: CAMP MASTER"
RET(6)=" Owner Site: CAMP MASTER"
RET(7)=" CAMP MASTER changes:"
RET(8)=" DATE/TIME: NOV 25, 2020@10:45:44 ACTION: INACTIVATE"
RET(9)=" BAY PINES VAMC changes:"
RET(10)=" DATE/TIME: NOV 25, 2019@07:19:17 ACTION: REACTIVATE"
RET(11)=" DATE/TIME: NOV 24, 2019@09:26:06 ACTION: INACTIVATE"
|
|