Routine: ACHSTCK1

Information

ACHSTCK1 ; IHS/ITSC/PMF - CHS TELECOMMUNICATION PROGRAM ; [ 10/31/2003 11:57 AM ]

Source file <ACHSTCK1.m>

Package	Total	Call Graph
IHS VA Utilities	2	$$DIR^XBDIR $$C^XBFUNC
Kernel	2	HOME^%ZIS ($$OPEN,$$STATUS,CLOSE)^%ZISH
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
Contract Health Management Information System	14	ACHSACO ACHSARCH ACHSEOB ACHSEOB8 ACHSEOBY ACHSEXUT ACHSHV04 ACHSHVRC ACHSHVT0 ACHSMD0 ACHSMD2 ACHSMD2D ACHSPCC3 ACHSTUT2

Name	Comments	DBIA/ICR reference
ERROREX	;
OPENHFSC	;
OPENHFSA	;
M5	;;USER ID OR USER PASSWORD NOT DEFINED
BTRMDEF	;
M7	;;ALL 3780 COMMUNICATION PORTS ARE BUSY
M6	;;DEFAULT 3780 COMMUNICATION PORT IN USE
M1	;;COMPUTER CENTER FOR TELECOMMUNICATIONS NOT CORRECTLY DEFINED
M3	;;3780 TELECOMMUNICATIONS PORT NOT DEFINED
M2	;;IHS COMM PARAMETERS NOT SET FOR THIS LOCATION
M9	;;PROGRAM AND/OR FUNCTION CANCELLED BY OPERATOR
M8	;;ALL HFS DEVICES ARE BUSY
OPENHFS	;EP
OHFSDOC	;;VARIABLES REQUIRED FOR OPENHFS CALL
OPENEND	;
ERROR	;EP
M4	;;REMOTE NUMBER NOT DEFINED FOR THIS COMPUTER CENTER"
M11	;;DEFAULT PRINTER PORT NOT CORRECTLY DEFINED
M10	;;OPEN FAILURE ON HFS FILE
M13	;;EXPORT AND/OR APPLICATION PARAMETERS NOT SET CORRECTLY
M12	;;PRINTER SET-UP ERROR -- NOTIFY SUPERVISOR
M15	;;No Files to process
M14	;;Package Prefix not found in IHS COMMUNICATIONS PARAMETERS file
CRTSETUP	;EP

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,*7,$$C^XBFUNC(X,80),! Line Location: ERROR+5
Function Call: WRITE	Prompt: !!!,"PROPER TERMINAL ATTRIBUTES MISSING - NOTIFY SITE MANAGER",!! Line Location: BTRMDEF+1
Routine Call	%ZIS Line Location: ERROR+3 CRTSETUP+1

FileNo	Call Tags
^%ZIS(1 - [#3.5]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(1 - [#3.5]	OPENHFSA+1, CRTSETUP+3, CRTSETUP+4, CRTSETUP+5
^%ZIS(2 - [#3.2]	CRTSETUP+2, CRTSETUP+6, CRTSETUP+7, CRTSETUP+9, CRTSETUP+10
^%ZOSF("RM"	CRTSETUP+11

Name	Line Occurrences
BTRMDEF	CRTSETUP+3, CRTSETUP+4, CRTSETUP+5, CRTSETUP+6
ERROREX	ERROR+1
OPENEND	OPENHFSA+2
OPENHFSA	OPENHFSA+7
OPENHFSC	OPENHFSA+6

Name	Field # of Occurrence
ACHSEMSG	OPENHFS+2, OPENHFSC+7, OPENEND+1*, ERROR+1, ERROREX+2!
>> ACHSJFLG	ERROREX+1*
>> ACHSLE	CRTSETUP+7, CRTSETUP+8
>> ACHSRVOF	CRTSETUP+10*
>> ACHSRVON	CRTSETUP+9*
>> ACHSXY	CRTSETUP+2*
>> ACHSZDEV	OPENHFS+2, OPENHFSA+1, OPENHFSA+2, OPENHFSA+6, OPENHFSC+8*
>> ACHSZFN	OPENHFSC+2, OPENHFSC+3
>> ACHSZFO	OPENHFS+7*
>> ACHSZIN	OPENHFS+6*, OPENHFSC+4
>> ACHSZZA	OPENHFS+2, OPENHFSC+6, OPENHFSC+7, OPENEND+1*
IO	OPENHFSC+6, OPENHFSC+8
IO(0	ERROR+4
>> IOS	CRTSETUP+3, CRTSETUP+4, CRTSETUP+5
IOST(0	CRTSETUP+2, CRTSETUP+6, CRTSETUP+7, CRTSETUP+9, CRTSETUP+10
U	CRTSETUP+2, CRTSETUP+7, CRTSETUP+9, CRTSETUP+10
>> X	ERROR+2, ERROR+5, CRTSETUP+11
>> Y	OPENHFSC+5*
>> ZISH1	OPENHFSC+2*, OPENHFSC+5
>> ZISH2	OPENHFSC+3*, OPENHFSC+5
>> ZISH3	OPENHFSC+4*, OPENHFSC+5

Name	Field # of Occurrence
$T(@ACHSEMSG	ERROR+2