Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSOUTLA2

Package: Outpatient Pharmacy

Routine: PSOUTLA2


Information

PSOUTLA2 ;BHAM ISC/GSN-Pharmacy utility program cont. ;6/6/05 12:19pm

Source Information

Source file <PSOUTLA2.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 ^DIC  $$GET1^DIQ  ^DIR  
List Manager 1 FULL^VALM1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 9

Package Total Caller Graph
Outpatient Pharmacy 9 PSO DRUG LOOK  PSO VIEW PROVIDER  PSOORFI1  PSOORNE2  PSOORNE5  PSOORNE6  PSOPKIV2  PSORXVW  
PSORXVW1  

Entry Points

Name Comments DBIA/ICR reference
WORDWRAP(STR,IEN,GL,LM) ;Wraps words at spaces normally and will breakup long
; words at a delimiter & wrap at those break points
; Input: STR - a text string
; IEN - ien of global
; GL - global root
; LM - left margin
; Output: Populated global (usually in ^TMP)
ADDWORDS ;Add words to curr line and to a new line
DMACTN ;Entry point for DM hidden action from backdoor OE *507
PICKDR ;Entry point for Selecting a diff Drug
SHOWDR ;Entry point to Display Drug hidden action info (defaulted IFN via DM actn)
DMOITXT ;Get Pharmacy Orderable Item drug text fields
FULL ;Screen is full, pause
FSCRN ;User Wait as screen if full
INACDATE() ;Check Inactive date
VPACTN
PICKVP
SHOWVP

External References

Name Field # of Occurrence
^DIC PICKDR+2, PICKVP+2
$$GET1^DIQ SHOWDR+3, SHOWDR+6, SHOWDR+7, SHOWVP+3, SHOWVP+4, SHOWVP+5
^DIR FSCRN+1
FULL^VALM1 DMACTN+1, VPACTN+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PICKDR+2
Function Call: WRITE
  • Prompt: "Return to continue or"
  • Line Location: PICKDR+2
Function Call: WRITE
  • Prompt: !!,"** NO Dispense Drug entered for this order",!
  • Line Location: SHOWDR+2
Function Call: WRITE
  • Prompt: #,!,"DRUG NAME: ",$$GET1^DIQ(50,IFN_",","GENERIC NAME")," (IEN: "_IFN_")"
  • Line Location: SHOWDR+3
Function Call: WRITE
  • Prompt: !," ORDERABLE ITEM TEXT: ",!
  • Line Location: SHOWDR+5
Function Call: WRITE
  • Prompt: !," MESSAGE: ",$$GET1^DIQ(50,IFN_",","MESSAGE")
  • Line Location: SHOWDR+6
Function Call: WRITE
  • Prompt: !," QTY DISP MESSAGE: ",$$GET1^DIQ(50,IFN_",","QUANTITY DISPENSE MESSAGE"),!
  • Line Location: SHOWDR+7
Function Call: WRITE
  • Prompt: " ",TEXT,!
  • Line Location: DMOITXT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: PICKVP+2
Function Call: WRITE
  • Prompt: !,"Return to continue or"
  • Line Location: PICKVP+2
Function Call: WRITE
  • Prompt: !,"No provider entered for this order",!
  • Line Location: SHOWVP+2
Function Call: WRITE
  • Prompt: #,"PROVIDER TITLE: ",$$GET1^DIQ(200,IFN_",","TITLE")
  • Line Location: SHOWVP+3
Function Call: WRITE
  • Prompt: !!,"PROVIDER REMARKS: ",$$GET1^DIQ(200,IFN_",","REMARKS")
  • Line Location: SHOWVP+4
Function Call: WRITE
  • Prompt: !!,"PROVIDER SPECIALTY: ",$$GET1^DIQ(200,IFN_",","PROVIDER CLASS"),!," "_$$GET1^DIQ(200,IFN_",","SERVICE/SECTION")
  • Line Location: SHOWVP+5
Routine Call
  • DIC
  • Line Location:
    • PICKDR+2
    • PICKVP+2
Routine Call
  • DIR
  • Line Location:
    • FSCRN+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls,  GET1^DIQ
