PXAIPOV ;ISL/JVS,PKR,ESW - SET THE DIAGNOSIS/PROBLEM LIST NODES ;09/14/2021
Source file <PXAIPOV.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
POV | ;--CREATE DIAGNOSIS
|
|
SET | ;--SET AND NEW VARIABLES
|
|
SETVARA | ;--SET VISIT VARIABLES
|
|
SETPXKA | ;--SET PXK ARRAY AFTER
|
|
SETVARB | ;--SET VARIABLES BEFORE
|
|
BEFOR | ;
|
|
SETPXKB | ||
MISC | ;--MISCELLANEOUS NODE
|
|
PRIM | ;--SET A PROVIDER AS PRIMARY
|
|
SPOVPRIM(PXADATA,VISITIEN,PXAERR) | ;If there is an exisiting primary diagnosis
|