SCDXUTL2 ;ALB/MTC/JLU - PRINT UTILITY ROUTINES;23-MAY-1996 ; 20 Nov 98 12:25 AM
Source file <SCDXUTL2.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 |
|---|---|---|
| PAT(D0) | ;-- This function is used for the computed field 20.01 in file
; Transmission OutPatient Encounter file 409.73. For the given ; entry in 409.73 a determination of the PATIENT involved with ; the transaction will be determined. |
|
| SSN(D0) | ;-- This function is used for the computed field 20.04 in file
; Transmission OutPatient Encounter file 409.73. For the given ; entry in 409.73 a determination of the PATIENT SSN involved with ; the transaction will be determined. |
|
| PATDFN(D0) | ; This call will return the patient's DFN. It is identical to
|
|
| ECDT(D0) | ;-- This function is used for the computed field 20.02 in file
; Transmission OutPatient Encounter file 409.73. For the given ; entry in 409.73 a determination of the ENCOUNTER D/T involved with ; the transaction will be determined. |
|
| EDIV(D0,INT) | ;-- This function is used for the computed fields 20.05 and 20.06
; in the Transmission OutPatient Encounter file 409.73. For the ; given entry in 409.73 a determination of the ENCOUNTER DIVISION ; involved with the transaction will be determined. |
|
| ECLOC(D0) | ;-- This function is used for the computed field 20.03 in file
; Transmission OutPatient Encounter file 409.73. For the given ; entry in 409.73 a determination of the LOCATION involved with ; the transaction will be determined. |
|
| XDATE(D0) | ;-- This function is used for the computed field 10.01 in file
; Transmitted OutPatinet Encounter Error file 409.75. For the given ; entry the x-mit date to NPCDB will be determined. |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD("DD" | XDATE+6 |
| ^DG(40.8 - [#40.8] | EDIV+14 |
| ^DPT - [#2] | PAT+12, SSN+12 |
| ^SC - [#44] | ECLOC+12 |
| ^SCE - [#409.68] | PAT+10, SSN+10, PATDFN+9, ECDT+10, EDIV+12, ECLOC+10 |
| ^SD(409.73 - [#409.73] | PAT+6, SSN+6, PATDFN+5, ECDT+6, EDIV+8, ECLOC+6, XDATE+5 |
| ^SD(409.74 - [#409.74] | PAT+8, SSN+8, PATDFN+7, ECDT+8, EDIV+10, ECLOC+8 |
| ^SD(409.75 - [#409.75] | XDATE+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| D0 | PAT~, PAT+6, SSN~, SSN+6, PATDFN~, PATDFN+5, ECDT~, ECDT+6, EDIV~, EDIV+8 , ECLOC~, ECLOC+6, XDATE~, XDATE+5 |
| >> DFN | PATDFN+7*, PATDFN+9*, PATDFN+10* |
| INT | EDIV~, EDIV+14 |
| SDTOE | PAT+5~, PAT+6*, PAT+7, PAT+8, PAT+9, PAT+10, SSN+5~, SSN+6*, SSN+7, SSN+8 , SSN+9, SSN+10, PATDFN+4~, PATDFN+5*, PATDFN+6, PATDFN+7, PATDFN+8, PATDFN+9, ECDT+5~, ECDT+6* , ECDT+7, ECDT+8, ECDT+9, ECDT+10, EDIV+7~, EDIV+8*, EDIV+9, EDIV+10, EDIV+11, EDIV+12 , ECLOC+5~, ECLOC+6*, ECLOC+7, ECLOC+8, ECLOC+9, ECLOC+10 |
| SDXDT | XDATE+3~, XDATE+5*, XDATE+6 |
| U | PAT+7, PAT+8, PAT+9, PAT+10, PAT+12, SSN+7, SSN+8, SSN+9, SSN+10, SSN+12 , PATDFN+6, PATDFN+7, PATDFN+8, PATDFN+9, ECDT+7, ECDT+8, ECDT+9, ECDT+10, EDIV+9, EDIV+10 , EDIV+11, EDIV+12, EDIV+14, ECLOC+7, ECLOC+8, ECLOC+9, ECLOC+10, ECLOC+12, XDATE+5 |
| >> X | PAT+8*, PAT+10*, PAT+11*, PAT+12*, SSN+8*, SSN+10*, SSN+11*, SSN+12*, ECDT+8*, ECDT+10* , ECDT+11*, ECDT+12*, EDIV+10*, EDIV+12*, EDIV+13*, EDIV+14*, ECLOC+8*, ECLOC+10*, ECLOC+11*, ECLOC+12* , XDATE+4*, XDATE+6* |
| >> Y | ECDT+12*, XDATE+6* |
