Routine: SCRPTPOS

Information

SCRPTPOS ;ALB/DJS - Team Position Extract for PCMMR Data Validation; 04/08/14

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
Kernel	1	($$DEFDIR,CLOSE,OPEN)^%ZISH
Registration	1	$$SITE^VASITE
VA FileMan	1	GETS^DIQ

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Scheduling	1	SCMC TEAM POSITION EXTRACT

Entry Points

Name	Comments	DBIA/ICR reference
ENTER	; Entry point ; ; Extract file will be a delimited text file (.TXT) that will provide information for PCMM data validation ; Delimiter is a pipe ("\|") character
SETREC
COLHDR	;Create column header for Team Position extract file
END
HFSOPEN(HANDLE,SCMCPATH,SCMCHFS,SCMCMODE)	; Open File
HFSCLOSE(HANDLE,SCMHFS)	;Close HFS and unload data
IOF()	;used to reset position and insert page break flag when @IOF is executed.

External References

Name	Field # of Occurrence
$$DEFDIR^%ZISH	ENTER+42
CLOSE^%ZISH	HFSCLOSE+1
OPEN^%ZISH	HFSOPEN+2
GETS^DIQ	SETREC+5
$$SITE^VASITE	ENTER+41

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,SCMCPATH Line Location: ENTER+42
Function Call: WRITE	Prompt: "Station #\|Position IEN\|Position Name\|Team IEN\|Team Name\|Standard Role IEN\|Standard Role Name\|Possible Primary Practitioner\|Max # Patients\|Preceptor Position\|Can Act as Preceptor\|Position Description\|" Line Location: COLHDR+1
Function Call: WRITE	Prompt: "Death Message\|Inpatient Message\|Team Message\|Preceptor Death Message\|Preceptor Inpatient Message\|Preceptor Team Message\|Auto Inactivation Message\|Prec Auto Inactivation Message\|Current # PC Patients\|" Line Location: COLHDR+2
Function Call: WRITE	Prompt: "Current # Patients\|Current Status\|Current Effective Date\|Current Activation Date\|Current Inactivation Date\|Current Practitioner\|Current Preceptor Position\|Current Preceptor\|Active Precepts",! Line Location: COLHDR+3

FileNo	Call Tags
^SCTM(404.57 - [#404.57]	GETS^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SCTM(404.57 - [#404.57]	SETREC+2, SETREC+15
^TMP("SCMC"	END+3, END+5, END+6, END+7, END+8, END+9, HFSOPEN+3

Label References

Name	Line Occurrences
COLHDR	ENTER+45
END	ENTER+43, ENTER+45
HFSCLOSE	END
HFSOPEN	ENTER+43
SETREC	ENTER+45

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTASPRE	ENTER+39~, SETREC+14*, SETREC+34
ACTPREC	ENTER+40~, SETREC+33*, SETREC+35
AUINAMSG	ENTER+40~, SETREC+22*, SETREC+35
CURACTDT	ENTER+40~, SETREC+28*, SETREC+35
CUREFFDT	ENTER+40~, SETREC+27*, SETREC+35
CURINADT	ENTER+40~, SETREC+29*, SETREC+35
CURPCPT	ENTER+40~, SETREC+24*, SETREC+35
CURPRAC	ENTER+40~, SETREC+30*, SETREC+35
CURPRCPS	ENTER+40~, SETREC+31*, SETREC+35
CURPREC	ENTER+40~, SETREC+32*, SETREC+35
CURPTS	ENTER+40~, SETREC+25*, SETREC+35
CURSTAT	ENTER+40~, SETREC+26*, SETREC+35
DEATHMSG	ENTER+39~, SETREC+16*, SETREC+34
HANDLE	HFSOPEN~, HFSOPEN+2, HFSCLOSE~, HFSCLOSE+1
I	END+1~, END+5*, END+6, END+7, END+8
INPTMSG	ENTER+39~, SETREC+17*, SETREC+34
IO	ENTER+44
IOF	ENTER+38~, HFSOPEN+4*
MAXPT	ENTER+39~, SETREC+12*, SETREC+34
MSG	ENTER+38~, END+3, END+9
PDESC	ENTER+39~, SETREC+15*, SETREC+34
POP	HFSOPEN+1~, HFSOPEN+2
POSSPP	ENTER+39~, SETREC+11*, SETREC+34
PRAINMSG	ENTER+40~, SETREC+23*, SETREC+35
PRECPOS	ENTER+39~, SETREC+13*, SETREC+34
PREDTHMS	ENTER+39~, SETREC+19*, SETREC+34
PREINPMS	ENTER+40~, SETREC+20*, SETREC+35
PRETMMSG	ENTER+40~, SETREC+21*, SETREC+35
ROLE	ENTER+39~, SETREC+10*, SETREC+34
ROLEIEN	ENTER+39~, SETREC+9*, SETREC+34
SCDATA	ENTER+39~, SETREC+3!
SCDATA(	SETREC+6, SETREC+7, SETREC+8, SETREC+9, SETREC+10, SETREC+11, SETREC+12, SETREC+13, SETREC+14, SETREC+16 , SETREC+17, SETREC+18, SETREC+19, SETREC+20, SETREC+21, SETREC+22, SETREC+23, SETREC+24, SETREC+25, SETREC+26 , SETREC+27, SETREC+28, SETREC+29, SETREC+30, SETREC+31, SETREC+32, SETREC+33
SCIENS	ENTER+39~, SETREC+4*, SETREC+5, SETREC+6, SETREC+7, SETREC+8, SETREC+9, SETREC+10, SETREC+11, SETREC+12 , SETREC+13, SETREC+14, SETREC+16, SETREC+17, SETREC+18, SETREC+19, SETREC+20, SETREC+21, SETREC+22, SETREC+23 , SETREC+24, SETREC+25, SETREC+26, SETREC+27, SETREC+28, SETREC+29, SETREC+30, SETREC+31, SETREC+32, SETREC+33
SCMCERR	ENTER+38~, ENTER+42, ENTER+43, END+2, HFSOPEN+3
SCMCHFS	ENTER+38~, ENTER+42*, ENTER+43, END, HFSOPEN~, HFSOPEN+2
SCMCMODE	ENTER+38~, HFSOPEN~, HFSOPEN+2
SCMCPATH	ENTER+38~, ENTER+42*, ENTER+43, HFSOPEN~, HFSOPEN+2
SCMHFS	HFSCLOSE~
SITE	ENTER+39~, ENTER+41*
STANUM	ENTER+39~, ENTER+41*, ENTER+42, SETREC+34
TEAMMSG	ENTER+39~, SETREC+18*, SETREC+34
TIEN	ENTER+39~, SETREC+7*, SETREC+34
TNAME	ENTER+39~, SETREC+8*, SETREC+34
TPIEN	ENTER+39~, SETREC+1, SETREC+2, SETREC+4, SETREC+15, SETREC+34
TPOS	ENTER+39~, SETREC+6*, SETREC+34

Customize PDF page

Package: Scheduling