SDVSIT2 ;ALB/RMO/MJK - Encounter Utilities;28 DEC 1992 10:00 am
Source file <SDVSIT2.m>
Package | Total | Call Graph |
---|---|---|
Scheduling | 2 | $$REQ^SDM1A (AEUPD,APPT,DISP)^SDVSIT |
VA Fileman | 1 | ^DIE |
Name | Comments | DBIA/ICR reference |
---|---|---|
VIEN(SDOE,SDVIEN) | ; -- stuff in Visit IEN if not already set
; -- needed for those sites that don't have ; scheduling turned on in Visit Tracking ; Required input SDOE = Outpatient Encounter pointer ; SDVIEN = Visit file pointer or null or zero |
|
OKAE(SDOE) | ; -- is add/edit ok for credit
|
|
VIENQ | ||
GETDISP(DFN,SDT,SDVIEN) | ;Look-up Outpatient Encounter IEN for disposition
; Input -- DFN Patient file IEN ; SDT Disposition Date/Time ; SDVIEN Visit file pointer [optional] ; Output -- Outpatient Encounter file IEN |
|
GETAPT(DFN,SDT,SDCL,SDVIEN) | ;Look-up Outpatient Encounter IEN for Appt
; Input -- DFN Patient file IEN ; SDT Appointment Date/Time ; SDCL Hospital Location file IEN for Appt ; SDVIEN Visit file pointer [optional] ; Output -- Outpatient Encounter file IEN |
|
GETAE(SDVIEN,SDATYPE,SDOPE) | ;Look-up Outpatient Encounter IEN for add/edit
; Input -- SDVIEN Visit file pointer ; SDATYPE Appointment Type [optional] ; SDOEP Parent encounter ien [optional] ; ; Output -- Outpatient Encounter file IEN |
FileNo | Call Tags |
---|---|
^SCE - [#409.68] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNVSIT - [#9000010] | VIEN+18 |
^DPT - [#2] | GETAPT+7, GETAPT+8, GETDISP+6, GETDISP+7 |
^SCE - [#409.68] | OKAE+2, VIEN+9 |
^SCE("AVSIT" | GETAE+7, GETAE+8 |
Name | Line Occurrences |
---|---|
VIEN | GETAPT+11, GETAE+9, GETDISP+8 |
VIENQ | VIEN+7, VIEN+11 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | VIEN+14~, VIEN+15*, VIEN+17~, VIEN+19* |
DFN | GETAPT~, GETAPT+7, GETAPT+8, GETDISP~, GETDISP+6, GETDISP+7 |
DIE | VIEN+14~, VIEN+15*, VIEN+17~, VIEN+19* |
DR | VIEN+14~, VIEN+15*, VIEN+17~, VIEN+19* |
SDATYPE | GETAE~, GETAE+8 |
SDCL | GETAPT~, GETAPT+8 |
SDLOC | VIEN+17~, VIEN+18*, VIEN+19 |
SDOE | OKAE~, OKAE+2, VIEN~, VIEN+9, VIEN+15, VIEN+19 |
SDOE0 | VIEN+8~, VIEN+9*, VIEN+11, VIEN+13, VIEN+16 |
SDOPE | GETAE~, GETAE+8 |
SDT | GETAPT~, GETAPT+7, GETAPT+8, GETDISP~, GETDISP+6, GETDISP+7 |
SDVIEN | GETAPT~, GETAPT+8, GETAPT+11, GETAE~, GETAE+7, GETAE+8, GETAE+9, GETDISP~, GETDISP+7, GETDISP+8 , VIEN~, VIEN+7, VIEN+15, VIEN+18 |
U | OKAE+3, VIEN+13, VIEN+16, VIEN+18 |
X | OKAE+1~, OKAE+2*, OKAE+3 |
Y | GETAPT+6~, GETAPT+7*, GETAPT+8*, GETAPT+11, GETAPT+12, GETAE+6~, GETAE+7*, GETAE+8*, GETAE+9, GETAE+10 , GETDISP+5~, GETDISP+6*, GETDISP+7*, GETDISP+8, GETDISP+9, OKAE+1~*, OKAE+3*, OKAE+4, VIEN+8~ |