SDECPAT ;ALB/SAT - VISTA SCHEDULING RPCS ;JAN 15, 2016
Source file <SDECPAT.m>
| 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 |
|---|---|---|
| START(SDDFN,DFN,SSN,AGE,DOB,SEX) | ;
|
|
| KILL | ;PEP - KILL VARIABLES SET BY THIS ROUTINE
|
|
| AGE(DFN,D,F) | ;PEP - Given DFN, return Age.
|
|
| CDEATH(DFN,F) | ;PEP - returns Cause of Death in F format
|
|
| DEC(PID) | ;PEP - RETURN DECRYPTED PATIENT IDENTIFIER
|
|
| ENC(DFN) | ;PEP
|
|
| DOB(DFN,F) | ;PEP - Given DFN, return Date of Birth according to F.
|
|
| DOD(DFN,F) | ;PEP - Given DFN, return Date of Death in FM format.
|
|
| ELIGSTAT(DFN,F) | ;PEP - returns eligibility status in F format
|
|
| HRN(DFN,L,F) | ;PEP
|
|
| MCD(P,D) | ;PEP - Is patient P medicaid eligible on date D?
|
|
| MCDPN(P,D,F) | ;PEP - return medicaid plan name for patient P on date D in form F.
|
|
| MCR(P,D) | ;PEP - Is patient P medicare eligible on date D?
|
|
| PI(P,D) | ;PEP - Is patient P private insurance eligible on date D?
|
|
| PIN(P,D,F) | ;PEP - return private insurer name for patient P on date D in form F.
|
|
| SEX(DFN) | ;PEP - Given DFN, return Sex.
|
|
| SSN(DFN) | ;PEP - Given DFN, return SSN.
|
|
| RR(P,D) | ;PEP - Is patient P railroad eligible on date D?
|
| Name | Field # of Occurrence |
|---|---|
| ^%DTC | START+5 |
| $$MCD^SDECPAT2 | MCD+1 |
| $$MCDPN^SDECPAT2 | MCDPN+1 |
| $$MCR^SDECPAT2 | MCR+1 |
| $$PI^SDECPAT2 | PI+1 |
| $$PIN^SDECPAT2 | PIN+1 |
| $$RRE^SDECPAT2 | RR+1 |
| $$AGE^SDECPAT3 | AGE+2 |
| $$CDEATH^SDECPAT3 | CDEATH+1 |
| $$DOB^SDECPAT3 | DOB+1 |
| $$DOD^SDECPAT3 | DOD+1 |
| $$ELIGSTAT^SDECPAT3 | ELIGSTAT+1 |
| $$HRN^SDECPAT3 | HRN+2 |
| $$SEX^SDECPAT3 | SEX+1 |
| $$SSN^SDECPAT3 | SSN+1 |
| $$DEC^SDECPAT4 | DEC+1 |
| $$ENC^SDECPAT4 | ENC+1 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | START+3 |
| Name | Line Occurrences |
|---|---|
| $$AGE | START+13 |
| $$DOB | START+14 |
| $$SEX | START+15 |
| $$SSN | START+12 |
| Name | Field # of Occurrence |
|---|---|
| ^( | START+3 |
| ^(0 | START+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %T | START+10! |
| %Y | START+10! |
| AGE | START~, START+13*, KILL+2! |
| AUPNDAYS | START+6*, KILL+1! |
| AUPNDOB | START+3*, START+4, KILL+1! |
| AUPNDOD | START+3*, START+4, KILL+1! |
| AUPNPAT | START+2*, START+3, START+11, START+12, START+13, START+14, START+15, KILL+1! |
| AUPNPATX | START+1*, START+9, START+10! |
| AUPNSEX | START+3*, KILL+1! |
| D | AGE~, AGE+2, MCD~, MCD+1, MCDPN~, MCDPN+1, MCR~, MCR+1, PI~, PI+1 , PIN~, PIN+1, RR~, RR+1 |
| DFN | START~, START+11*, KILL+2!, AGE~, AGE+2, CDEATH~, CDEATH+1, ENC~, ENC+1, DOB~ , DOB+1, DOD~, DOD+1, ELIGSTAT~, ELIGSTAT+1, HRN~, HRN+2, SEX~, SEX+1, SSN~ , SSN+1 |
| DOB | START~, START+14*, KILL+2! |
| DT | START+4 |
| F | AGE~, AGE+2, CDEATH~, CDEATH+1, DOB~, DOB+1, DOD~, DOD+1, ELIGSTAT~, ELIGSTAT+1 , HRN~, HRN+2, MCDPN~, MCDPN+1, PIN~, PIN+1 |
| L | HRN~, HRN+2 |
| P | MCD~, MCD+1, MCDPN~, MCDPN+1, MCR~, MCR+1, PI~, PI+1, PIN~, PIN+1 , RR~, RR+1 |
| PID | DEC~, DEC+1 |
| SDDFN | START~, START+2 |
| SEX | START~, START+15*, KILL+2! |
| SSN | START~, START+12*, KILL+2! |
| U | START+3 |
| X | START+1, START+6, START+8!, START+9* |
| X1 | START+4*, START+8! |
| X2 | START+4*, START+8! |
