ECXNUT ;ALB/JRC Nutrition DSS Extract ; 10/31/08 1:57pm
Source file <ECXNUT.m>
Package | Total | Call Graph |
---|---|---|
DSS Extracts | 10 | $$GETDIV^ECXDEPT ^ECXKILL GETMEALS^ECXNUT1 $$CBOC^ECXSCX2 ^ECXTRAC ($$ECXDATE,$$ECXTIME,$$PATCAT,$$PRVCLASS)^ECXUTL ($$ENROLLM,$$INP,$$PRIMARY,ECXDEF)^ECXUTL2 $$PAT^ECXUTL3 ($$ENCNUM,$$HNCI,$$OBSPAT,$$SHAD)^ECXUTL4 NPRF^ECXUTL5 |
Registration | 2 | $$TSDATA^DGACT $$EMGRES^DGUTL |
Dietetics | 1 | DATA^FHDSSAPI |
Kernel | 1 | $$NPI^XUSNPI |
VA FileMan | 1 | IX1^DIK |
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 | ; start package specific extract
|
|
GET | ;gather extract data
|
|
PAT(ECXDFN) | ;get/set patient data
; INPUT - ECXDFN = patient ien (DFN) ; OUTPUT - ECPAT array: ; ECPAT("SSN") ; ECPAT("NAME") ; returns 0 or 1 in ECXERR - 0=successful ; 1=error condition |
|
FILE | ;file the n&fs extract record
|
|
SETUP | ;Set required input for ECXTRAC.
|
Name | Field # of Occurrence |
---|---|
$$TSDATA^DGACT | FILE+28 |
$$EMGRES^DGUTL | GET+60 |
IX1^DIK | FILE+46 |
$$GETDIV^ECXDEPT | GET+40 |
^ECXKILL | BEG+3 |
GETMEALS^ECXNUT1 | START+10 |
$$CBOC^ECXSCX2 | GET+41 |
^ECXTRAC | BEG+3 |
$$ECXDATE^ECXUTL | GET+30, FILE+40 |
$$ECXTIME^ECXUTL | GET+29 |
$$PATCAT^ECXUTL | GET+63 |
$$PRVCLASS^ECXUTL | GET+7 |
$$ENROLLM^ECXUTL2 | GET+27 |
$$INP^ECXUTL2 | GET+33 |
$$PRIMARY^ECXUTL2 | GET+44 |
ECXDEF^ECXUTL2 | SETUP+2 |
$$PAT^ECXUTL3 | PAT+10 |
$$ENCNUM^ECXUTL4 | GET+66 |
$$HNCI^ECXUTL4 | GET+51 |
$$OBSPAT^ECXUTL4 | GET+48 |
$$SHAD^ECXUTL4 | GET+54 |
NPRF^ECXUTL5 | GET+57 |
DATA^FHDSSAPI | START+7 |
$$NPI^XUSNPI | GET+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADM | GET+3~, GET+33*, GET+35, GET+36, GET+37, GET+38 |
ARRAY | START+2~, START+3*, START+4, START+13 |
DA | FILE+21~, FILE+46*! |
>> DATE | GET+7, GET+8, GET+29, GET+30, GET+33, GET+44, GET+66 |
DIK | FILE+21~, FILE+46*! |
EC23 | BEG+1~, FILE+23 |
EC7 | BEG+1~, FILE+22*, FILE+23, FILE+44, FILE+46 |
ECCLASS | GET+3~, GET+45*, FILE+32 |
ECED | BEG+1~, START+3*, START+7 |
ECFILE | BEG+1~, BEG+2, FILE+22, FILE+44, FILE+46, SETUP+2 |
ECGRP | BEG+1~, SETUP+2 |
ECHEAD | BEG+1~, GET+66, SETUP+1*, SETUP+2 |
ECINST | BEG+1~, FILE+23 |
ECODE | FILE+21~, FILE+23*, FILE+31*, FILE+32*, FILE+33*, FILE+34*, FILE+35*, FILE+36*, FILE+44 |
ECODE1 | FILE+21~, FILE+37*, FILE+38*, FILE+39*, FILE+40*, FILE+41*, FILE+42*, FILE+43*, FILE+44 |
ECORNPI | GET+3~, GET+8*, GET+9*, FILE+41 |
ECPACK | BEG+1~, SETUP+2 |
ECPAT | GET+3~, PAT+10 |
ECPAT("AO STA | T" , GET+20 |
ECPAT("AOL" | GET+20 |
ECPAT("COUNTRY" | GET+19 |
ECPAT("COUNTY" | GET+18 |
ECPAT("DOB" | GET+17 |
ECPAT("EC STA | T" , GET+20 |
ECPAT("ECXOEF" | GET+23 |
ECPAT("ECXOEFDT" | GET+24 |
ECPAT("ELIG" | GET+17 |
ECPAT("ENROLL | LOC" , GET+17 |
ECPAT("ETHNIC" | GET+17 |
ECPAT("IR STA | T" , GET+20 |
ECPAT("MEANS" | GET+18 |
ECPAT("MPI" | GET+17 |
ECPAT("MST ST | AT" , GET+18 |
ECPAT("NAME" | GET+17 |
ECPAT("PHI" | GET+18 |
ECPAT("POS" | GET+20 |
ECPAT("POW LO | C" , GET+18 |
ECPAT("POW ST | AT" , GET+18 |
ECPAT("RACE1" | GET+17 |
ECPAT("SEX" | GET+17 |
ECPAT("SSN" | GET+17 |
ECPAT("STATE" | GET+18 |
ECPAT("VET" | GET+17 |
ECPAT("ZIP" | GET+18 |
ECPIECE | BEG+1~, SETUP+2 |
>> ECPTNPI | GET+45*, FILE+41 |
ECPTPR | GET+3~, GET+45*, FILE+32 |
ECPTTM | GET+3~, GET+45*, FILE+32 |
ECRN | BEG+1~, FILE+45* |
ECRTN | BEG+1~, SETUP+2 |
ECSD | START+2~, START+3*, START+7 |
ECSD1 | BEG+1~, START+3 |
ECVER | BEG+1~, SETUP+2 |
ECXA | GET+3~, GET+33*, GET+34, GET+48, GET+66, FILE+23 |
ECXADMDT | GET+3~, GET+35*, GET+66, FILE+40 |
ECXAOL | GET+2~, GET+20*, FILE+34 |
ECXAST | GET+2~, GET+20*, FILE+34 |
ECXATNPI | GET+3~, GET+37* |
ECXATT | GET+3~, GET+37* |
ECXATTPC | GET+3~, GET+38* |
ECXCAT | GET+3~, FILE+33 |
ECXCBOC | GET+3~, GET+41*, FILE+39 |
ECXCNTRY | GET+4~, GET+19*, FILE+42 |
ECXCNTY | GET+2~, GET+18*, FILE+36 |
ECXCVE | GET+3~, FILE+39 |
ECXDATA | FILE+27~, FILE+28* |
ECXDATA(7 | FILE+29 |
ECXDATE | GET+2~, GET+30*, FILE+31 |
>> ECXDFL | FILE+38 |
ECXDFN | GET+13*, GET+14, GET+27, GET+33, GET+44, GET+51, GET+54, GET+60, GET+63, PAT~ , PAT+10, FILE+23 |
>> ECXDLT | FILE+38 |
ECXDOB | GET+2~, GET+17*, FILE+32 |
ECXDOM | GET+3~, GET+38*, FILE+37 |
ECXELIG | GET+2~, GET+17*, FILE+34 |
ECXENC | GET+3~, GET+66*, GET+67, FILE+37 |
ECXENRL | GET+2~, GET+17*, FILE+33 |
ECXERI | GET+3~, GET+60*, FILE+40 |
ECXERR | GET+3~, GET+14*, GET+15, PAT+9*, PAT+11*, PAT+12 |
ECXEST | GET+2~, GET+20*, FILE+35 |
ECXETH | GET+2~, GET+17*, FILE+33 |
ECXFAC | GET+3~, GET+36*, GET+40, GET+41 |
>> ECXFDD | FILE+38 |
>> ECXFPD | FILE+37 |
>> ECXFPF | FILE+38 |
ECXHNCI | GET+3~, GET+51*, FILE+35 |
>> ECXKEY | FILE+38 |
>> ECXLOGIC | FILE+41, FILE+42, FILE+43 |
ECXMN | GET+2~, GET+35* |
ECXMNS | GET+2~, GET+18*, FILE+36 |
ECXMPI | GET+2~, GET+17*, FILE+32 |
ECXMST | GET+2~, GET+18*, FILE+35 |
ECXNPRFI | GET+3~, GET+57~, FILE+39 |
ECXOBS | GET+3~, GET+48*, GET+66, FILE+37 |
ECXOEF | GET+4~, GET+23*, FILE+41 |
ECXOEFDT | GET+4~, GET+24*, FILE+41 |
ECXORDPC | GET+2~, GET+7*, FILE+31 |
>> ECXORDPH | GET+7, GET+8, GET+10*, FILE+31 |
ECXPAT | PAT+10! |
>> ECXPATCAT | GET+63*, FILE+43 |
ECXPDIV | GET+3~, GET+40*, FILE+37 |
ECXPHI | GET+2~, GET+18*, FILE+35 |
ECXPLOC | GET+2~, GET+18*, FILE+35 |
ECXPNM | GET+2~, GET+17*, FILE+23 |
ECXPOS | GET+2~, GET+20*, FILE+34 |
ECXPRIOR | GET+3~, FILE+34 |
ECXPRNPI | GET+3~, GET+37* |
ECXPRV | GET+3~, GET+37* |
ECXPRVPC | GET+3~, GET+38* |
ECXPST | GET+2~, GET+18*, FILE+35 |
ECXPTYPE | GET+3~, FILE+39 |
>> ECXQTY | FILE+38 |
ECXRC1 | GET+2~, GET+17*, FILE+33 |
ECXRST | GET+2~, GET+20*, FILE+34 |
ECXSEX | GET+2~, GET+17*, FILE+32 |
>> ECXSHADI | GET+54*, FILE+43 |
ECXSPC | GET+2~, GET+35*, GET+48, GET+66, FILE+28, FILE+29*, FILE+31 |
ECXSSN | GET+2~, GET+17*, GET+66, FILE+23 |
ECXSTAT | GET+3~, FILE+33 |
ECXSTATE | GET+2~, GET+18*, FILE+36 |
>> ECXTFU | FILE+41 |
ECXTM | GET+2~, GET+29*, FILE+31 |
ECXUESTA | GET+3~, FILE+39 |
ECXVET | GET+2~, GET+17*, FILE+33 |
ECXWRD | GET+3~, GET+36* |
ECXYM | BEG+1~, GET+30, FILE+40 |
ECXZIP | GET+2~, GET+18*, FILE+37 |
>> FHDFN | GET+13 |
OK | PAT+7~, PAT+10*, PAT+11 |
>> P | GET+34 |
U | GET+9, GET+13, GET+33, GET+35, GET+36, GET+37, GET+38, GET+45, FILE+23, FILE+31 , FILE+32, FILE+33, FILE+34, FILE+35, FILE+36, FILE+37, FILE+38, FILE+39, FILE+40, FILE+41 , FILE+42, FILE+43 |
W | GET+3~, GET+36* |
X | GET+3~, GET+44*, GET+45, PAT+7~ |