ECXUTL5 ;ALB/JRC - Utilities for DSS Extracts ;5/9/19 16:31
Source file <ECXUTL5.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 2 | $$FMTHL7^XLFDT $$RJ^XLFSTR |
Registration | 2 | $$CVEDT^DGCV $$GETACT^DGPFAPI |
Inpatient Medications | 1 | ALL^PSJ59P5 |
Outpatient Pharmacy | 1 | DIQ^PSODI |
Pharmacy Data Management | 1 | DATA^PSS50 |
VA FileMan | 1 | EN^DIQ1 |
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 |
---|---|---|
REPEAT(CHAR,TIMES) | ;REPEAT A STRING
|
|
INSERT(INSTR,OUTSTR,COLUMN,LENGTH) | ;INSERT A STRING INTO ANOTHER
|
|
TYPE(DFN) | ;Determine patient type DBIA #2511
; input ; DFN = patient ien |
|
CVEDT(DFN,DATE) | ;Determine patient CV status DBIA #4156
; input ; DFN = patient ien |
|
NPRF | ;National patient record flags DBIA #3860
|
|
RXPTST(K) | ;Rx patient status DBIA #2511
|
|
NONVAP(K) | ;Non-va prescriber DBIA #10060
|
|
DOIVPO(K,L) | ;Add destination for outpatient ivp orders
; Input K - DFN ; L - Order # from Pharmacy Patient File (#55) |
|
DOUDO(K,L) | ;Add destination for outpatient udp orders
; Input K - DFN ; L - Order # from Pharmacy Patient File (#55) |
|
PHAAPI(DRUG) | ;Call Pharmacy drug file API dbia 4483
; Input: drug file (#50) ien |
|
TSSC(X) | ;Check treating specialty (ts) and if ts equals any of the following
|
|
PSJ59P5(X) | ;Get iv room division
; Input X - iv room ien |
|
SCRX(IEN) | ;Service connected prescription
|
|
SSN(SSN,FILE) | ; extended validation of ssn
; input: ssn - social security number to validate ; file - optional "", 2 or 67, the only check is for ; reference lab file (#67) in which case ssn ; "000123456" is considered a valid ssn. ; output: 0 - test patient or invalid ssn ; 1 - valid ssn |
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | Classic Fileman Calls |
^DIC(40.7 - [#40.7] | Classic Fileman Calls |
^SC - [#44] | Classic Fileman Calls |
^PS(53 - [#53] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(391 - [#391] | TYPE+20 |
^DPT - [#2] | TYPE+18 |
^TMP($J | PSJ59P5+9, PSJ59P5+10! |
Name | Line Occurrences |
---|---|
$$TSSC | DOIVPO+13, DOUDO+11 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARRAY | PHAAPI+9~, PHAAPI+11*, PHAAPI+12*, PHAAPI+13, PHAAPI+15, PHAAPI+16, PHAAPI+17, PHAAPI+18, PHAAPI+23 |
CHAR | REPEAT~, REPEAT+7, REPEAT+10 |
CLASS | PHAAPI+9~, PHAAPI+11*, PHAAPI+16*, PHAAPI+24 |
CLINIC | DOIVPO+8~, DOIVPO+9*, DOIVPO+17*, DOIVPO+18, DOIVPO+20, DOIVPO+21, DOIVPO+22, DOIVPO+25, DOUDO+8~, DOUDO+9* , DOUDO+16*, DOUDO+17, DOUDO+19, DOUDO+20, DOUDO+21, DOUDO+24 |
>> CNT | NPRF+2*, NPRF+3, NPRF+4 |
>> CODE | TSSC+6*, TSSC+7 |
COLUMN | INSERT~, INSERT+15*, INSERT+19, INSERT+20 |
CVSTAT | CVEDT+9~, CVEDT+10*, CVEDT+14*, CVEDT+15, CVEDT+17, CVEDT+19, CVEDT+22 |
DA | RXPTST+5*, NONVAP+4*, DOIVPO+8~, DOIVPO+15*, DOIVPO+20*, DOIVPO+24*, DOUDO+8~, DOUDO+14*, DOUDO+19*, DOUDO+23* , SCRX+2~, SCRX+5*, SCRX+6, SCRX+7 |
DA( | DOIVPO+15*, DOUDO+14* |
DATA | PHAAPI+9~, PHAAPI+11* |
DATE | CVEDT~, CVEDT+14 |
DFN | TYPE~, TYPE+16, TYPE+18, CVEDT~, CVEDT+12, CVEDT+14 |
DIC | RXPTST+5*, NONVAP+4*, DOIVPO+8~, DOIVPO+15*, DOIVPO+20*, DOIVPO+24*, DOUDO+8~, DOUDO+14*, DOUDO+19*, DOUDO+23* , SCRX+2~, SCRX+5*, SCRX+6 |
DIQ | RXPTST+5*, NONVAP+4*, DOIVPO+8~, DOIVPO+15*, DOIVPO+20*, DOIVPO+24*, DOUDO+8~, DOUDO+14*, DOUDO+19*, DOUDO+23* , SCRX+5*, SCRX+6 |
DIQ(0 | RXPTST+5*, NONVAP+4*, DOIVPO+15*, DOIVPO+20*, DOIVPO+24*, DOUDO+14*, DOUDO+19*, DOUDO+23* |
DIV | PSJ59P5+5~*, PSJ59P5+7, PSJ59P5+9*, PSJ59P5+11 |
DOIVPO | DOIVPO+8~, DOIVPO+9*, DOUDO+8~, DOUDO+9* |
DR | RXPTST+5*, NONVAP+4*, DOIVPO+8~, DOIVPO+15*, DOIVPO+20*, DOIVPO+24*, DOUDO+8~, DOUDO+14*, DOUDO+19*, DOUDO+23* , SCRX+2~, SCRX+5*, SCRX+6 |
DR( | DOIVPO+15*, DOUDO+14* |
DRUG | PHAAPI~, PHAAPI+14, PHAAPI+16, PHAAPI+17, PHAAPI+18, PHAAPI+21 |
DUPOU | PHAAPI+10~, PHAAPI+11*, PHAAPI+18*, PHAAPI+24 |
ECXARR | NPRF+1~ |
ECXARR( | NPRF+5 |
>> ECXCVE | CVEDT+10*, CVEDT+17* |
>> ECXCVEDT | CVEDT+10*, CVEDT+19*, CVEDT+20* |
>> ECXCVENC | CVEDT+10*, CVEDT+22* |
>> ECXDFN | NPRF+2 |
ECXDIC | RXPTST+1~, RXPTST+2*, NONVAP+1~, NONVAP+2*, DOIVPO+8~, DOIVPO+9*, DOUDO+8~, DOUDO+9* |
ECXDIC( | DOIVPO+17, DOUDO+16 |
ECXDIC(200 | NONVAP+6 |
ECXDIC(53 | RXPTST+7 |
ECXDICA | DOIVPO+8~, DOIVPO+9*, DOUDO+8~, DOUDO+9* |
ECXDICA(44 | DOIVPO+21, DOUDO+20 |
ECXDICB | DOIVPO+8~, DOIVPO+9*, DOUDO+8~, DOUDO+9* |
ECXDICB( | DOIVPO+25, DOIVPO+26, DOUDO+24, DOUDO+25 |
ECXDIQ | SCRX+2~ |
ECXDIQ(52 | SCRX+7 |
>> ECXNPRFI | NPRF+2*, NPRF+5* |
ECXPTYPE | TYPE+14~, TYPE+17*, TYPE+19, TYPE+20*, TYPE+21*, TYPE+22 |
>> ECXTS | DOIVPO+13, DOUDO+11 |
END | INSERT+18~, INSERT+20*, INSERT+22 |
FILE | SSN~, SSN+10*, SSN+11 |
FLG | NPRF+1~, NPRF+2*, NPRF+4, NPRF+5* |
FRONT | INSERT+18~, INSERT+19*, INSERT+22 |
>> I | NPRF+4*, NPRF+5 |
IEN | SCRX~, SCRX+4, SCRX+5 |
INSTR | INSERT~, INSERT+13, INSERT+16, INSERT+22 |
INV | PHAAPI+9~, PHAAPI+11*, PHAAPI+17*, PHAAPI+21, PHAAPI+24 |
K | RXPTST~, RXPTST+4, RXPTST+5, RXPTST+7, NONVAP~, NONVAP+3, NONVAP+4, NONVAP+6, DOIVPO~, DOIVPO+11 , DOIVPO+15, DOUDO~, DOUDO+13, DOUDO+14 |
L | DOIVPO~, DOIVPO+11, DOIVPO+15, DOIVPO+17, DOUDO~, DOUDO+13, DOUDO+14, DOUDO+16 |
LENGTH | INSERT~, INSERT+16*, INSERT+20, INSERT+22 |
NAME | PHAAPI+9~, PHAAPI+11*, PHAAPI+16*, PHAAPI+24 |
NDC | PHAAPI+9~, PHAAPI+11*, PHAAPI+16*, PHAAPI+19, PHAAPI+21*, PHAAPI+22*, PHAAPI+24 |
NDF | PHAAPI+9~, PHAAPI+11* |
NONVAP | NONVAP+1~, NONVAP+2*, NONVAP+3, NONVAP+6*, NONVAP+7*, NONVAP+8 |
OUTSTR | INSERT~, INSERT+14, INSERT+15, INSERT+19, INSERT+20 |
P1 | PHAAPI+9~, PHAAPI+11*, PHAAPI+17*, PHAAPI+24 |
P3 | PHAAPI+9~, PHAAPI+11*, PHAAPI+17*, PHAAPI+19, PHAAPI+24 |
PPDU | PHAAPI+9~, PHAAPI+11*, PHAAPI+17*, PHAAPI+24 |
PPOU | PHAAPI+10~, PHAAPI+11*, PHAAPI+18*, PHAAPI+24 |
SCODE | DOIVPO+8~, DOIVPO+9*, DOIVPO+11, DOIVPO+13*, DOIVPO+18, DOIVPO+21*, DOIVPO+22*, DOIVPO+24, DOIVPO+25*, DOIVPO+26* , DOIVPO+27, DOUDO+8~, DOUDO+9*, DOUDO+11*, DOUDO+13, DOUDO+17, DOUDO+20*, DOUDO+21*, DOUDO+23, DOUDO+24* , DOUDO+25*, DOUDO+26 |
SSN | SSN~, SSN+9, SSN+11, SSN+12, SSN+13, SSN+14, SSN+15, SSN+16, SSN+17, SSN+18 |
STAT | RXPTST+1~, RXPTST+2*, RXPTST+4, RXPTST+7*, RXPTST+8*, RXPTST+9 |
TIMES | REPEAT~, REPEAT+8, REPEAT+10 |
TYPE | TYPE+14~, TYPE+17*, TYPE+18*, TYPE+19, TYPE+20 |
U | TYPE+20, CVEDT+17, CVEDT+19, CVEDT+22, DOIVPO+22, DOIVPO+25, DOUDO+21, DOUDO+24, PHAAPI+17, PHAAPI+24 , PSJ59P5+9 |
UNIT | PHAAPI+9~, PHAAPI+17*, PHAAPI+24 |
X | TSSC~, TSSC+6, PSJ59P5~, PSJ59P5+7, PSJ59P5+8, PSJ59P5+9 |