SD53120A ;ALB/REV; Scheduling/PCE Bad Pointer Count ;5/15/97
Source file <SD53120A.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;This is the entry point to start the count of problems
|
|
ENQ | ||
TSK | ; entry point for the queued task
|
|
TSKQ | ||
MAILMSG(USER,SDMNT,XMTEXT) | ;this subroutine will fire a message when
; the background job has finished. ; USER - who started the job ; SDMNT - To Albany CIOFO if run as post-install ; XMTEXT - notes for the end of the message |
|
MAILQ | ||
OK() | ;last chance to back out
|
|
BLDTXT(CTR,TEXT,SDTEXT) | ; create line of text
|
|
FINDERR | ; main program block
|
|
OUTPUT | ; create text for MailMan message
|
|
APPT | ; check patient appointment multiple
|
|
DISP | ; check patient disposition multiple
|
|
DUP | ; loop through outpatient encounter file - call DUPCHECK
|
|
DUPCHECK | ; check for duplicates
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|