| $$VIEW(DUZ) |
Returns value for PROBLEM LIST PRIMARY VIEW field
(#125) from NEW PERSON file (#200).
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
DUZ |
Input |
IEN of NEW PERSON file for user utilizing CPRS GUI.
|
|
$$SERVICE(DUZ) |
Returns users service/section in internal^external
format
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
DUZ |
Input |
IEN of NEW PERSON file for user utilizing CPRS GUI.
|
|
VADPT(DFN) |
Returns information on SC, Agent Orange, Ionizing
Radiation, Camp LeJeune, Gulf War, Head and/or Neck Cancer, Military Sexual
Trauma, Combat Veteran, and Shipboard Hazard and Defense.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
DFN |
Input |
IEN of PATIENT file
|
GMPSC |
Output |
Service Connected Indicator: 1 if yes, 0 if no, ""
if unknown
|
GMPAGTOR |
Output |
Agent Orange Exposure Indicator: 1 if yes, 0 if no,
"" if unknown
|
GMPION |
Output |
Ionizing Radiation Indicator: 1 if yes, 0 if no, ""
if unknown
|
GMPGULF |
Output |
Persian Gulf indicator: 1 if yes, 0 if no, "" if
unknown
|
GMPHNC |
Output |
Head and/or Neck Cancer Indicator: 1 if yes, 0 if
no, "" if unknown
|
GMPMST |
Output |
Military Sexual Trauma Indicator: 1 if yes, 0 if no,
"" if unknown
|
GMPCV |
Output |
Combat Veteran Indicator: 1 if yes, 0 if no, "" if
unknown
|
GMPSHD |
Output |
Shipboard Hazard and Defense Indicator: 1 if yes, 0
if no, "" if unknown
|
GMPCLV |
Output |
Camp LeJeune Indicator: 1 if yes, 0 if no, "" if
unknown
|
|
SCCOND(DFN,.SC) |
Returns information on SC, Agent Orange, Ionizing
Radiation, Camp LeJeune, Gulf War, Head and/or Neck Cancer, Military Sexual
Trauma, Combat Veteran, and Shipboard Hazard and Defense in an array passed by
reference.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
DFN |
Input |
IEN of PATIENT file
|
SC |
Output |
Local array passed by reference containing a
patient's exposure/condition indicators.
SC("AO") = Agent Orange Exposure Indicator
SC("CLV") = Camp LeJeune Indicator
SC("CV") = Combat Veteran Indicator
SC("DFN") = IEN of Patient File
SC("HNC") = Head and/or Neck Cancer Indicator
SC("IR") = Ionizing Radiation Indicator
SC("MST") = Military Sexual Trauma Indicator
SC("PG") = Persian Gulf Indicator
SC("SC") = Service Connected Indicator
SC("SHD") = Shipboard Hazard and Defense Indicator
1 if yes, 0 if no, "" if unknown
|
|
SCS(PROB,.SC) |
Returns a combined string of exposure/conditions in 3
formats, delimited abbreviation, delimited initials and initials.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
PROB |
Input |
IEN of PROBLEM file 9000011
|
SC |
Output |
Array containing combined strings of exposures and/or
conditions that relate to the problem identified by input variable PROB.
OUTPUT:
SC(1) = AO/IR/EC/HNC/MST/CL/CV/SHD Delimited abbreviation
SC(2) = A/I/E/H/M/L/C/S Delimited Initials
SC(3) = AIEHMLCS Initials
|
|
