Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: APCPBAN

Package: Patient Care Component Data Transmission

Routine: APCPBAN


Information

APCPBAN ; IHS/TUCSON/LAB - BANNER FOR PCC DATA TRANSMISSION AUGUST 14, 1992 ; [ 04/03/98 08:39 AM ]

Source Information

Source file <APCPBAN.m>

Entry Points

Name Comments DBIA/ICR reference
TEXT ;
SITE
TEXTR ;
XIT ;
V ; GET VERSION
PRINT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?80-$L(APCPX)\2,APCPX
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !?80-(8+$L(APCP("VERSION")))/2,"Version ",APCP("VERSION")
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!?80-$L(APCP("SITE"))\2,APCP("SITE")
  • Line Location: SITE+0

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
PRINT V+2
XIT SITE

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% XIT+1!
%Y XIT+1!
>> APCP("SITE" SITE*
>> APCP("VERSION" V+1*, PRINT+2
APCPJ V+4*, PRINT+1*, XIT+1!
APCPLINE V+2*, V+4*, PRINT+1, XIT+1!
APCPTEXT V+2*, V+3*, XIT+1!
APCPX V+4*, PRINT+1*!, XIT+1!
DA XIT+1!
DIC XIT+1!
DUZ(2 SITE
IOF PRINT
X XIT+1!
Y XIT+1!

Marked Items

Name Field # of Occurrence
$T(@APCPTEXT+APCPJ V+4, PRINT+1
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All