| $$PROBTEXT(IEN) |
Returns external format of PROVIDER NARATIVE field
(#.05) in PROBLEM file (#9000011).
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
IEN |
Input |
IEN of PROBLEM file.
|
|
DTMOD(IEN) |
Updates DATE LAST MODIFIED field (#.03) to value of
system variable DT. Used by CPRS GUI only.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
IEN |
Input |
IEN of PROBLEM file
|
|
AUDIT(NODE0,NODE1) |
Store data in AUDIT file (used by CPRS GUI)
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
NODE0 |
Input |
0 node to be placed in PROBLEM LIST AUDIT file
(#125.8)
|
NODE1 |
Input |
1 node to be placed in PROBLEM LIST AUDIT file
(#125.8)
|
|
$$DUPL(DFN,TERM,TEXT) |
This entry point checks a patient's problem list and
returns an IEN if there is already a matching entry on file.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
DFN |
Input |
IEN of the PATIENT file
|
TERM |
Input |
The value for the PROBLEM field of the PROBLEM file
(#9000011).
|
TEXT |
Input |
The value of the PROVIDER NARRATIVE (#.05) field of
the PROBLEM file (#9000011).
|
|
$$CODESTS(PROB,ADATE) |
This component accepts a pointer to the PROBLEM
(#9000011) file and a VA Fileman date as input. The component checks the
status of the ICD9 code attached to the problem on the date passed. The
component returns a boolean value of 1 (one) if the code is active on the
specified date, a 0 (zero) is returned if inactive.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
PROB |
Input |
This variable is a pointer to the PROBLEM (#9000011)
file.
|
ADATE |
Input |
This variable is a FM date on which to check the
status of the ICD9 code associated with the problem.
|
|