PXBDPOV ;ISL/JVS - DISPLAY POV (DIAGNOSIS) ;24 May 2013 7:02 AM
Source file <PXBDPOV.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN0 | ;---Main entry point
|
|
HEAD | ;--HEADER ON LIST
|
|
DPOV1 | ;--Display the POV Data
|
|
DPOV4(SIGN) | ;--Display the PROVIDER Data
|
|
HEAD4 | ;--HEADER ON LIST
|
|
DEF(CODE) | ;---PROCESS DEFAULT LIST OF DIAGNOSES
; I CODE="D" JUST SEND DEFAULT ; I CODE="A" JUST SEND THE ARRAY OF PROVIDERS |
|
DIS | ;----DISPLAY
|
|
CIA(X) | ;Clinical Indicator Abbreviations
|
|
ARRAY | ;Set POV entries into ^TMP("PXBDPOV",$J,"DSP" for display
|
Name | Field # of Occurrence |
---|---|
$$ICDDATA^ICDXCODE | ARRAY+7 |
LOC^PXBCC | DPOV4+18 |
TERM^PXBCC | EN0+1, DEF+5 |
UNDOFF^PXBCC | DPOV1+5, HEAD4+9 |
UNDON^PXBCC | DPOV1+2, HEAD4+6 |
DEF^PXBDPOV | DPOV1+22, HEAD4+28 |
NONE^PXBUTL | DPOV1+18 |
POV^PXBUTL2 | HEAD+5, DEF+3 |
$$CSDATE^PXDXUTL | ARRAY+7 |
PR^PXSELDS | ARRAY+8 |
$$SENTENCE^XLFSTR | ARRAY+9, ARRAY+12 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^SC - [#44] | DEF+12 |
^TMP("PXBDPOV" | DPOV4+10*, DPOV4+11, DPOV4+12*, DPOV4+13*, DPOV4+14*, DPOV4+15* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CI | CIA+1~*, CIA+2 |
CI2 | CIA+1~*, CIA+2* |
>> CLINIC | HEAD+5, DEF+3, DEF+12 |
CLNAME | DEF+4~, DEF+12*, DEF+13 |
CODE | DEF~, DEF+6, DEF+7, DEF+8 |
ENTRY | DPOV1+1~, DPOV1+9*, DPOV1+10, DPOV1+12, DPOV1+13, DPOV1+14, DPOV1+15, HEAD4+5~, HEAD4+14*, HEAD4+15 , HEAD4+16, HEAD4+17*, HEAD4+18*, HEAD4+19, HEAD4+20, HEAD4+21, HEAD4+22, DIS+2, ARRAY+1~, ARRAY+5* , ARRAY+7, ARRAY+8, ARRAY+9*, ARRAY+10, ARRAY+12*, ARRAY+13, ARRAY+14 |
>> FIRST | DPOV1+22, HEAD4+28 |
HEAD | HEAD+1*, HEAD+2, HEAD+3!, HEAD4+1*, HEAD4+2, HEAD4+3! |
I | CIA+1~, CIA+2* |
>> IOCUU | EN0+1, HEAD+2, HEAD4+2 |
>> IOEDEOP | DPOV1+4, DPOV4+18, HEAD4+8 |
>> IOELEOL | HEAD+3, HEAD4+3 |
>> IOINHI | HEAD+2, HEAD4+2, HEAD4+20, DEF+14 |
>> IOINLOW | HEAD+3, HEAD4+3, HEAD4+20, DEF+14 |
IOM | HEAD+2, HEAD4+2, DEF+14, DEF+17, DEF+18 |
>> IORC | DEF+5 |
>> IORVOFF | DIS+2 |
>> IORVON | DIS+2 |
J | DPOV1+8*, DPOV1+9, HEAD4+5~, HEAD4+12*, HEAD4+13*, HEAD4+14 |
K | DPOV1+1~, DPOV1+8*, DPOV1+11*, DPOV1+12, HEAD4+5~, HEAD4+12*, HEAD4+13, HEAD4+14* |
LIST | DEF+4~, DEF+15*, DEF+17*, DEF+18 |
NAME | DEF+4~, DEF+7* |
NUMBER | DEF+4~ |
POV | DEF+4~, DEF+9*, DEF+10, DEF+15*, DEF+16, DEF+17 |
PX124 | ARRAY+1~, ARRAY+2*, ARRAY+4*, ARRAY+5, ARRAY+6, ARRAY+10, ARRAY+14, ARRAY+16 |
>> PXBCNT | DPOV4+12, DEF+14, DIS+2, ARRAY+17* |
PXBDPOV | DPOV1+22!, HEAD4+28!, DEF+7* |
>> PXBKY( | DEF+10, DEF+16 |
>> PXBNCPT( | HEAD4+18 |
>> PXBNPOV | HEAD+9 |
>> PXBNPOV( | DPOV1+9 |
>> PXBPMT("DEF" | DEF+7, DEF+8! |
>> PXBPMT("POV" | DEF+9, DEF+15, DIS+2 |
>> PXBSAM | DPOV1+18 |
>> PXBSAM( | DPOV1+8, DPOV1+9, ARRAY+4, ARRAY+5, ARRAY+6*, ARRAY+16 |
PXBSTART | DPOV4+9~, DPOV4+10*, DPOV4+11*, DPOV4+12*, DPOV4+13*, DPOV4+14*, DPOV4+15*, HEAD4+12, HEAD4+13 |
>> PXBVST | ARRAY+7 |
PXCODSET | ARRAY+7~*, ARRAY+14 |
PXENTNUM | ARRAY+11~*, ARRAY+12 |
PXENTRY | ARRAY+8~, ARRAY+11 |
PXENTRY( | ARRAY+12 |
PXENTRY(1 | ARRAY+8*, ARRAY+9 |
PXNUMBR | HEAD4+16~*, HEAD4+19 |
PXTLNS | ARRAY+1~, ARRAY+2*, ARRAY+5*, ARRAY+6, ARRAY+10, ARRAY+12*, ARRAY+13, ARRAY+14, ARRAY+15*, ARRAY+16 , ARRAY+17 |
PXTMP | DPOV4+9~, HEAD4+13, HEAD4+14, ARRAY+2*, ARRAY+3, ARRAY+10, ARRAY+13, ARRAY+14, ARRAY+16 |
SIGN | DPOV4~, DPOV4+10, DPOV4+11, DPOV4+12, DPOV4+13, DPOV4+14, DPOV4+15, DPOV4+18, HEAD4+24 |
STOP | DEF+4~, DEF+9*, DEF+10*, DEF+11 |
U | DPOV1+10, HEAD4+15, HEAD4+16, HEAD4+17, CIA+2, ARRAY+7, ARRAY+8, ARRAY+9, ARRAY+10, ARRAY+12 , ARRAY+13, ARRAY+14, ARRAY+16 |
V | CIA+1~, CIA+2* |
X | DEF+4~, DEF+13*, DEF+14!, CIA~, CIA+2 |