PXRPC ;ISL/JLC - PCE DATA2PCE RPC ;06/23/2016
Source file <PXRPC.m>
Package | Total | Call Graph |
---|---|---|
Lexicon Utility | 3 | $$EXP^LEXCODE UCUMDATA^LEXMUCUM $$IMPDATE^LEXU |
Kernel | 2 | $$TRIM^XLFSTR $$PATCH^XPDUTL |
PCE Patient Care Encounter | 2 | $$DATA2PCE^PXAI $$PKG2IEN^VSIT |
VA FileMan | 2 | $$FIND1^DIC CHK^DIE |
CPT HCPCS Codes | 1 | $$CODEN^ICPTCOD |
DRG Grouper | 1 | $$ICDDX^ICDEX |
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 |
---|---|---|
SAVE(OK,PCELIST,LOC,PKGNAME,SRC) | ; save PCE information
|
|
DQSAVE(PCELIST,PXPCEARR,PXPCEDARR,PROBLEMS,SRC) | ;
|
|
DATA2PCE(OK,PXPCEARR,PKG,SRC,PXAVST,PXERROR) | ;
|
|
IMMSRC(IMMIS) | ; Returns Event Info Source IEN
|
|
IMMROUTE(IMMRT) | ; Returns Route IEN
|
|
IMMLOC(IMMAL) | ; Returns Anatomic Location IEN
|
|
IMMLOT(IMMLOT,IMMMANUF,IMMEXPDT) | ; Returns Lot_IEN^Comment
|
|
IMMVIS(IMMVISMULT,ROOT) | ; Sets ROOT's VIS multiple
|
|
IMMRMRKS(IMMREMARKS,IMMNUM,REMARK) | ; Sets REMARK array
|
|
IMMDSG(IMMDSG) | ;
|
Name | Field # of Occurrence |
---|---|
$$FIND1^DIC | DQSAVE+111, IMMSRC+6, IMMROUTE+6, IMMROUTE+8, IMMLOC+6, IMMLOC+8 |
CHK^DIE | IMMDSG+17 |
$$ICDDX^ICDEX | DQSAVE+96 |
$$CODEN^ICPTCOD | DQSAVE+73 |
$$EXP^LEXCODE | DQSAVE+100 |
UCUMDATA^LEXMUCUM | IMMDSG+15 |
$$IMPDATE^LEXU | DQSAVE+34 |
$$DATA2PCE^PXAI | DATA2PCE+2 |
$$PKG2IEN^VSIT | SAVE+7 |
$$TRIM^XLFSTR | DQSAVE+208, DQSAVE+209, DQSAVE+210, DQSAVE+211, IMMVIS+4, IMMDSG+2 |
$$PATCH^XPDUTL | DQSAVE+68 |
RPC Name | Call Tags |
---|---|
PX SAVE DATA | SAVE |
FileNo | Call Tags |
---|---|
^AUPNVIMM - [#9000010.11] | CHK^DIE |
^PXV(920.1 - [#920.1] | FIND1^DIC |
^PXV(920.2 - [#920.2] | FIND1^DIC |
^PXV(920.3 - [#920.3] | FIND1^DIC |
^AUTTIMM - [#9999999.14] | FIND1^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("PXRPC" | SAVE+4!, SAVE+8* |
Name | Line Occurrences |
---|---|
$$IMMDSG | DQSAVE+133 |
$$IMMLOC | DQSAVE+127, DQSAVE+163 |
$$IMMLOT | DQSAVE+129 |
$$IMMROUTE | DQSAVE+125 |
$$IMMSRC | DQSAVE+123 |
DATA2PCE | SAVE+12 |
DQSAVE | SAVE+9 |
IMMRMRKS | DQSAVE+147 |
IMMVIS | DQSAVE+146 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CAT | DQSAVE+27~, DQSAVE+37*, DQSAVE+80, DQSAVE+101, DQSAVE+198, DQSAVE+216 |
CDT | DQSAVE+90~, DQSAVE+93*, DQSAVE+94, DQSAVE+96, DQSAVE+100 |
CODE | DQSAVE+26~, DQSAVE+37*, DQSAVE+39, DQSAVE+44, DQSAVE+46, DQSAVE+51, DQSAVE+52, DQSAVE+53, DQSAVE+54, DQSAVE+56 , DQSAVE+57, DQSAVE+58, DQSAVE+59, DQSAVE+60, DQSAVE+61, DQSAVE+62, DQSAVE+63, DQSAVE+64, DQSAVE+65, DQSAVE+71 , DQSAVE+73, DQSAVE+88, DQSAVE+89, DQSAVE+91, DQSAVE+104, DQSAVE+111*, DQSAVE+112, DQSAVE+114, DQSAVE+152, DQSAVE+154 , DQSAVE+168, DQSAVE+170, DQSAVE+176, DQSAVE+178, DQSAVE+187, DQSAVE+189, DQSAVE+195, DQSAVE+197, DQSAVE+205, DQSAVE+207 , DQSAVE+215, DQSAVE+217 |
COM | DQSAVE+29~, DQSAVE+219*, DQSAVE+221*, DQSAVE+222, DQSAVE+223, DQSAVE+224, DQSAVE+225, DQSAVE+228*, DQSAVE+229*, DQSAVE+230 , DQSAVE+231, DQSAVE+233, DQSAVE+236*, DQSAVE+237*, DQSAVE+238, DQSAVE+239, DQSAVE+240, DQSAVE+243*, DQSAVE+244*, DQSAVE+245 , DQSAVE+246, DQSAVE+247 |
COMMENT | DQSAVE+29~ |
COMMENT( | DQSAVE+84*, DQSAVE+105*, DQSAVE+121*, DQSAVE+160*, DQSAVE+173*, DQSAVE+184*, DQSAVE+192*, DQSAVE+202*, DQSAVE+212*, DQSAVE+221 , DQSAVE+225 |
COMMENTS | DQSAVE+29~ |
COMMENTS( | DQSAVE+217*, DQSAVE+221, DQSAVE+223*, DQSAVE+224*, DQSAVE+225, DQSAVE+229, DQSAVE+233, DQSAVE+237, DQSAVE+240, DQSAVE+244 , DQSAVE+247 |
CPT | DQSAVE+28~, DQSAVE+35*, DQSAVE+72*, DQSAVE+84, DQSAVE+85 |
CSYS | DQSAVE+90~, DQSAVE+94*, DQSAVE+96, DQSAVE+100 |
DFN | DQSAVE+30~, DQSAVE+52* |
DT | DQSAVE+93 |
HF | DQSAVE+28~, DQSAVE+35*, DQSAVE+177*, DQSAVE+184 |
I | DQSAVE+26~, DQSAVE+36*, DQSAVE+37 |
ICD | DQSAVE+28~, DQSAVE+35*, DQSAVE+92*, DQSAVE+104, DQSAVE+105 |
ICR | DQSAVE+28~, DQSAVE+35*, DQSAVE+206*, DQSAVE+212 |
IEN | DQSAVE+26~, DQSAVE+73*, DQSAVE+74, DQSAVE+90~, DQSAVE+96*, DQSAVE+97, DQSAVE+98 |
IMM | DQSAVE+28~, DQSAVE+35*, DQSAVE+113*, DQSAVE+121, DQSAVE+147, DQSAVE+149 |
IMMAL | IMMLOC~, IMMLOC+2, IMMLOC+3, IMMLOC+4 |
IMMALERR | DQSAVE+32~ |
IMMALHL | IMMLOC+1~, IMMLOC+3*, IMMLOC+5, IMMLOC+6 |
IMMALIEN | DQSAVE+32~, DQSAVE+127*, DQSAVE+128, DQSAVE+163*, DQSAVE+164, IMMLOC+1~, IMMLOC+4*, IMMLOC+5, IMMLOC+6*, IMMLOC+7 , IMMLOC+8*, IMMLOC+9 |
IMMALNAME | DQSAVE+32~ |
IMMALNM | IMMLOC+1~, IMMLOC+2*, IMMLOC+7, IMMLOC+8 |
IMMCOMM | DQSAVE+32~, DQSAVE+131*, DQSAVE+138*, DQSAVE+139, DQSAVE+142, DQSAVE+143, IMMLOT+1~, IMMLOT+11*, IMMLOT+12*, IMMLOT+13* , IMMLOT+14*, IMMLOT+15 |
IMMCOMMS | DQSAVE+32~ |
IMMCOMMS( | DQSAVE+142*, DQSAVE+222, DQSAVE+224 |
IMMCVX | DQSAVE+33~, DQSAVE+110*, DQSAVE+111, DQSAVE+115 |
IMMCVXER | DQSAVE+33~ |
IMMDOSE | IMMDSG+1~, IMMDSG+4*, IMMDSG+8*, IMMDSG+11, IMMDSG+17, IMMDSG+20 |
IMMDOSEV | IMMDSG+1~, IMMDSG+17, IMMDSG+18 |
IMMDSG | DQSAVE+33~, DQSAVE+133*, DQSAVE+134, DQSAVE+135, DQSAVE+136, DQSAVE+137, DQSAVE+138, IMMDSG~, IMMDSG+2*, IMMDSG+3 , IMMDSG+4, IMMDSG+5, IMMDSG+6, IMMDSG+7, IMMDSG+8, IMMDSG+9 |
IMMEXPDT | DQSAVE+32~, IMMLOT~, IMMLOT+14 |
IMMIS | IMMSRC~, IMMSRC+2, IMMSRC+3 |
IMMISHL | IMMSRC+1~, IMMSRC+2*, IMMSRC+6 |
IMMISIEN | DQSAVE+32~, DQSAVE+123*, DQSAVE+124, IMMSRC+1~, IMMSRC+3*, IMMSRC+5, IMMSRC+6*, IMMSRC+7 |
IMMISNM | DQSAVE+32~ |
IMMLOT | DQSAVE+32~, DQSAVE+129*, DQSAVE+130, DQSAVE+131, IMMLOT~, IMMLOT+2, IMMLOT+3 |
IMMLOTIEN | DQSAVE+32~, DQSAVE+130*, DQSAVE+132, IMMLOT+1~, IMMLOT+3*, IMMLOT+5 |
IMMLOTNM | IMMLOT+1~, IMMLOT+2*, IMMLOT+12 |
IMMMANUF | DQSAVE+32~, IMMLOT~, IMMLOT+13 |
IMMNUM | IMMRMRKS~, IMMRMRKS+6 |
IMMOVERRIDE | DQSAVE+33~ |
IMMOVERRIDE( | DQSAVE+149*, DQSAVE+237, DQSAVE+238, DQSAVE+239 |
IMMREMARKS | IMMRMRKS~, IMMRMRKS+2, IMMRMRKS+3 |
IMMRT | IMMROUTE~, IMMROUTE+2, IMMROUTE+3, IMMROUTE+4 |
IMMRTERR | DQSAVE+32~ |
IMMRTHL | IMMROUTE+1~, IMMROUTE+3*, IMMROUTE+5, IMMROUTE+6 |
IMMRTIEN | DQSAVE+32~, DQSAVE+125*, DQSAVE+126, IMMROUTE+1~, IMMROUTE+4*, IMMROUTE+5, IMMROUTE+6*, IMMROUTE+7, IMMROUTE+8*, IMMROUTE+9 |
IMMRTNM | DQSAVE+32~, IMMROUTE+1~, IMMROUTE+2*, IMMROUTE+7, IMMROUTE+8 |
IMMUNERR | IMMDSG+1~ |
IMMUNIT | IMMDSG+1~, IMMDSG+5*, IMMDSG+9*, IMMDSG+13, IMMDSG+15, IMMDSG+20 |
IMMUNITIEN | IMMDSG+1~, IMMDSG+6*, IMMDSG+13, IMMDSG+16*, IMMDSG+18 |
IMMVIS | IMMVIS+1~, IMMVIS+5*, IMMVIS+6, IMMVIS+8*, IMMVIS+10 |
IMMVISDT | IMMVIS+1~, IMMVIS+7*, IMMVIS+8 |
IMMVISENTRY | IMMVIS+1~, IMMVIS+4*, IMMVIS+5, IMMVIS+7 |
IMMVISMULT | IMMVIS~, IMMVIS+3, IMMVIS+4 |
IMPLDT | DQSAVE+27~, DQSAVE+34*, DQSAVE+94 |
LEXIEN | DQSAVE+90~, DQSAVE+100* |
LOC | SAVE~ |
MOD | DQSAVE+28~, DQSAVE+78*, DQSAVE+79 |
MODCNT | DQSAVE+28~, DQSAVE+76*, DQSAVE+77 |
MODIDX | DQSAVE+28~, DQSAVE+77*, DQSAVE+78 |
MODS | DQSAVE+28~, DQSAVE+76*, DQSAVE+78 |
NARR | DQSAVE+27~, DQSAVE+37*, DQSAVE+81, DQSAVE+102, DQSAVE+104, DQSAVE+199 |
NUM | DQSAVE+33~, DQSAVE+231*, DQSAVE+232, DQSAVE+233, DQSAVE+239*, DQSAVE+240, DQSAVE+246*, DQSAVE+247 |
OK | SAVE~, SAVE+3*, SAVE+5*, SAVE+6*, SAVE+7*, SAVE+10*, SAVE+12, DATA2PCE~, DATA2PCE+2* |
PCELIST | SAVE~, SAVE+8, SAVE+9, DQSAVE~ |
PCELIST( | DQSAVE+36, DQSAVE+37 |
PCELIST(1 | SAVE+3, SAVE+4 |
PED | DQSAVE+28~, DQSAVE+35*, DQSAVE+169*, DQSAVE+173 |
PKG | SAVE+2~, SAVE+7*, SAVE+12, DATA2PCE~, DATA2PCE+2 |
PKGNAME | SAVE~, SAVE+5, SAVE+7 |
PROBLEMS | SAVE+2~, SAVE+9, DQSAVE~ |
PROBLEMS( | DQSAVE+104* |
PRV | DQSAVE+28~, DQSAVE+35*, DQSAVE+40*, DQSAVE+41, DQSAVE+42 |
PXAPI | SAVE+2~, SAVE+10 |
PXAPI("PROVIDER" | SAVE+11 |
PXAPREDT | SAVE+2~, SAVE+11*, DQSAVE+30~, DQSAVE+48* |
PXAVST | SAVE+2~, SAVE+12, DATA2PCE~, DATA2PCE+1*, DATA2PCE+2 |
PXCPTDEL | DQSAVE+30~, DQSAVE+85* |
PXDEL | SAVE+2~ |
PXDX | DQSAVE+87~, DQSAVE+91*, DQSAVE+95*, DQSAVE+96, DQSAVE+100 |
PXDXI | DQSAVE+87~, DQSAVE+89*, DQSAVE+91, DQSAVE+99, DQSAVE+104, DQSAVE+105 |
PXENCDT | DQSAVE+27~, DQSAVE+51*, DQSAVE+93 |
PXEND | IMMRMRKS+1~, IMMRMRKS+3*, IMMRMRKS+4, IMMRMRKS+5 |
PXERROR | SAVE+2~, SAVE+12, DATA2PCE~, DATA2PCE+2 |
PXPCEARR | DQSAVE~, DQSAVE+41, DQSAVE+50, DQSAVE+72, DQSAVE+92, DQSAVE+113, DQSAVE+153, DQSAVE+169, DQSAVE+177, DQSAVE+180 , DQSAVE+188, DQSAVE+196, DQSAVE+206, DQSAVE+225, DQSAVE+232, DQSAVE+233, DQSAVE+240, DQSAVE+247, DQSAVE+249, DATA2PCE~ , DATA2PCE+2 |
PXPCEDARR | DQSAVE~, DQSAVE+42 |
PXSEQ | IMMVIS+1~, IMMVIS+2*, IMMVIS+9*, IMMVIS+10 |
PXSTART | IMMRMRKS+1~, IMMRMRKS+2*, IMMRMRKS+4, IMMRMRKS+5 |
PXX | IMMVIS+1~, IMMVIS+3*, IMMVIS+4, IMMRMRKS+1~, IMMRMRKS+5*, IMMRMRKS+6 |
REMARK | DQSAVE+33~, DQSAVE+147, IMMRMRKS~ |
REMARK( | DQSAVE+229, DQSAVE+230, DQSAVE+231, IMMRMRKS+6* |
ROOT | DQSAVE+27~, DQSAVE+41*, DQSAVE+44, DQSAVE+45, DQSAVE+50*, DQSAVE+51*, DQSAVE+52, DQSAVE+53, DQSAVE+54, DQSAVE+56* , DQSAVE+57, DQSAVE+58, DQSAVE+59, DQSAVE+60, DQSAVE+61, DQSAVE+62, DQSAVE+63, DQSAVE+64, DQSAVE+66, DQSAVE+68 , DQSAVE+69, DQSAVE+72*, DQSAVE+74, DQSAVE+79, DQSAVE+80, DQSAVE+81, DQSAVE+82, DQSAVE+83, DQSAVE+85, DQSAVE+92* , DQSAVE+98, DQSAVE+99, DQSAVE+100, DQSAVE+101, DQSAVE+102, DQSAVE+103, DQSAVE+104, DQSAVE+106, DQSAVE+113*, DQSAVE+114 , DQSAVE+115, DQSAVE+116, DQSAVE+117, DQSAVE+118, DQSAVE+119, DQSAVE+120, DQSAVE+124, DQSAVE+126, DQSAVE+128, DQSAVE+132 , DQSAVE+135, DQSAVE+136, DQSAVE+143, DQSAVE+144, DQSAVE+145, DQSAVE+146, DQSAVE+148, DQSAVE+150, DQSAVE+153*, DQSAVE+154 , DQSAVE+155, DQSAVE+156, DQSAVE+157, DQSAVE+158, DQSAVE+159, DQSAVE+161, DQSAVE+162, DQSAVE+164, DQSAVE+166, DQSAVE+169* , DQSAVE+170, DQSAVE+171, DQSAVE+172, DQSAVE+174, DQSAVE+177*, DQSAVE+178, DQSAVE+179, DQSAVE+181, DQSAVE+182, DQSAVE+185 , DQSAVE+188*, DQSAVE+189, DQSAVE+190, DQSAVE+191, DQSAVE+193, DQSAVE+196*, DQSAVE+197, DQSAVE+198, DQSAVE+199, DQSAVE+200 , DQSAVE+201, DQSAVE+203, DQSAVE+206*, DQSAVE+207, DQSAVE+208, DQSAVE+209, DQSAVE+210, DQSAVE+211, DQSAVE+213, IMMVIS~ , IMMVIS+10 |
ROOT2 | DQSAVE+27~, DQSAVE+42*, DQSAVE+46, DQSAVE+47 |
SEQ | DQSAVE+33~, DQSAVE+232*, DQSAVE+233 |
SK | DQSAVE+28~, DQSAVE+35*, DQSAVE+153*, DQSAVE+160, DQSAVE+165 |
SKRDCOM | DQSAVE+33~ |
SKRDCOM( | DQSAVE+165*, DQSAVE+244, DQSAVE+245, DQSAVE+246 |
SRC | SAVE~, SAVE+6, SAVE+9, SAVE+12, DQSAVE~, DQSAVE+183*, DATA2PCE~, DATA2PCE+2 |
SVCAT | DQSAVE+29~, DQSAVE+56*, DQSAVE+93 |
TRT | DQSAVE+28~, DQSAVE+35*, DQSAVE+196*, DQSAVE+202 |
TYP | DQSAVE+26~, DQSAVE+37*, DQSAVE+38, DQSAVE+43, DQSAVE+49, DQSAVE+70, DQSAVE+85, DQSAVE+86, DQSAVE+106, DQSAVE+107 , DQSAVE+150, DQSAVE+151, DQSAVE+166, DQSAVE+167, DQSAVE+174, DQSAVE+175, DQSAVE+185, DQSAVE+186, DQSAVE+193, DQSAVE+194 , DQSAVE+203, DQSAVE+204, DQSAVE+213, DQSAVE+214, DQSAVE+230*, DQSAVE+232, DQSAVE+233, DQSAVE+238*, DQSAVE+240, DQSAVE+245* , DQSAVE+247 |
U | SAVE+4, DQSAVE+37, DQSAVE+45, DQSAVE+51, DQSAVE+52, DQSAVE+53, DQSAVE+54, DQSAVE+56, DQSAVE+57, DQSAVE+58 , DQSAVE+59, DQSAVE+60, DQSAVE+61, DQSAVE+62, DQSAVE+63, DQSAVE+64, DQSAVE+66, DQSAVE+67, DQSAVE+68, DQSAVE+69 , DQSAVE+75, DQSAVE+76, DQSAVE+82, DQSAVE+83, DQSAVE+84, DQSAVE+99, DQSAVE+100, DQSAVE+103, DQSAVE+104, DQSAVE+105 , DQSAVE+110, DQSAVE+116, DQSAVE+117, DQSAVE+118, DQSAVE+119, DQSAVE+120, DQSAVE+121, DQSAVE+123, DQSAVE+125, DQSAVE+127 , DQSAVE+129, DQSAVE+133, DQSAVE+134, DQSAVE+135, DQSAVE+136, DQSAVE+137, DQSAVE+138, DQSAVE+142, DQSAVE+144, DQSAVE+145 , DQSAVE+146, DQSAVE+147, DQSAVE+148, DQSAVE+149, DQSAVE+155, DQSAVE+156, DQSAVE+157, DQSAVE+158, DQSAVE+159, DQSAVE+160 , DQSAVE+161, DQSAVE+162, DQSAVE+163, DQSAVE+165, DQSAVE+171, DQSAVE+172, DQSAVE+173, DQSAVE+179, DQSAVE+180, DQSAVE+181 , DQSAVE+182, DQSAVE+183, DQSAVE+184, DQSAVE+190, DQSAVE+191, DQSAVE+192, DQSAVE+200, DQSAVE+201, DQSAVE+202, DQSAVE+208 , DQSAVE+209, DQSAVE+210, DQSAVE+211, DQSAVE+212, DQSAVE+217, IMMVIS+8, IMMDSG+18, IMMDSG+20 |
UCUMDATA | IMMDSG+14~, IMMDSG+15 |
UCUMDATA(0 | IMMDSG+16 |
VSTR | SAVE+1~, SAVE+4*, SAVE+8 |
X | DQSAVE+26~, DQSAVE+36*, DQSAVE+37*, DQSAVE+45, DQSAVE+51, DQSAVE+52, DQSAVE+53, DQSAVE+54, DQSAVE+56, DQSAVE+57 , DQSAVE+58, DQSAVE+59, DQSAVE+60, DQSAVE+61, DQSAVE+62, DQSAVE+63, DQSAVE+64, DQSAVE+66, DQSAVE+67, DQSAVE+68 , DQSAVE+69, DQSAVE+75, DQSAVE+76, DQSAVE+82, DQSAVE+83, DQSAVE+84, DQSAVE+99, DQSAVE+103, DQSAVE+104, DQSAVE+105 , DQSAVE+110, DQSAVE+116, DQSAVE+117, DQSAVE+118, DQSAVE+119, DQSAVE+120, DQSAVE+121, DQSAVE+123, DQSAVE+125, DQSAVE+127 , DQSAVE+129, DQSAVE+133, DQSAVE+142, DQSAVE+144, DQSAVE+145, DQSAVE+146, DQSAVE+147, DQSAVE+148, DQSAVE+149, DQSAVE+155 , DQSAVE+156, DQSAVE+157, DQSAVE+158, DQSAVE+159, DQSAVE+160, DQSAVE+161, DQSAVE+162, DQSAVE+163, DQSAVE+165, DQSAVE+171 , DQSAVE+172, DQSAVE+173, DQSAVE+179, DQSAVE+180*, DQSAVE+181, DQSAVE+182, DQSAVE+183, DQSAVE+184, DQSAVE+190, DQSAVE+191 , DQSAVE+192, DQSAVE+200, DQSAVE+201, DQSAVE+202, DQSAVE+208, DQSAVE+209, DQSAVE+210, DQSAVE+211, DQSAVE+212, DQSAVE+217 , IMMSRC+1~, IMMROUTE+1~, IMMLOC+1~, IMMLOT+1~, IMMVIS+1~, IMMRMRKS+1~, IMMDSG+1~ |
XAM | DQSAVE+28~, DQSAVE+35*, DQSAVE+188*, DQSAVE+192 |