Routine: SCMCRT1

Information

SCMCRT1 ;ALB/SCK - TEAM PROFILE REPORT ; 10/30/95

Source file <SCMCRT1.m>

Package	Total	Call Graph
Scheduling	2	$$ACTHIST^SCAPMCU1 TMRPT^SCMCRT1A

Package	Total	Caller Graph
Scheduling	1	SCMCRT0

Name	Comments	DBIA/ICR reference
TEAMOK(SCACT,SCIEN)	; function to check teams current status against ; the requested status
CONT	;
CAREQ
CARE(SCC)	; Returns Yes if the position can provide primary care, No ; if the position cannot.
START(SCTS,SCPS,SCTEAMS,SCBRK)	; ; SCTS = Team Status ; SCPS = Positon status ; SCBRK = Page break as team changes ; ; Status values: ; 1 Show active only ; 0 Show inactive only ; -1 Show all ; 10 Selected Teams
TEAMOKQ
QSTART	;
ACTPOS(SCIEN)	; Returns the active status of the position for the ; date range of the report.
POSTOK(SCPACT,SCIEN)	; function to check a positions current status against ; against the requested status
ROLEQ
ROLE(SCIEN)	; Returns the standard role for a position in external format
POSTOKQ
BLD(SCIEN)	; Build entry for the team profile in ^TMP("PCMTP",$J)

Name	Field # of Occurrence
$$ACTHIST^SCAPMCU1	TEAMOK+13, POSTOK+12, ACTPOS+4
TMRPT^SCMCRT1A	CONT+1

Name	Line Occurrences (* Changed, ! Killed)
^SCTM(404.51 - [#404.51]	START+23, START+24, BLD+11, BLD+18, BLD+20, BLD+21
^SCTM(404.57 - [#404.57]	BLD+27, BLD+29
^SD(403.46 - [#403.46]	ROLE+5
^TMP("PCMTP"	START+14!, BLD+17, BLD+21, BLD+30, BLD+32

Name	Field # of Occurrence
II	BLD+10~, BLD+19, BLD+20, BLD+21
SCACT	TEAMOK~, TEAMOK+12
SCBRK	START~, CONT+1, QSTART+1
SCC	CARE~, CARE+5
SCDTRNG	START+13~, START+15*
SCER	TEAMOK+10~, POSTOK+9~, ACTPOS+3~
SCERMSG	START+13~
SCI	START+13~
SCIEN	TEAMOK~, TEAMOK+13, POSTOK~, POSTOK+12, BLD~, BLD+11, BLD+17, BLD+18, BLD+20, BLD+21 , BLD+27, BLD+30, BLD+32, ACTPOS~, ACTPOS+4, ROLE~, ROLE+4, ROLE+5
SCOK	TEAMOK+10~, TEAMOK+11, TEAMOK+13, TEAMOKQ, POSTOK+9~, POSTOK+10, POSTOK+12, POSTOKQ
SCPACT	POSTOK~, POSTOK+11
SCPIEN	BLD+10~, BLD+26, BLD+27, BLD+28, BLD+29, BLD+30
SCPNODE	BLD+10~, BLD+29*, BLD+30
>> SCPOS	QSTART+1
SCPS	START~, BLD+28
SCROLE	ROLE+2~, ROLE+3, ROLE+5, ROLEQ
SCRTN	START+13~, TEAMOK+10~
SCSTAT	ACTPOS+3~
>> SCTAT	ACTPOS+4*, ACTPOS+5
SCTEAMS	START~, START+17, QSTART+1
SCTEAMS(	START+19
SCTM	START+13~, START+18, START+19, START+20, START+22, START+23, START+24
SCTMIEN	START+13~, START+24*, START+25, START+26
>> SCTMS	QSTART+1
SCTNODE	BLD+10~, BLD+11*, BLD+12, BLD+17
SCTS	START~, START+17, START+25
STAT	CARE+3~, CARE+4, CARE+5, CAREQ
U	BLD+30, ROLE+5