BTIUCPL ; IHS/MSC/JS - TIU V Care Plan Object ;25-Nov-2013 10:05;DU
Source file <BTIUCPL.m>
Package | Total | Call Graph |
---|---|---|
IHS Mods To Text Integration Utilities | 1 | OUT^BTIUCPL1 |
VA Fileman | 1 | GETS^DIQ |
Name | Comments | DBIA/ICR reference |
---|---|---|
CPLVVI(DATA,DFN,PROB,CNT) | ;
|
|
CPLCON(DATA,DFN,PROB,CNT) | ;
|
|
CPLAN(DATA,IEN,DFN,TYPE,CNT) | ;
|
|
CPL(DFN,TARGET,VIEN,PARAM) | ;EHR p12
; DFN = The patient this problem belongs to ; TARGET = Location of object report ; VIEN = Visit ien (optional) [IF VIEN PASSED, PROBLEM(S) RETURNED ARE 'Purpose of Visit' POV] ; PARAM = A All problems [IF VIEN NULL AND PARAM NULL, DEFAULTS TO 'L' LAST DATE PROBLEM] ; C Active problems ; L Last date problem ; Problem ien |
|
1 | ;-- Get the patient care plan data record(s) --
|
|
PRIEN(PRIEN) | ;
|
|
3 | ; -- format object report --
|
|
2 | ; -- call GETS^DIQ for file entries --
|
|
CPLVTR(DATA,DFN,PROB,CNT) | ;
|
|
CPLVED(DATA,DFN,PROB,CNT) | ;
|
|
GETDATA | ;
|
|
TMPGBL(X) | ;EP
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNCPL - [#9000092] | CPLAN+9 |
^AUPNCPL("ASDT" | CPLAN+3, CPLAN+4, CPLAN+7, CPLAN+8 |
^AUPNVPED - [#9000010.16] | CPLVED+3 |
^AUPNVPED("AC" | CPLVED+2 |
^AUPNVTXR - [#9000010.61] | CPLVTR+4 |
^AUPNVTXR("AF" | CPLVTR+1, CPLVTR+2, CPLVTR+3 |
^AUPNVVI - [#9000010.58] | CPLVVI+4 |
^AUPNVVI("B" | CPLVVI+3 |
^GMR(123 - [#123] | CPLCON+2, CPLCON+3 |
^TMP("BTIUCPL" | TMPGBL+1! |
Name | Line Occurrences |
---|---|
$$TMPGBL | CPL+11 |
CPLAN | 1+1, 1+2 |
CPLCON | 1+6 |
CPLVED | 1+5 |
CPLVTR | 1+4 |
CPLVVI | 1+3 |
GETDATA | 2+1, 2+2, 2+3, 2+4, 2+5, 2+6 |
PRIEN | CPL+23 |
Name | Field # of Occurrence |
---|---|
^($J | TMPGBL+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CNT | CPL+9~, CPL+15*, 1+1, 1+2, 1+3, 1+4, 1+5, 1+6, 1+8, 3+1~ , 3+2*, CPLAN~, CPLAN+13*, CPLAN+14*, CPLVVI~, CPLVVI+10*, CPLVTR~, CPLVTR+10*, CPLVED~, CPLVED+8* , CPLCON~, CPLCON+7* |
CONIEN | CPL+9~, CPLCON+1*, CPLCON+2*, CPLCON+3, CPLCON+7 |
CPIEN | CPLAN+6~, CPLAN+7*, CPLAN+8 |
CPLANG | CPL+9~ |
CPLANG( | 2+1, 3+5, CPLAN+13* |
CPLANP | CPL+9~ |
CPLANP( | 2+2, 3+6, CPLAN+14* |
CPLARR | CPL+9~ |
CPLCON | CPL+9~ |
CPLCON( | 2+6, 3+10, CPLCON+7* |
CPLERR | GETDATA+1!, GETDATA+3 |
CPLERR("DIERR" | GETDATA+4 |
CPLVED | CPL+9~ |
CPLVED( | 2+5, 3+9, CPLVED+8* |
CPLVTR | CPL+9~ |
CPLVTR( | 2+4, 3+8, CPLVTR+10* |
CPLVVI | CPL+9~ |
CPLVVI( | 2+3, 3+7, CPLVVI+10* |
DATA | CPLAN~, CPLVVI~, CPLVTR~, CPLVED~, CPLCON~ |
DFN | CPL~, CPL+16, 1+1, 1+2, 1+3, 1+4, 1+5, 1+6, CPLAN~, CPLAN+12 , CPLVVI~, CPLVVI+7, CPLVTR~, CPLVTR+1, CPLVTR+2, CPLVTR+3, CPLVTR+7, CPLVED~, CPLVED+2, CPLVED+6 , CPLCON~, CPLCON+6 |
FNUM | CPL+9~, 2+1*, 2+2*, 2+3*, 2+4*, 2+5*, 2+6*, 3+5*, 3+6*, 3+7* , 3+8*, 3+9*, 3+10*, CPLVVI+1~, GETDATA+2, GETDATA+4 |
IEN | CPL+9~, 2+1*, 2+2*, 2+3*, 2+4*, 2+5*, 2+6*, 3+5*, 3+6*, 3+7* , 3+8*, 3+9*, 3+10*, CPLAN~, CPLAN+3, CPLAN+4, CPLAN+7, CPLAN+8, GETDATA+2 |
INVDT | CPLAN+1~, CPLAN+2*, CPLAN+3*, CPLAN+4, CPLAN+7, CPLAN+8 |
PARAM | CPL~, CPL+18, CPL+19, CPL+21*, CPL+23 |
PRIEN | PRIEN~, 1+1, 1+2, 1+3, 1+4, 1+5, 1+6 |
PROB | CPLVVI~, CPLVVI+3, CPLVTR~, CPLVTR+8, CPLVED~, CPLCON~, CPLCON+2 |
REC | CPLAN+9~*, CPLAN+10, CPLAN+11, CPLVVI+4~*, CPLVVI+5, CPLVVI+6, CPLVVI+8, CPLVTR+4~*, CPLVTR+5, CPLVTR+6 , CPLVTR+8, CPLVTR+9, CPLVED+3~*, CPLVED+4, CPLVED+5, CPLVED+7, CPLCON+3~*, CPLCON+4, CPLCON+5 |
RECDFN | CPLAN+9~, CPLAN+11*, CPLAN+12, CPLVVI+4~, CPLVVI+6*, CPLVVI+7, CPLVTR+4~, CPLVTR+6*, CPLVTR+7, CPLVED+3~ , CPLVED+5*, CPLVED+6, CPLCON+3~, CPLCON+5*, CPLCON+6 |
RET | CPL+14*, CPLAN+1~ |
SIEN | CPLAN+6~, CPLAN+8*, CPLAN+9, CPLAN+13, CPLAN+14 |
SNO | CPL+9~, CPLVTR+2*, CPLVTR+3 |
SPACE | 3+1~, 3+3* |
STATUS | CPL+9~, CPLAN+4*, CPLAN+5, CPLAN+7, CPLAN+8 |
STRPAD | 3+1~, 3+4* |
TARGET | CPL~, CPL+11*, CPL+13, CPL+16, CPL+17, CPL+18, CPL+19, CPL+24, 1+8, GETDATA+3 , GETDATA+4 |
TYPE | CPLAN~, CPLAN+3, CPLAN+4, CPLAN+7, CPLAN+8, CPLAN+13, CPLAN+14 |
U | CPLAN+11, CPLVVI+6, CPLVVI+8, CPLVTR+6, CPLVTR+8, CPLVTR+9, CPLVED+5, CPLVED+7, CPLCON+5, GETDATA+4 |
VED | CPL+10~, CPLVED+2*, CPLVED+3, CPLVED+8 |
VIEN | CPL~, CPL+17 |
VST | CPL+10~, CPLVTR+1*, CPLVTR+2, CPLVTR+3 |
VTRIN | CPL+10~, CPLVTR+3*, CPLVTR+4, CPLVTR+10 |
VVIN | CPL+10~, CPLVVI+1~, CPLVVI+3*, CPLVVI+4, CPLVVI+10 |
VVISIT | CPL+10~, CPLVVI+8*, CPLVVI+9, CPLVED+1, CPLVED+7 |
X | 1+1~*, 1+2~*, 1+3~*, 1+4~*, 1+5~*, 1+6~*, TMPGBL~ |