Routine: APCDBAN

Information

APCDBAN ; IHS/CMI/LAB - Banner routine for Data Entry ;

Source file <APCDBAN.m>

Package	Total	Call Graph
Patient Care Component	1	^APCDVAR

Name	Comments	DBIA/ICR reference
TEXT	;
PRINT
TEXTB	;date entry utilities menu text
TEXTC	;LOG ENTRY
TEXTA	;accept command menu text
TEXTF	;forms tracking menu text
TEXTE	;error code menu
TEXTJ	;;modify data
CTR(X,Y)	;EP - Center X in a field Y wide.
TEXTH	;;modify data
TEXTI	;fix uncoded dx/proc menu text
TEXTL	;link in-hospital menu
TEXTM	;;print table maintenance
TEXTS	;supervisor menu text
TEXTP	;fix uncoded operations menu
TEXTV	;visit review report menu text
TEXTW	;;update patient related data
TEXTT	;;local table maintenance
TEXTU	;date entry utilities menu text
TEXTZ	;;enter date menu
TEXTX	;;edit site parameters
TEXTY	;;display site parameters
SITE
XIT	;
V	; GET VERSION

Name	Field # of Occurrence
^APCDVAR	SITE+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !?80-$L(APCDX)\2,APCDX Line Location: PRINT+2
Function Call: WRITE	Prompt: !?80-(22+$L(APCD("VERSION")))/2,"IHS PCC Suite Version ",APCD("VERSION") Line Location: PRINT+3
Function Call: WRITE	Prompt: !?80-$L(APCD("SITE"))\2,APCD("SITE") Line Location: SITE+0

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	SITE

Name	Line Occurrences
PRINT	V+2
XIT	SITE

Name	Field # of Occurrence
$T(@APCDTEXT+APCDJ	V+4, PRINT+2