PXBDPOV ;ISL/JVS - DISPLAY POV (DIAGNOSIS) ;Aug 04, 2025@08:39:05
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 |
|
| 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 |
|---|---|
| CI2 | CIA+3~, CIA+4*, CIA+6* |
| >> 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+3~, CIA+6* |
| >> 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~ |
| PIECES | CIA+3~, CIA+4*, CIA+6 |
| 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+4, CIA+6, ARRAY+7, ARRAY+8, ARRAY+9, ARRAY+10 , ARRAY+12, ARRAY+13, ARRAY+14, ARRAY+16 |
| X | DEF+4~, DEF+13*, DEF+14!, CIA~, CIA+4, CIA+6 |