IVMUFNC4 ;ALB/KCL - IVM UTILITIES ; 12/21/00 3:15pm
Source file <IVMUFNC4.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DAT1(X,Y) | ; extrinsic function - convert FM date to displayable (mm/dd/yy) format.
|
|
| DAT2(Y) | ; extrinsic function - convert FM date to displayable (mmm dd yyyy) format
|
|
| STATE1(X) | ; extrinsic function - convert state abbreviation to state pointer
|
|
| PT(DFN) | ; Returns patient name^long patient id^short patient id,
; or null if not found. ; Input: DFN -- Pointer to the patient in file #2 |
|
| NTE(DFN,IVMOUT,IVMMTDT) | ; - entry point to get comments from a specified means test
|
|
| ENQ | ||
| GET | ; - get comment nodes and place in array
|
|
| MSH(IVMNOMSH,IVMFLL,IVMREC,IVMCT,IVMCNTID) | ; --
; Description: Message header processing for HL7 full data transmissions (Z07). |
|
| MSGID(IVMCT) | ; --
; Description: Put the batch number (HL7 msg event counter) into MSH ; segment. Concatinate msg control id with hyphen msg event counter. |
|
| IEN(X) | ; Get the ien for a segment from HL7 SEGMENT (#771.3) file
; Input: X -- .01 field from file #771.3 |
|
| BTCLM(DFN,INDATE) | ; --
; Description: This function will be used to find a patients Beneficiary Travel claim record for the current income year. |
|
| BTCLMQ | ||
| LD(DFN) | ; --
; Description: This function will return a date based on the patient's ; last Means Test or Copay test. ; 1) The current year will be checked for a MT/CT, if found the ; current date will be returned. ; 2) The prior year will be checked for a MT/CT, if found the ; last day (12/31) of prior year will be returned. ; 3) Otherwise, the current date will be returned. |
| FileNo | Call Tags |
|---|---|
| ^HL(771.3 - [#771.3] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGBT(392 - [#392] | BTCLM+20 |
| ^DGMT(408.31 - [#408.31] | NTE+17, GET+2, GET+3 |
| ^DIC(5 - [#5] | STATE1+8 |
| ^DPT - [#2] | PT+4 |
| ^IVM(301.9 - [#301.9] | MSH+47, MSH+54 |
| ^TMP("HLS" | MSH+28, MSH+38*, MSH+51*, MSH+58*, MSGID+18, MSGID+20* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | DAT2+6~ |
| CTR | NTE+14~, GET+1*, GET+4, GET+5* |
| DFN | PT~, PT+4, NTE~, NTE+15, NTE+16, BTCLM~, BTCLM+14, BTCLM+20, LD~, LD+21 |
| DIC | IEN+2~, IEN+3* |
| DIC(0 | IEN+3* |
| DT | NTE+16, BTCLM+17, LD+18, LD+29, LD+32 |
| >> HL | MSH+25, MSH+37 |
| >> HLEID | MSH+25 |
| >> HLEVN | MSH+36, MSGID+19 |
| >> HLFS | MSH+28, MSH+51, MSGID+18, MSGID+20 |
| >> HLMID | MSH+36 |
| INDATE | BTCLM~, BTCLM+17*, BTCLM+23 |
| >> IVMCLAIM | BTCLM+14*, BTCLM+20*, BTCLM+23*, BTCLMQ |
| IVMCNTID | MSH~, MSH+28*, MSGID+18*, MSGID+19*, MSGID+20 |
| IVMCT | MSH~, MSH+28, MSH+32*, MSH+38, MSH+41, MSH+51*, MSH+58*, MSGID~, MSGID+18, MSGID+20 |
| IVMDA | NTE+14~, GET+1*, GET+2*, GET+3 |
| IVMDATE | DAT1+7~, DAT1+8*, DAT1+9*, DAT1+10 |
| IVMFLL | MSH~, MSH+44 |
| >> IVMHLMID | MSH+47*, MSH+51 |
| IVMIEN | NTE+14~, NTE+16*, NTE+17, GET+2, GET+3 |
| IVMLAST | LD+15~, LD+21*, LD+26, LD+29, LD+32 |
| IVMLD | LD+15~, LD+18*, LD+21, LD+32*, LD+34 |
| IVMMTDT | NTE~, NTE+16 |
| IVMNOMSH | MSH~, MSH+28, MSH+31 |
| IVMOUT | NTE~ |
| IVMOUT( | GET+5* |
| >> IVMQRD | MSH+54*, MSH+58 |
| IVMREC | MSH~, MSH+47, MSH+54 |
| MID | MSH+24~, MSH+36*, MSH+37 |
| NODE | NTE+14~, GET+3*, GET+4, GET+5* |
| RESULT | MSH+24~, MSH+37, MSH+38 |
| T | DAT1+7~, DAT1+9* |
| X | DAT1~, DAT1+8, DAT1+9, STATE1~, STATE1+6, STATE1+7*, STATE1+8, PT+3~*, PT+4*, PT+5 , IEN~ |
| Y | DAT1~, DAT1+9, DAT2~, DAT2+7, DAT2+8, IEN+2~, IEN+4 |