Routine: GMTSPOST

Information

GMTSPOST ;SLC/JER - Post-init for Health Summary ;11/18/92 11:23

Source Information

Source file <GMTSPOST.m>

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Health Summary	6	ENPOST^GMTSLOAD (CRIHS,GAFIHS,MAS,MED,PL,PSO,SCDIHS,SOWK)^GMTSPOS1 EN^GMTSPOS2 DISABLE^GMTSPOST $$NOW^GMTSPREI REGDTM^GMTSU
Kernel	2	($$FMDIFF,FMDIFF)^XLFDT $$VERSION^XPDUTL
VA Fileman	2	^DIC ^DIE

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Health Summary	2	GMTSPOS1 GMTSPOST

Entry Points

Name	Comments	DBIA/ICR reference
SURG	; Checks conditions for auto-disable of Surgery component
RAD	; Checks condition for auto-disable of Radiology
CP	; Checks conditions for auto-disable of Compensation and Pension component
PRGNOTE	; Checks conditions auto-disable of Progress Note components
OERR	; Checks conditions auto-disable of OERR Orders
DIFF(END,BEGIN)	; Converts time difference to external format
LAB	; Checks condition for auto-disable of Lab components
DIET	; Checks conditions auto-disable of Dietetics
SPOOL	; Convert spool name to pointer value
FINITO	; Finish initialization, inform user
OUTPHAR	; Checks conditions auto-disable of Outpatient Pharmacy components
DISABLE	; Disable components if auto-disable conditions are met
PARAM	; Convert YES/NO codes from 1/0 to Y/N
MHPE	; Checks condition for auto-disable of Mental Health
VITALS	; Checks conditions auto-disable of Vitals
MAIN	; Controls branching and execution
DCS	; Checks conditions for auto-disable of Discharge Summary components
INPHAR	; Checks conditions auto-disable of Inpatient Pharmacy components
PCE	; Checks for existence of PCE package...Disables components if absents

External References

