©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
PXAIVST ;ISL/JVS,KWP,ESW - GET A VISIT FROM ENCOUNTER NODE ; 11/20/02 4:38pm
Source file <PXAIVST.m>
| Package | Total | Call Graph |
|---|---|---|
| PCE Patient Care Encounter | 3 | (VAL,VALSCC)^PXAIVSTV EN1^PXKMAIN $$LOOKVSIT^PXUTLVST |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SET | ;--SET AND NEW VARIABLES
|
|
| VST | ;--CREAT A VISIT
|
|
| VAL | ;--VALIDATE ENOUGH DATA
|
|
| MISC | ;--MISCELLANEOUS NODE
|
|
| SETVARB | ;--SET VARIABLES BEFORE
|
|
| SETVARA | ;--SET VISIT VARIABLES
|
|
| CALL | ;--CALL
|
|
| SETPXKB | ||
| SETPXKA | ;--SET PXK ARRAY AFTER
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVSIT - [#9000010] | VAL+2, SETVARB+2, SETVARB+4 |
| ^TMP("PXK" | SETPXKA+1*, SETPXKA+2*, SETPXKA+3*, SETPXKA+4*, SETPXKA+5*, SETPXKA+6*, SETVARB+2*, SETVARB+4*, SETPXKB+1*, SETPXKB+2* , SETPXKB+3*, SETPXKB+4*, SETPXKB+5*, SETPXKB+6*, MISC+1*, CALL+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AFTER0 | SET+1~, SETVARA+1*, SETVARA+7*, SETVARA+8*, SETVARA+9*, SETVARA+10*, SETVARA+11*, SETVARA+12*, SETVARA+13*, SETVARA+14* , SETVARA+15*, SETVARA+16*, SETVARA+19*, SETPXKA+1, CALL+1 |
| AFTER150 | SET+1~, SETVARA+33*, SETPXKA+3 |
| AFTER21 | SET+1~, SETVARA+32*, SETPXKA+2 |
| AFTER800 | SET+1~, SETVARA+20*, SETVARA+21*, SETVARA+22*, SETVARA+23*, SETVARA+24*, SETVARA+26*, SETVARA+29, SETVARA+30*, SETPXKA+4 |
| AFTER811 | SET+2~, SETVARA+34*, SETPXKA+5 |
| AFTER812 | SET+4~, SET+9*, SETVARA+35*, SETPXKA+6 |
| AFTER8A | SET+4~, SETVARA+29*, SETVARA+30 |
| BEFOR0 | SET+1~, SETVARB+6*, SETPXKB+1 |
| BEFOR150 | SET+1~, SETVARB+6*, SETPXKB+3 |
| BEFOR21 | SET+1~, SETVARB+6*, SETPXKB+2 |
| BEFOR800 | SET+1~, SETVARB+6*, SETPXKB+4 |
| BEFOR811 | SET+2~, SETVARB+6*, SETPXKB+5 |
| BEFOR812 | SET+2~, SET+9*, SETPXKB+6 |
| DUZ("AG" | SETVARA+9 |
| >> PATIENT | VAL+2* |
| PIECE | SET+3~, SETVARB+2*, SETVARB+4* |
| PXAA | SET+3~ |
| PXAA( | SET+7* |
| PXAA("AO" | SETVARA+21 |
| PXAA("APPT" | SETVARA+18 |
| PXAA("CHECKOU | T D/T" , SETVARA+15 |
| PXAA("COMMENT" | SETVARA+34 |
| PXAA("EC" | SETVARA+23 |
| PXAA("ELIGIBILITY" | SETVARA+16, SETVARA+17 |
| PXAA("ENC D/T | " , VAL+2*, SETVARA+1 |
| PXAA("ENCOUNT | ER TYPE" , SETVARA+33 |
| PXAA("HNC" | SETVARA+26 |
| PXAA("HOS LOC | " , SETVARA+19 |
| PXAA("INSTITUTION" | SETVARA+8, SETVARA+11 |
| PXAA("IR" | SETVARA+22 |
| PXAA("MST" | SETVARA+24 |
| PXAA("OUTSIDE | LOCATION" , SETVARA+7, SETVARA+32 |
| PXAA("PARENT" | SETVARA+14 |
| PXAA("PATIENT" | VAL+2*, SETVARA+10 |
| PXAA("SC" | SETVARA+20 |
| PXAA("SERVICE | CATEGORY" , SETVARA+12 |
| PXAB | SET+3~ |
| >> PXADATA | SET+6, SET+7, VAL+1, SETVARB+3 |
| >> PXAERR(7 | SET+13* |
| >> PXAERR(8 | SET+12* |
| >> PXAK | SET+11* |
| >> PXALOOK | CALL+1* |
| >> PXASOURC | SETVARA+35 |
| >> PXAVISIT | VAL+2, SETVARB+1, SETVARB+2, SETVARB+4, MISC+1, CALL+1*, CALL+3* |
| >> PXELAP | SETVARA+17*, SETVARA+18* |
| STOP | SET+3~, VAL+1 |
| SUB | SET+3~, SET+6*, SET+7 |
| U | SETVARA+7, SETVARA+8, SETVARA+9, CALL+1 |