ECXOPRX ;ALB/JAP,BIR/DMA,CML,PTD-Prescription Extract for DSS ;7/18/19 09:40
Source file <ECXOPRX.m>
Package | Total | Call Graph |
---|---|---|
DSS Extracts | 10 | ($$PREDIV,$$RADDIV)^ECXDEPT ^ECXKILL FILE^ECXOPRX1 QUE^ECXTAUTO ^ECXTRAC ($$ECXDATE,$$PATCAT,$$PRVCLASS)^ECXUTL ($$ENROLLM,$$INP,$$PRIMARY,ECXDEF)^ECXUTL2 $$PAT^ECXUTL3 ($$CNHSTAT,$$ENCNUM,$$HNCI,$$JULDT,$$OBSPAT,$$SHAD)^ECXUTL4 ($$NONVAP,$$PHAAPI,$$RXPTST,NPRF)^ECXUTL5 |
Kernel | 2 | ($$RJ,$$UP)^XLFSTR $$NPI^XUSNPI |
VA FileMan | 2 | $$GET1^DIQ EN^DIQ1 |
National Drug File | 1 | $$DSS^PSNAPIS |
Outpatient Pharmacy | 1 | DIQ^PSODI |
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 |
---|---|---|
BEG | ;entry point from option
|
|
START | ;entry when queued
|
|
V6 | ;version 6 or better
|
|
STUFF | ;get data
|
|
PAT(ECXDFN,ECXDATE,ECXERR) | ;Determine in/outpatient status, movement number, primary care team and provider
|
|
SETUP | ;Set required input for ECXTRAC
|
|
QUE | ; entry point for the background requeuing handled by ECXTAUTO
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | STUFF+72 |
EN^DIQ1 | START+6 |
$$PREDIV^ECXDEPT | STUFF+60 |
$$RADDIV^ECXDEPT | STUFF+56 |
^ECXKILL | BEG+2, QUE+1 |
FILE^ECXOPRX1 | STUFF+75 |
QUE^ECXTAUTO | QUE+1 |
^ECXTRAC | BEG+2 |
$$ECXDATE^ECXUTL | STUFF+55 |
$$PATCAT^ECXUTL | STUFF+26 |
$$PRVCLASS^ECXUTL | STUFF+11 |
$$ENROLLM^ECXUTL2 | PAT+12, PAT+25 |
$$INP^ECXUTL2 | PAT+36 |
$$PRIMARY^ECXUTL2 | PAT+39 |
ECXDEF^ECXUTL2 | SETUP+2 |
$$PAT^ECXUTL3 | PAT+16 |
$$CNHSTAT^ECXUTL4 | STUFF+57 |
$$ENCNUM^ECXUTL4 | STUFF+64 |
$$HNCI^ECXUTL4 | PAT+26 |
$$JULDT^ECXUTL4 | STUFF+68, STUFF+69 |
$$OBSPAT^ECXUTL4 | STUFF+50 |
$$SHAD^ECXUTL4 | PAT+27 |
$$NONVAP^ECXUTL5 | STUFF+24 |
$$PHAAPI^ECXUTL5 | STUFF+37 |
$$RXPTST^ECXUTL5 | STUFF+9 |
NPRF^ECXUTL5 | STUFF+62 |
$$DSS^PSNAPIS | STUFF+44 |
DIQ^PSODI | STUFF+20 |
$$RJ^XLFSTR | STUFF+43, STUFF+45 |
$$UP^XLFSTR | STUFF+72 |
$$NPI^XUSNPI | STUFF+12 |
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | Classic Fileman Calls |
^PSRX - [#52] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TEST" | STUFF+44 |
^ECX(728 - [#728] | START+5 |
^ECX(728.44 - [#728.44] | STUFF+54 |
^PSRX - [#52] | STUFF+2, STUFF+3, STUFF+30, STUFF+31, STUFF+34 |
^PSRX("AD" | START+10 |
^PSRX("AL" | START+8, V6+3 |
^PSRX("AM" | V6+6 |
^PSRX("AR" | STUFF+46 |
^SC - [#44] | STUFF+56 |
^TMP($J | V6+1!, V6+7!, PAT+4, PAT+5, PAT+10, PAT+14, PAT+32*, PAT+33*, PAT+34* |
Name | Field # of Occurrence |
---|---|
^(2 | STUFF+30 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | START+1~, START+5*, START+6!, STUFF+1~, STUFF+18*, STUFF+20, STUFF+21 |
DIC | START+1~, START+5*, START+6!, STUFF+1~, STUFF+17*, STUFF+20 |
DIQ | START+1~, START+5*, START+6!, STUFF+1~, STUFF+19*, STUFF+20 |
DIQ(0 | START+5* |
DR | START+1~, START+5*, START+6!, STUFF+1~, STUFF+16*, STUFF+20, STUFF+21 |
>> ECASNPI | PAT+39* |
>> ECASPR | PAT+39* |
>> ECCAT | STUFF+37* |
>> ECCLAS | PAT+39* |
>> ECCLAS2 | PAT+39* |
>> ECD | START+8*, START+9*, START+10*, V6+2*, V6+3*, V6+5*, V6+6*, STUFF+7, STUFF+46, STUFF+68 , STUFF+69 |
>> ECDATA | STUFF+2*, STUFF+7, STUFF+9, STUFF+11, STUFF+12, STUFF+30, STUFF+31, STUFF+35, STUFF+53, STUFF+55 |
>> ECDATA1 | STUFF+3*, STUFF+33, STUFF+34, STUFF+35 |
>> ECDRG | STUFF+7*, STUFF+37 |
>> ECDS | STUFF+35* |
>> ECED | START+9*, START+10, V6+2*, V6+3, V6+6 |
>> ECFILE | BEG+1, SETUP+2 |
>> ECGRP | SETUP+2 |
>> ECHEAD | STUFF+64, SETUP+1*, SETUP+2 |
>> ECINST | START+4, START+5*, START+6* |
>> ECINV | STUFF+37*, STUFF+39*, STUFF+41* |
>> ECMW | STUFF+30*, STUFF+33*, STUFF+46*, STUFF+47*, STUFF+66 |
>> ECNDC | STUFF+42*, STUFF+43 |
>> ECNFC | STUFF+43*, STUFF+44*, STUFF+45* |
ECNONVAP | START+1~, STUFF+24* |
>> ECOPAY | STUFF+31*, STUFF+34* |
>> ECPACK | SETUP+2 |
>> ECPIECE | SETUP+2 |
>> ECPRC | STUFF+31*, STUFF+34*, STUFF+35 |
>> ECPROF | START+8*, V6+2*, STUFF+11 |
>> ECPRVNPI | STUFF+12*, STUFF+13* |
>> ECPTNPI | PAT+39* |
>> ECPTPR | PAT+39* |
>> ECPTTM | PAT+39* |
>> ECQTY | STUFF+30*, STUFF+33*, STUFF+35 |
>> ECREF | START+9*, V6+2*, V6+5*, STUFF+3 |
>> ECRFL | START+10*, V6+3*, V6+6*, STUFF+3, STUFF+29, STUFF+32, STUFF+34, STUFF+35, STUFF+48 |
>> ECRTN | SETUP+2 |
>> ECRX | START+10*, V6+3*, V6+6*, STUFF+2, STUFF+3, STUFF+18, STUFF+30, STUFF+31, STUFF+34, STUFF+46 , STUFF+72 |
ECRXNUM | START+1~, STUFF+7*, STUFF+9*, STUFF+49 |
ECRXPTST | START+1~, STUFF+7*, STUFF+9* |
>> ECSD1 | START+8, START+9, V6+2, V6+5, PAT+16 |
>> ECUI | STUFF+42* |
>> ECVER | SETUP+2 |
>> ECXA | STUFF+50, STUFF+64, STUFF+71*, STUFF+74*, PAT+36*, PAT+37* |
>> ECXADMDT | STUFF+64, PAT+36*, PAT+37* |
>> ECXAOL | PAT+9*, PAT+24*, PAT+33 |
ECXASIH | STUFF+1~, STUFF+74, PAT+37* |
>> ECXAST | PAT+7*, PAT+20*, PAT+32 |
>> ECXCAT | PAT+2*, PAT+8*, PAT+33 |
ECXCHOCE | START+1~, STUFF+73* |
ECXCLST | START+1~, PAT+11*, PAT+21*, PAT+34 |
>> ECXCNH | STUFF+57* |
>> ECXCNHU | PAT+9*, PAT+24*, PAT+33 |
>> ECXCNTRY | PAT+10*, PAT+21*, PAT+34 |
>> ECXCNTY | PAT+7*, PAT+20*, PAT+32 |
>> ECXCOST | STUFF+35* |
>> ECXCVE | STUFF+7* |
>> ECXCVEDT | STUFF+7* |
>> ECXCVENC | STUFF+7* |
ECXDATE | STUFF+7*, STUFF+11, STUFF+12, STUFF+28, STUFF+64, PAT~, PAT+36, PAT+39 |
ECXDEA | START+2~, STUFF+37* |
ECXDFN | STUFF+7*, STUFF+26, STUFF+28, STUFF+57, PAT~, PAT+4, PAT+5, PAT+10, PAT+12, PAT+14 , PAT+16, PAT+25, PAT+26, PAT+27, PAT+32, PAT+33, PAT+34, PAT+36, PAT+39 |
ECXDIC | START+5!, START+6! |
ECXDIC(4 | START+6 |
ECXDIQ | STUFF+1~ |
ECXDIQ(52 | STUFF+21 |
>> ECXDIV | STUFF+30*, STUFF+33*, STUFF+60 |
>> ECXDOB | PAT+5*, PAT+18*, PAT+32 |
>> ECXDOM | PAT+36*, PAT+37* |
>> ECXDSSD | STUFF+7* |
ECXECL | START+1~ |
>> ECXELIG | PAT+6*, PAT+18*, PAT+32 |
>> ECXENC | STUFF+64*, STUFF+68*, STUFF+69*, STUFF+75 |
>> ECXENRL | PAT+7*, PAT+20*, PAT+32 |
>> ECXERI | PAT+10*, PAT+21*, PAT+34 |
ECXERR | STUFF+7*, STUFF+28, PAT~, PAT+17* |
ECXESC | START+1~, STUFF+22 |
>> ECXEST | PAT+10*, PAT+21*, PAT+34 |
>> ECXETH | PAT+9*, PAT+28*, PAT+33 |
>> ECXHNCI | PAT+9*, PAT+26*, PAT+33 |
>> ECXLOGIC | STUFF+39, STUFF+41, STUFF+65, STUFF+66, STUFF+68, STUFF+70 |
>> ECXMN | PAT+36*, PAT+37* |
>> ECXMPI | PAT+5*, PAT+18*, PAT+32 |
>> ECXMST | PAT+7*, PAT+20*, PAT+32 |
>> ECXMTST | PAT+9*, PAT+24*, PAT+33 |
>> ECXNEW | STUFF+48*, STUFF+49* |
ECXNPRFI | START+1~ |
>> ECXOBS | STUFF+50*, STUFF+64, STUFF+70* |
ECXOCLIN | START+2~, STUFF+53*, STUFF+54, STUFF+56 |
>> ECXOEF | PAT+2*, PAT+10*, PAT+30*, PAT+34 |
>> ECXOEFDT | PAT+2*, PAT+10*, PAT+31*, PAT+34 |
>> ECXORDDT | STUFF+55* |
>> ECXORDPH | STUFF+51* |
>> ECXORDST | STUFF+54* |
ECXPAT | PAT+15!, PAT+16 |
ECXPAT("AO ST | AT" , PAT+20 |
ECXPAT("AOL" | PAT+24 |
ECXPAT("CL ST | AT" , PAT+21 |
ECXPAT("COMBSVCI" | PAT+22 |
ECXPAT("COMBSVCL" | PAT+22 |
ECXPAT("COUNTRY" | PAT+21 |
ECXPAT("COUNTY" | PAT+20 |
ECXPAT("DOB" | PAT+18 |
ECXPAT("EC ST | AT" , PAT+21 |
ECXPAT("ECXOEF" | PAT+30 |
ECXPAT("ECXOEFDT" | PAT+31 |
ECXPAT("ELIG" | PAT+18 |
ECXPAT("ENROL | L LOC" , PAT+20 |
ECXPAT("ERI" | PAT+21 |
ECXPAT("ETHNIC" | PAT+28 |
ECXPAT("IR ST | AT" , PAT+19 |
ECXPAT("MEANS" | PAT+24 |
ECXPAT("MPI" | PAT+18 |
ECXPAT("MST S | TAT" , PAT+20 |
ECXPAT("NAME" | PAT+18 |
ECXPAT("PHI" | PAT+24 |
ECXPAT("POS" | PAT+24 |
ECXPAT("POW L | OC" , PAT+19 |
ECXPAT("POW S | TAT" , PAT+19 |
ECXPAT("RACE" | PAT+19 |
ECXPAT("RACE1" | PAT+28 |
ECXPAT("SEX" | PAT+18 |
ECXPAT("SSN" | PAT+18 |
ECXPAT("STATE" | PAT+20 |
ECXPAT("VET" | PAT+19 |
ECXPAT("VIETNAM" | PAT+21 |
ECXPAT("ZIP" | PAT+20 |
>> ECXPATCAT | STUFF+26*, PAT+11*, PAT+34 |
ECXPDIV | STUFF+60~* |
ECXPHA | STUFF+1~, STUFF+2*, STUFF+37*, STUFF+42, STUFF+43 |
>> ECXPHI | PAT+8*, PAT+24*, PAT+33 |
>> ECXPLOC | PAT+6*, PAT+19*, PAT+32 |
>> ECXPNM | PAT+5*, PAT+18*, PAT+32 |
>> ECXPOS | PAT+9*, PAT+24*, PAT+33 |
>> ECXPRIOR | PAT+2*, PAT+8*, PAT+33 |
>> ECXPROV | STUFF+11*, STUFF+24 |
>> ECXPROVN | STUFF+7* |
>> ECXPROVP | STUFF+11* |
>> ECXPST | PAT+6*, PAT+19*, PAT+32 |
>> ECXRACE | PAT+6*, PAT+19*, PAT+32 |
>> ECXRC1 | PAT+9*, PAT+28*, PAT+33 |
>> ECXRST | PAT+6*, PAT+19*, PAT+32 |
ECXRXREM | START+1~, STUFF+72*, STUFF+73 |
>> ECXSBGRP | PAT+2* |
ECXSCRX | START+1~, STUFF+22* |
>> ECXSEX | PAT+5*, PAT+18*, PAT+32 |
>> ECXSHAD | PAT+11*, PAT+34 |
>> ECXSHADI | PAT+11*, PAT+27*, PAT+34 |
>> ECXSSN | STUFF+64, STUFF+66, STUFF+68, STUFF+69, PAT+5*, PAT+18*, PAT+32 |
ECXSTANO | START+2~, STUFF+56* |
>> ECXSTAT | PAT+2*, PAT+8*, PAT+33 |
>> ECXSTATE | PAT+7*, PAT+20*, PAT+32 |
>> ECXSVCI | PAT+22* |
>> ECXSVCL | PAT+22* |
>> ECXTS | STUFF+50, STUFF+64, PAT+36*, PAT+37* |
>> ECXVET | PAT+6*, PAT+19*, PAT+32 |
>> ECXVNS | PAT+11*, PAT+21*, PAT+34 |
>> ECXYM | STUFF+44, STUFF+55 |
>> ECXZIP | PAT+7*, PAT+20*, PAT+32 |
OK | PAT+1~, PAT+14, PAT+16*, PAT+17 |
>> P1 | STUFF+43*, STUFF+44, STUFF+45 |
>> P3 | STUFF+43*, STUFF+44, STUFF+45 |
PT | PAT+1~, PAT+5*, PAT+6, PAT+7, PAT+8, PAT+9 |
>> PT1 | PAT+10*, PAT+11 |
>> QFLG | START+3*, START+10, V6+3, V6+4, V6+6 |
TMP | STUFF+67~, STUFF+68*, STUFF+69* |
U | START+5, STUFF+7, STUFF+9, STUFF+11, STUFF+12, STUFF+13, STUFF+30, STUFF+31, STUFF+33, STUFF+34 , STUFF+35, STUFF+37, STUFF+42, STUFF+43, STUFF+53, STUFF+54, STUFF+55, STUFF+56, PAT+5, PAT+6 , PAT+7, PAT+8, PAT+9, PAT+10, PAT+11, PAT+32, PAT+33, PAT+34, PAT+37, PAT+39 |
X | START+1~, STUFF+44*, PAT+1~, PAT+36*, PAT+37, PAT+39* |