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

Package: IHS Changes To Pharmacy

Routine: APSQUTL


Information

APSQUTL ;IHS/DSD/ENM/POC - UTIL TO SET VARIOUS FIELDS [ 05/22/2001 1:24 PM ];18-Apr-2006 21:56;SM

Source Information

Source file <APSQUTL.m>

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Pharmacy Data Management 1 ^PSDRUG  

Entry Points

Name Comments DBIA/ICR reference
KILLKU ;EP
EDIT ;THIS IS THE EDIT
NDC ;INPUT TRANSFORM FOR NDC FIELD OF RX
LIST
EXPL ;THIS IS THE EXPLANATION
SETLKU ;EP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"THE ENTRY IN THIS FIELD DETERMINES WHETHER A SIGNATURE LABEL IS PRINTED."
  • Line Location: EXPL+1
Function Call: WRITE
  • Prompt: !,"A COMBINATION OF CODES CAN BE USED EXCEPT FOR 'A' OR 'N'."
  • Line Location: EXPL+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EXPL+3
Function Call: WRITE
  • Prompt: !,VAR
  • Line Location: LIST+0
Function Call: WRITE
  • Prompt: "GOT TO BE 1 TO 3 CHARACTERS"
  • Line Location: EDIT+2
Function Call: WRITE
  • Prompt: " "_X
  • Line Location: EDIT+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSDRUG("LKU" SETLKU+4*, KILLKU+4!

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA SETLKU+4, KILLKU+4
>> I LIST*
LEN1 NDC+8~, NDC+9*
LEN2 NDC+8~, NDC+10*
LEN3 NDC+8~, NDC+11*
NUM SETLKU+1~, SETLKU+3*, SETLKU+4, KILLKU+1~, KILLKU+3*, KILLKU+4
PIECE SETLKU+1~, SETLKU+2*, SETLKU+4, KILLKU+1~, KILLKU+2*, KILLKU+4
PIECE1 NDC+8~, NDC+9*, NDC+12
PIECE2 NDC+8~, NDC+10*, NDC+12
PIECE3 NDC+8~, NDC+11*, NDC+12
VAR LIST*, LIST+1!
X EDIT+1*, EDIT+2!, EDIT+3*, EDIT+4*, EDIT+5!, EDIT+6, NDC+2!, NDC+7, NDC+9, NDC+10
, NDC+11, NDC+12*, NDC+13*, NDC+14*, NDC+15!, SETLKU+2, SETLKU+3, KILLKU+2, KILLKU+3

Marked Items

Name Field # of Occurrence
$T(LIST+I LIST
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Local Variables |  Marked Items |  All