Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SCAPMC27

Package: Scheduling

Routine: SCAPMC27


Information

SCAPMC27 ;ALB/REW - PTST Patients with a Stop Code ; JUN 30, 1995

Source Information

Source file <SCAPMC27.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Scheduling 2 $$PTAPX^SCAPMC28  (ERR,INIT)^SCAPMCU1  
Kernel 1 $$FMADD^XLFDT  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Scheduling 3 SCAPMC  SCMCBK  SCMCBK1  

Entry Points

Name Comments DBIA/ICR reference
PTSTEXT(SCSTOP,SCDATES,SCMAXCNT,SCLIST,SCERR) ; -- list of patients with AMIS REPORTING STOP CODE
; For variables see: PTST (above)
; Returned: 1 if ok, 0 if error^More?
ST
INTST(STOP) ;given stop code return ient
STQ
LP
PTST(SCST,SCDATES,SCMAXCNT,SCLIST,SCERR,MORE) ; -- list of patients with a IEN of 40.7
; USE $$PTSTEXT(below) if you have stop code (e.g. 301)
; input:
; SCST = stop code
; SCDATES("BEGIN") = begin date to search (inclusive)
; [default: TODAY]
; ("END") = end date to search (inclusive)
; [default: TODAY]
; ("INCL") = 1: only use patients who were assigned to
; team for entire date range
; 0: anytime in date range
; [default: 1]
; SCMAXCNT = Maximum Number to Return - Default=99
; SCLIST -array name to store list
; [ex. ^TMP("SCPT",$J)]
;
; SCERR = array NAME to store error messages.
; [ex. ^TMP("ORXX",$J)]
; MORE - For continuing lists (see scapmc28)
OKDATA() ;check/setup variables

External References

Name Field # of Occurrence
$$PTAPX^SCAPMC28 LP+11
ERR^SCAPMCU1 OKDATA+7
INIT^SCAPMCU1 OKDATA+4
$$FMADD^XLFDT LP+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(40.7 - [#40.7] OKDATA+5, INTST+1
^SC - [#44] LP+11

Label References

Name Line Occurrences
$$INTST PTSTEXT+4
$$OKDATA ST+3
$$PTST PTSTEXT+5
STQ ST+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
MORE PTST~, LP+2, LP+11*, PTSTEXT+5
SCBEGIN ST+1~, LP, LP+4*, LP+11
SCCL ST~, LP+5*, LP+9*, LP+11*
SCDATES PTST~, PTSTEXT~, PTSTEXT+5
SCDT ST~, LP*
SCDTS ST+1~
SCEND ST~, ST+1~, LP+1*, LP+11
SCERR PTST~, LP+11, OKDATA+7, PTSTEXT~, PTSTEXT+5
SCESEQ ST+1~, OKDATA+7
SCINCL ST+1~
SCLIST PTST~, LP+3, LP+4, LP+5, LP+6, LP+11, PTSTEXT~, PTSTEXT+5
SCLSEQ ST+1~
SCMAXCNT PTST~, LP+11, OKDATA+3*, PTSTEXT~, PTSTEXT+5
SCN ST+1~
SCNODE ST~
SCOK OKDATA+1~, OKDATA+2*, OKDATA+4, OKDATA+5*, OKDATA+9
SCP ST+1~
SCPARM ST+1~, OKDATA+7
SCPARM("STOP" OKDATA+6*
SCST PTST~, LP+11, OKDATA+5, OKDATA+6, PTSTEXT+3~, PTSTEXT+4*, PTSTEXT+5
>> SCSTART LP+3*, LP+8*, LP+11
SCSTOP PTSTEXT~, PTSTEXT+4
SCX ST~, ST+2*, LP+11*, STQ
STOP INTST~, INTST+1
U LP+3, LP+4, LP+5, LP+11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All