^PSDRUG - [#50] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(50.7 - [#50.7] DMOITXT+2, DMOITXT+3
^PS(51.7 - [#51.7] DMOITXT+4, INACDATE+1
^PSDRUG - [#50] SHOWDR+4

Label References

Name Line Occurrences
$$INACDATE DMOITXT+4
ADDWORDS WORDWRAP+37, WORDWRAP+50, WORDWRAP+71, WORDWRAP+77, WORDWRAP+82, WORDWRAP+89
DMOITXT SHOWDR+5
FSCRN FULL+1
FULL SHOWDR+6, SHOWDR+7, DMOITXT+4
PICKDR SHOWDR+2, SHOWDR+9
PICKVP SHOWVP+2, SHOWVP+7
SHOWDR DMACTN+2
SHOWVP VPACTN+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CH ADDWORDS+1~, ADDWORDS+4*, ADDWORDS+5
CURD WORDWRAP+25~, WORDWRAP+53*, WORDWRAP+55, WORDWRAP+56
DDD DMOITXT+1~, DMOITXT+4*
DIC PICKDR+2!*, PICKVP+2!*
DIC("T" PICKDR+2*, PICKVP+2*
DIC(0 PICKDR+2*, PICKVP+2*
DIR SHOWDR+1~, FSCRN+1!, SHOWVP+1~
DIR("A" FSCRN+1*
DIR(0 FSCRN+1*
DL WORDWRAP+25~, WORDWRAP+42*, WORDWRAP+43*, WORDWRAP+44*, WORDWRAP+45*
DL( WORDWRAP+42*, WORDWRAP+43, WORDWRAP+44*, WORDWRAP+45
DLM WORDWRAP+25~, WORDWRAP+37*, WORDWRAP+43*, WORDWRAP+44, WORDWRAP+45*, WORDWRAP+48, WORDWRAP+53, WORDWRAP+59, WORDWRAP+60, WORDWRAP+67
, WORDWRAP+70, ADDWORDS+5
GL WORDWRAP~, WORDWRAP+26, WORDWRAP+32, WORDWRAP+33, WORDWRAP+34, WORDWRAP+35, WORDWRAP+40, WORDWRAP+84, ADDWORDS+4, ADDWORDS+6
ADDWORDS+8, ADDWORDS+10*, ADDWORDS+11, ADDWORDS+15
GWRD WORDWRAP+25~, WORDWRAP+32*, WORDWRAP+33, WORDWRAP+34, WORDWRAP+35
IEN WORDWRAP~, WORDWRAP+26*, WORDWRAP+32, WORDWRAP+33, WORDWRAP+34, WORDWRAP+35, WORDWRAP+40, WORDWRAP+84, ADDWORDS+4, ADDWORDS+6
ADDWORDS+8, ADDWORDS+10*, ADDWORDS+11, ADDWORDS+15
IFN DMACTN+2~*, PICKDR+1~, PICKDR+3*, SHOWDR+2, SHOWDR+3, SHOWDR+4, SHOWDR+6, SHOWDR+7, VPACTN+2~, VPACTN+3*
PICKVP+1~, PICKVP+3*, SHOWVP+2, SHOWVP+3, SHOWVP+4, SHOWVP+5
IOF FSCRN+1
IOSL FULL+1
LC WORDWRAP+25~, WORDWRAP+33*, WORDWRAP+34, WORDWRAP+35
LL WORDWRAP+25~, WORDWRAP+53*, WORDWRAP+56*, WORDWRAP+59, WORDWRAP+76
LM WORDWRAP~, WORDWRAP+36, WORDWRAP+69, ADDWORDS+10, ADDWORDS+13
LSTD WORDWRAP+25~, WORDWRAP+53*, WORDWRAP+56*, WORDWRAP+60*, WORDWRAP+76, WORDWRAP+80, WORDWRAP+84, WORDWRAP+87, WORDWRAP+88
MAXLN WORDWRAP+25~, WORDWRAP+40*, WORDWRAP+49, WORDWRAP+56, WORDWRAP+69, WORDWRAP+80, WORDWRAP+81, WORDWRAP+84, ADDWORDS+11*
OIPTR SHOWDR+1~, SHOWDR+4*, SHOWDR+5, DMOITXT+2, DMOITXT+3
>> PSODRUG("IEN" DMACTN+2
>> PSONEW("PROVIDER" VPACTN+3
QQ WORDWRAP+25~, WORDWRAP+28*
QUIT DMOITXT+1~, DMOITXT+4, FULL+1, FSCRN+1*
STR WORDWRAP~, WORDWRAP+28
TEXT DMOITXT+1~, DMOITXT+4*
TEXTPTR DMOITXT+1~, DMOITXT+3*, DMOITXT+4, INACDATE+1
TL WORDWRAP+25~, WORDWRAP+53*, WORDWRAP+54*, WORDWRAP+55, WORDWRAP+56, WORDWRAP+76
TXT DMOITXT+1~, DMOITXT+2*, DMOITXT+3
UL WORDWRAP+25~, WORDWRAP+59*, WORDWRAP+60
>> VALMBCK DMACTN+3*, VPACTN+4*
WD WORDWRAP+25~
WD( WORDWRAP+55*, WORDWRAP+59, WORDWRAP+60, WORDWRAP+76
WORD WORDWRAP+25~, WORDWRAP+28*, WORDWRAP+30*, WORDWRAP+34, WORDWRAP+35, WORDWRAP+36, WORDWRAP+37, WORDWRAP+42, WORDWRAP+44, WORDWRAP+49
, WORDWRAP+53, WORDWRAP+55, WORDWRAP+67, WORDWRAP+68, WORDWRAP+69, WORDWRAP+70, WORDWRAP+80, WORDWRAP+81, WORDWRAP+84, WORDWRAP+88
WORD0 WORDWRAP+25~, WORDWRAP+26*, WORDWRAP+28, WORDWRAP+30*, WORDWRAP+37*, WORDWRAP+50*, WORDWRAP+71*, WORDWRAP+77*, WORDWRAP+82*, WORDWRAP+89*
WORD1 WORDWRAP+25~, WORDWRAP+37*, WORDWRAP+49*, WORDWRAP+68*, WORDWRAP+69*, WORDWRAP+81*, WORDWRAP+88*, ADDWORDS+6, ADDWORDS+8
WORD2 WORDWRAP+25~, WORDWRAP+37*, WORDWRAP+49*, WORDWRAP+50, WORDWRAP+68*, WORDWRAP+69*, WORDWRAP+71, WORDWRAP+77, WORDWRAP+81*, WORDWRAP+82
, WORDWRAP+88*, WORDWRAP+89, ADDWORDS+13, ADDWORDS+15*
WORDLN WORDWRAP+67~*, WORDWRAP+68
Y PICKDR+1~, PICKDR+2, PICKDR+3, SHOWDR+8!, FSCRN+1, PICKVP+1~, PICKVP+2, PICKVP+3, SHOWVP+6!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All