SDCOU ;ALB/RMO - Utilities - Check Out;28 DEC 1992 10:00 am ;01/21/2015
Source file <SDCOU.m>
Package | Total | Call Graph |
---|---|---|
Scheduling | 2 | $$STATUS^SDAM1 $$FIND^SDAM2 |
List Manager | 1 | ($$LOWER,PAUSE)^VALM1 |
VA FileMan | 1 | FILE^DIE |
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 |
---|---|---|
CODT(DFN,SDT,SDCL) | ; -- does appt have co date
|
|
CHK(SDSEL) | ;Check if Appt can be Checked Out
; Input -- SDSEL Appt Selected in Appt Mgr ; Output -- 1=Yes and 0=No |
|
CHKQ | ||
STATUS(SDAT) | ;Selected Appointment Status IEN
|
|
ORG(SDORG) | ;Originating Process Type Name for Outpatient Encounter
; Input -- SDORG Originating Process Type ; Output -- Originating Process Type Name |
|
COMDT(SDOE) | ;Check Out Process Completion Date/Time
|
|
SET(SDOE,SDNEW) | ; -- set x-ref logic for co completion date to update children
|
|
SETQ | ||
KILL(SDOE,SDOLD) | ; -- set x-ref logic for co completion date to update children
|
|
KILLQ |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD(409.68 | ORG+5 |
^DPT - [#2] | STATUS+1 |
^SC - [#44] | CODT+1 |
^SCE - [#409.68] | COMDT+1, SET+4, KILL+4 |
^SCE("APAR" | SET+1, SET+3, KILL+1, KILL+3 |
^SD(409.63 - [#409.63] | CHK+6 |
^TMP("SDAMIDX" | CHK+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | CODT~, CODT+1 |
DT | CHK+7 |
SDAT | CHK+3~, CHK+4*, CHK+6, CHK+7, STATUS~, STATUS+1 |
SDCL | CODT~, CODT+1 |
SDFDA | SET+2~, SET+5!, KILL+2~, KILL+5! |
SDFDA( | SET+6*, KILL+6* |
SDNEW | SET~, SET+6 |
SDOE | COMDT~, COMDT+1, SET~, SET+1, SET+3, SET+4, KILL~, KILL+1, KILL+3, KILL+4 |
SDOEC | SET+2~, SET+3*, SET+6, KILL+2~, KILL+3*, KILL+6 |
SDOLD | KILL~ |
SDORG | ORG~, ORG+5 |
SDSEL | CHK~, CHK+4 |
SDT | CODT~, CODT+1 |
U | CODT+1 |
Y | CHK+3~, CHK+5*, CHK+6*, CHK+7*, CHKQ, ORG+4~, ORG+5*, ORG+6 |