Name	Field # of Occurrence
^DIC	SPOOL+5, DISABLE+2
^DIE	DISABLE+5
ENPOST^GMTSLOAD	MAIN+13
CRIHS^GMTSPOS1	MAIN+7
GAFIHS^GMTSPOS1	MAIN+7
MAS^GMTSPOS1	MAIN+7
MED^GMTSPOS1	MAIN+4
PL^GMTSPOS1	MAIN+4
PSO^GMTSPOS1	MAIN+4
SCDIHS^GMTSPOS1	MAIN+7
SOWK^GMTSPOS1	MAIN+4
EN^GMTSPOS2	MAIN+9
DISABLE^GMTSPOST	CP+5, LAB+4, LAB+5, LAB+6, RAD+7, MHPE+4, PCE+4, PCE+5, PCE+6
$$NOW^GMTSPREI	FINITO+2
REGDTM^GMTSU	FINITO+5, FINITO+7
$$FMDIFF^XLFDT	DIFF+2
FMDIFF^XLFDT	FINITO+4
$$VERSION^XPDUTL	CP+3, LAB+2, RAD+2, MHPE+2, PCE+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Starting post-init action now...." Line Location: MAIN+2
Function Call: WRITE	Prompt: !!,"'C' cross-reference on the GMTS AD HOC OPTION type in file 142 deleted." Line Location: MAIN+11
Function Call: WRITE	Prompt: !,"It will be rebuilt" Line Location: MAIN+12
Function Call: WRITE	Prompt: !!,"Post-init successfully completed." Line Location: MAIN+15
Function Call: WRITE	Prompt: !!,"Converting "_X_" to a pointer value for Spool Device in Site Parameter file." Line Location: SPOOL+6
Function Call: WRITE	Prompt: !," Can't converted "_X_" to a pointer value. " Line Location: SPOOL+8
Function Call: WRITE	Prompt: !,"Enter a Valid Spool Device using 'Edit Health Summary Site Parameters' option." Line Location: SPOOL+9
Function Call: WRITE	Prompt: !,X," converted successfully." Line Location: SPOOL+11
Function Call: WRITE	Prompt: !,X," Health Summary Component disabled" Line Location: DISABLE+4
Function Call: WRITE	Prompt: !!,"HEALTH SUMMARY VERSION 2.7 INITIALIZATION COMPLETE!" Line Location: FINITO+3
Function Call: WRITE	Prompt: !!?9,"Initialization began at: ",X Line Location: FINITO+6
Function Call: WRITE	Prompt: !!?5,"Initialization completed at: ",X Line Location: FINITO+8
Function Call: WRITE	Prompt: !!?7,"TOTAL Initialization Time: ",GMTSITD Line Location: FINITO+9
Routine Call	DIE Line Location: DISABLE+5
Routine Call	DIC Line Location: SPOOL+5 DISABLE+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^GMT(142.1 - [#142.1]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	INPHAR+3, OUTPHAR+3, DIET+3, OERR+3, VITALS+3
^GMR(121	PRGNOTE+8, PRGNOTE+9
^GMR(128	DCS+5
^GMT(142 - [#142]	MAIN+10!
^GMT(142.99 - [#142.99]	SPOOL+2, SPOOL+10, PARAM+3, PARAM+5, PARAM+6*
^SRF - [#130]	SURG+4
^TIU(8925.1 - [#8925.1]	PRGNOTE+3
^YSP(606	PRGNOTE+8

Label References

Name	Line Occurrences
$$DIFF	FINITO+2
CP	MAIN+4
DCS	MAIN+4
DIET	MAIN+4
DISABLE	INPHAR+5, OUTPHAR+5, DIET+5, OERR+5, VITALS+8, PRGNOTE+3, PRGNOTE+8, PRGNOTE+9, SURG+4, DCS+7
FINITO	MAIN+16
INPHAR	MAIN+4
LAB	MAIN+4
MHPE	MAIN+4
OERR	MAIN+4
OUTPHAR	MAIN+4
PARAM	MAIN+3
PCE	MAIN+4
PRGNOTE	MAIN+4
RAD	MAIN+4
SPOOL	MAIN+3
SURG	MAIN+4
VITALS	MAIN+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BEGIN	DIFF~, DIFF+2
DA	SPOOL+1~, DISABLE+1~, DISABLE+5*
DIC	SPOOL+1~, SPOOL+4, DISABLE+1~, DISABLE+2, DISABLE+5
DIC(0	SPOOL+4, DISABLE+2
DIE	SPOOL+1~, DISABLE+1~, DISABLE+5*
DIFF	DIFF+1~, DIFF+2*, DIFF+3
DR	DISABLE+1~, DISABLE+5*
END	DIFF~, DIFF+2
GMI	MAIN+1~
GMMSG	INPHAR+1~, INPHAR+5, OUTPHAR+1~, OUTPHAR+5, DIET+1~, DIET+5, OERR+1~, OERR+5, VITALS+1~, VITALS+8* , PRGNOTE+3, PRGNOTE+7~, PRGNOTE+8, PRGNOTE+9, SURG+1~, SURG+4, DCS+4~, DCS+6, CP+1~, CP+4 , LAB+1~, LAB+3, RAD+1~, RAD+5, MHPE+1~, MHPE+3, PCE+1~, PCE+3, DISABLE+5
GMNUM	PARAM+1~, PARAM+2*, PARAM+3, PARAM+5, PARAM+6
GMTJ	MAIN+1~
GMTSEG	MAIN+1~
GMTSI	MAIN+1~
GMTSIFN	MAIN+1~
GMTSIFT	FINITO+1~, FINITO+2*, FINITO+7
GMTSIST	MAIN+17!, FINITO+2, FINITO+5
GMTSITD	FINITO+1~, FINITO+2*, FINITO+9
GMTSNM	MAIN+1~
HR	DIFF+1~, DIFF+2, DIFF+4, DIFF+5
INCLUDE	MAIN+1~, MAIN+13*
MIN	DIFF+1~, DIFF+3, DIFF+4, DIFF+5
SEC	DIFF+1~, DIFF+3, DIFF+4, DIFF+5
U	SPOOL+2, SPOOL+10, PARAM+3, PARAM+5, PARAM+6
X	SPOOL+1~, SPOOL+2, SPOOL+3, SPOOL+6, SPOOL+8, SPOOL+11, PARAM+1~, PARAM+3, PARAM+4, PARAM+5 , PARAM+6, INPHAR+1~, INPHAR+2, INPHAR+5, OUTPHAR+1~, OUTPHAR+2, OUTPHAR+5, DIET+1~, DIET+2, DIET+5 , OERR+1~, OERR+2, OERR+5, VITALS+1~, VITALS+2, VITALS+8, PRGNOTE+3, PRGNOTE+7~, PRGNOTE+8, PRGNOTE+9* , SURG+1~, SURG+4, DCS+4~, DCS+7, CP+1~, CP+5, LAB+1~, LAB+4, LAB+5, LAB+6 , RAD+1~, RAD+7, MHPE+1~, MHPE+4, PCE+1~, PCE+4, PCE+5, PCE+6, DISABLE+4, FINITO+1~ , FINITO+5, FINITO+6, FINITO+7*, FINITO+8
Y	SPOOL+7, SPOOL+10, DISABLE+1~, DISABLE+3, DISABLE+5, DIFF+1~, DIFF+5*, DIFF+6

Customize PDF page

Package: Health Summary

Routine: GMTSPOST

Call Graph Total: 10

Caller Graph Total: 2