PXAI ;ISL/JVS,PKR ISA/KWP,ESW - PCE DRIVING RTN FOR 'DATA2PCE' API ;Aug 04, 2025@09:04:35
Source file <PXAI.m>
| Package | Total | Call Graph |
|---|---|---|
| PCE Patient Care Encounter | 16 | CPT^PXAICPT ($$NUMWARNINGS,SETPROB,SSCL)^PXAIERR HF^PXAIHF ICR^PXAIICR IMM^PXAIIMM EDU^PXAIPED (POV,SPOVPRIM)^PXAIPOV PRIM^PXAIPOVV (OTHER,PRIM,PRV)^PXAIPRV PRIM^PXAIPRVV SC^PXAISC SKIN^PXAISK (SPKGSRC,VST)^PXAIVST ($$VPKG,$$VSOURCE,VPTR,VUSER)^PXAIVSTV EXAM^PXAIXAM (EN1,EVENT)^PXKMAIN |
| VA FileMan | 1 | (BLD,MSG)^DIALOG |
| 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 |
|---|---|---|
| DATA2PCE(PXADATA,PXAPKG,PXASOURC,PXAVISIT,PXAUSER,PXANOT,ERRRET,PXAPREDT,PXAPROB,PXACCNT) | ;+API to pass data for add/edit/delete to PCE.
|
|
| NEW | ;--NEW VARIABLES
|
|
| VST | ;--VISIT
|
|
| SOURCE | ;--Validate PACKAGE AND SOURCE.
|
|
| USER | ;--If a USER is passed validate it.
|
|
| PRV | ;--PROVIDER
|
|
| POV | ;--DIAGNOSIS
|
|
| CPT | ;--PROCEDURE
|
|
| EDU | ;--PATIENT EDUCATION
|
|
| EXAM | ;--EXAMINATION
|
|
| HF | ;--HEALTH FACTOR
|
|
| IMM | ;--IMMUNIZATION
|
|
| SKIN | ;--SKIN TEST
|
|
| ICR | ;--IMM CONTRAINDICATION/REFUSAL
|
|
| SC | ;--STANDARD CODES
|
|
| EXIT | ;--EXIT AND CLEAN UP
|
|
| ERR(DATATYPE,NUM) | ;
|
|
| EXTERNAL | ;---SEND ERRORS TO SCREEN
|
|
| INTERNAL(DATATYPE,NUM) | ;---SET ERRORS TO GLOBAL ARRAY
|
| Name | Field # of Occurrence |
|---|---|
| BLD^DIALOG | EXTERNAL+6, EXTERNAL+9, INTERNAL+7, INTERNAL+12 |
| MSG^DIALOG | EXTERNAL+7, EXTERNAL+10, INTERNAL+8, INTERNAL+13 |
| CPT^PXAICPT | CPT+2 |
| $$NUMWARNINGS^PXAIERR | EXTERNAL+4, INTERNAL+5 |
| SETPROB^PXAIERR | ERR+8 |
| SSCL^PXAIERR | ERR+5 |
| HF^PXAIHF | HF+2 |
| ICR^PXAIICR | ICR+2 |
| IMM^PXAIIMM | IMM+2 |
| EDU^PXAIPED | EDU+2 |
| POV^PXAIPOV | POV+9 |
| SPOVPRIM^PXAIPOV | POV+6 |
| PRIM^PXAIPOVV | POV+3 |
| OTHER^PXAIPRV | SC+5 |
| PRIM^PXAIPRV | SC+10 |
| PRV^PXAIPRV | PRV+7 |
| PRIM^PXAIPRVV | PRV+3 |
| SC^PXAISC | SC+2 |
| SKIN^PXAISK | SKIN+2 |
| SPKGSRC^PXAIVST | SOURCE+10 |
| VST^PXAIVST | VST+2 |
| $$VPKG^PXAIVSTV | SOURCE+3 |
| $$VSOURCE^PXAIVSTV | SOURCE+7 |
| VPTR^PXAIVSTV | VST+1 |
| VUSER^PXAIVSTV | USER+1 |
| EXAM^PXAIXAM | EXAM+2 |
| EN1^PXKMAIN | SC+8 |
| EVENT^PXKMAIN | SC+11, EXIT+1 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVSIT - [#9000010] | SOURCE+2, SOURCE+6, SC+18 |
| ^TMP("DIERR" | NEW+8! |
| ^TMP("PXAIADDPRV" | NEW+8!, SC+19! |
| ^TMP("PXK" | NEW+8!, SOURCE+12*, SC+7, SC+19!, EXIT+2! |
| ^TMP("PXSCSA" | NEW+8!, SC+19! |
| ^VA(200 - [#200] | ERR+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DATATYPE | ERR~, ERR+7, INTERNAL~, INTERNAL+9, INTERNAL+14 |
| DFN | NEW+1~ |
| DUZ | NEW+7 |
| EPKG | SOURCE+1~, SOURCE+2*, SOURCE+3, SOURCE+10 |
| ERRRET | DATA2PCE~, VST+4*, SC+14* |
| ERRRET( | INTERNAL+9*, INTERNAL+14* |
| ESOURCE | SOURCE+1~, SOURCE+6*, SOURCE+7, SOURCE+10 |
| IOM | EXTERNAL+7, EXTERNAL+10 |
| NODE | ERR+2~ |
| NOVSIT | NEW+1~ |
| NUM | ERR~, ERR+7, INTERNAL~, INTERNAL+9, INTERNAL+14 |
| NUMWARNINGS | EXTERNAL+4*, EXTERNAL+5, INTERNAL+1~, INTERNAL+2*, INTERNAL+5*, INTERNAL+6 |
| OUTPUT | INTERNAL+1~, INTERNAL+8, INTERNAL+9, INTERNAL+13, INTERNAL+14 |
| PATIENT | NEW+2~ |
| PRIMFND | NEW+2~ |
| PRVDR | NEW+3!, EXIT+2! |
| PXACCNT | DATA2PCE~, SC+18* |
| PXADATA | DATA2PCE~, NEW+6, PRV+1, PRV+3, PRV+6, POV+1, POV+3, POV+6, POV+8, CPT+1 , EDU+1, EXAM+1, HF+1, IMM+1, SKIN+1, ICR+1, SC+1, ERR+3, INTERNAL+10, INTERNAL+15 |
| PXADEC | NEW+1~ |
| >> PXADI("DIALOG" | ERR+1, ERR+9!, EXTERNAL+2, EXTERNAL+6, EXTERNAL+9, INTERNAL+3, INTERNAL+7, INTERNAL+12 |
| PXAERR | NEW+3!, VST+4!, SOURCE+10, PRV+4!, PRV+5!, PRV+8!, POV+4!, POV+5!, POV+6, POV+7! , POV+10!, CPT+3!, EDU+3!, EXAM+3!, HF+3!, IMM+3!, SKIN+3!, ICR+3!, SC+3!, SC+19! , EXIT+3!, ERR+5, EXTERNAL+4, EXTERNAL+6, EXTERNAL+9, INTERNAL+5, INTERNAL+7, INTERNAL+12 |
| PXAERR(1 | ERR+3* |
| PXAERR(2 | ERR+3* |
| PXAERR(3 | ERR+3* |
| PXAERR(4 | ERR+4* |
| PXAERR(5 | ERR+4* |
| PXAERRF | NEW+1~, VST+1, VST+4, SOURCE+4, SOURCE+8, SOURCE+10, SOURCE+11, USER+1, PRV+3, POV+3 , SC+14*, SC+20 |
| PXAERRF("CPT" | CPT+2 |
| PXAERRF("HF" | HF+2 |
| PXAERRF("ICR" | ICR+2 |
| PXAERRF("IMM" | IMM+2 |
| PXAERRF("PED" | EDU+2 |
| PXAERRF("POV" | POV+4, POV+7, POV+10 |
| PXAERRF("PRV" | PRV+4, PRV+8 |
| PXAERRF("SC" | SC+2 |
| PXAERRF("SK" | SKIN+2 |
| PXAERRF("XAM" | EXAM+2 |
| PXAERROR | NEW+3! |
| PXAERRW | NEW+1~, SOURCE+5, SOURCE+9, SC+20 |
| PXAERRW("CPT" | CPT+2 |
| PXAERRW("HF" | HF+2 |
| PXAERRW("ICR" | ICR+2 |
| PXAERRW("PED" | EDU+2 |
| PXAERRW("POV" | POV+5 |
| PXAERRW("PRV" | PRV+5 |
| PXAERRW("SC" | SC+2 |
| PXAERRW("SK" | SKIN+2 |
| PXAERRW("XAM" | EXAM+2 |
| >> PXAIERRW("IMM" | IMM+2 |
| PXAK | NEW+1~, VST+1*, SOURCE+4*, SOURCE+5*, SOURCE+8*, SOURCE+9*, SOURCE+11*, PRV+4*, PRV+5*, PRV+6* , PRV+8, POV+4*, POV+5*, POV+7*, POV+8*, POV+10, CPT+1*, CPT+2, EDU+1*, EDU+2 , EXAM+1*, EXAM+2, HF+1*, HF+2, IMM+1*, IMM+2, SKIN+1*, SKIN+2, ICR+1*, ICR+2 , SC+1*, SC+2 |
| PXANOT | DATA2PCE~, ERR+6 |
| PXAPKG | DATA2PCE~, SOURCE+3*, SOURCE+7, SOURCE+10, ERR+3 |
| PXAPREDT | DATA2PCE~, PRV+3 |
| PXAPROB | DATA2PCE~ |
| PXASOURC | DATA2PCE~, SOURCE+7*, SOURCE+10, SOURCE+12, ERR+3 |
| PXASUB | NEW+1~, NEW+4* |
| PXAUSER | DATA2PCE~, NEW+7*, USER+1, ERR+4 |
| PXAVISIT | DATA2PCE~, NEW+6, VST+1, VST+3, SOURCE+2, SOURCE+6, SOURCE+10, PRV+3, POV+3, POV+6 , SC+18, ERR+4 |
| PXELAP | NEW+1~ |
| PXKERROR | NEW+3!, VST+4, SC+14, SC+19! |
| SCREEN | ERR+2~ |
| TEMP | INTERNAL+1~, INTERNAL+10, INTERNAL+15 |
| U | SOURCE+2, SOURCE+6 |
| VALQUIET | NEW+2~, NEW+4* |
