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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: ALPBPARM

Package: Barcode Medication Administration

Routine: ALPBPARM


Information

ALPBPARM ;SFVAMC/JC - Parameter Definitions ;05/02/2003 15:24

Source Information

Source file <ALPBPARM.m>

Entry Points

Name Comments DBIA/ICR reference
DIV ;division
DLINKS ;What logical links for the DEFAULT parmeter?
LINKS ;What logical links for a division?
SET(ALPBDIVP,LINK) ;function to set or delete parameter for logical link
GET(HLL,DIV,FLG,PR) ;Return HLL("LINKS") array for a given patient division
GET1 ;
DV(DV) ;take internal or external division and return institution
Q1 ;division help
Q2 ;Link help
Q3 ;Ask Default
OUT ;EXIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Medical Ctr Divisions must be associated with an institution."
  • Line Location: DIV+10
Function Call: WRITE
  • Prompt: !,"Division information is required."
  • Line Location: DIV+12
Function Call: WRITE
  • Prompt: !,"BAR CODE MED ADMIN MISSING FROM PACKAGE FILE."
  • Line Location: DLINKS+3
Function Call: WRITE
  • Prompt: !,"No DEFAULT links defined for this package."
  • Line Location: DLINKS+7
Function Call: WRITE
  • Prompt: !,"The following DEFAULT links are associated with this package:"
  • Line Location: DLINKS+8
Function Call: WRITE
  • Prompt: !,$P(ZLNK("LINKS",X),U,2)
  • Line Location: DLINKS+10
Function Call: WRITE
  • Prompt: !,RESULT
  • Line Location: DLINKS+19
Function Call: WRITE
  • Prompt: !,"The Institution associated with this division is ",$$NS^XUAF4(ALPBINST)
  • Line Location: LINKS+1
Function Call: WRITE
  • Prompt: !,"No links defined for this division."
  • Line Location: LINKS+3
Function Call: WRITE
  • Prompt: !,"The following links are associated with this division:"
  • Line Location: LINKS+4
Function Call: WRITE
  • Prompt: !,$P(LNK("LINKS",X),U,2)
  • Line Location: LINKS+6
Function Call: WRITE
  • Prompt: !,RESULT
  • Line Location: LINKS+16
Function Call: WRITE
  • Prompt: "...Added"
  • Line Location: SET+2
Function Call: WRITE
  • Prompt: "...Deleted"
  • Line Location: SET+3
Function Call: WRITE
  • Prompt: !,"Unknown Institiution-please review Medical Ctr Division File."
  • Line Location: GET+16
Function Call: WRITE
  • Prompt: !,"Do you want all backup data to go to the same group of"
  • Line Location: Q3+1
Function Call: WRITE
  • Prompt: !,"backup devices regardless of the patient's division?"
  • Line Location: Q3+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(9.4 - [#9.4] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call