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: PSSWRNB

Package: Pharmacy Data Management

Routine: PSSWRNB


Information

PSSWRNB ;BIR/EJW-NEW WARNING SOURCE CUSTOM WARNING LIST BUILDER ; 9/8/05 3:46pm

Source Information

Source file <PSSWRNB.m>

Entry Points

Name Comments DBIA/ICR reference
SEL ;
ASK
RPT ;
RPTQ
DVC
PRT54 ;
PRTRPT ;
RXCON
FULL ;
TITLE ;
END ;
END2 ;
DONE ;
PRTNEW ;
RPTNEW ;
FDBWARN
KILL ;
DRUG ;
WARN ; ENTRY POINT DRUG ENTER/EDIT OPTION
ACTIVE ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PSSWRNB+8
Function Call: WRITE
  • Prompt: !!?3,"Nothing queued to print."
  • Line Location: PSSWRNB+8
Function Call: WRITE
  • Prompt: !
  • Line Location: PSSWRNB+11
Function Call: WRITE
  • Prompt: !!?3,"Nothing queued to print."
  • Line Location: PSSWRNB+11
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SEL+1
Function Call: WRITE
  • Prompt: !!,?2,"Select one of the following to display drugs that match that criteria to"
  • Line Location: SEL+3
Function Call: WRITE
  • Prompt: !,?2,"examine or edit their drug warnings:"
  • Line Location: SEL+4
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,$C(7),"NOTE: Only the first 5 warnings will print on the yellow auxillary labels."
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !,"Nothing meets selection criteria"
  • Line Location: ASK+26
Function Call: WRITE
  • Prompt: !!,"You may queue the report to print, if you wish.",!
  • Line Location: RPTQ+0
Function Call: WRITE
  • Prompt: !,"Nothing queued to print.",!
  • Line Location: DVC+0
Function Call: WRITE
  • Prompt: !,"Report queued to print.",!
  • Line Location: DVC+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PRTRPT+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: PRTRPT+3
Function Call: WRITE
  • Prompt: !,"RX CONSULT NUMBER: ",SEQ
  • Line Location: RXCON+0
Function Call: WRITE
  • Prompt: !
  • Line Location: RXCON+3
Function Call: WRITE
  • Prompt: !,?3,^PS(54,SEQ,1,PSSTXT,0)
  • Line Location: RXCON+4
Function Call: WRITE
  • Prompt: !!,"Spanish translation:"
  • Line Location: RXCON+5
Function Call: WRITE
  • Prompt: !,?3
  • Line Location: RXCON+6
Function Call: WRITE
  • Prompt: !,?3
  • Condition for execution: LEN>62
  • Line Location: RXCON+9
Function Call: WRITE
  • Prompt: STR," "
  • Line Location: RXCON+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TITLE+3
Function Call: WRITE
  • Prompt: !,?16,TITLE,!
  • Line Location: TITLE+4
Function Call: WRITE
  • Prompt: !,"Date printed: ",Y,?70,"Page: ",PSSPGCT,!
  • Line Location: TITLE+5
Function Call: WRITE
  • Prompt: "="
  • Line Location: TITLE+6
Function Call: WRITE
  • Prompt: !
  • Line Location: TITLE+7
Function Call: WRITE
  • Prompt: !!,"End of Rx Consult file Report."
  • Line Location: END+1
Function Call: WRITE
  • Prompt: !
  • Line Location: END+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+3
Function Call: WRITE
  • Prompt: !!,"End of Report."
  • Line Location: END2+1
Function Call: WRITE
  • Prompt: !
  • Line Location: END2+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END2+3
Function Call: WRITE
  • Prompt: !
  • Line Location: RPTNEW+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: RPTNEW+3
Function Call: WRITE
  • Prompt: !,"WARNING LABEL-ENGLISH NUMBER: ",+SEQ
  • Line Location: FDBWARN+0
Function Call: WRITE
  • Prompt: !
  • Line Location: FDBWARN+3
Function Call: WRITE
  • Prompt: !,?3,^PS(50.625,SEQ,1,PSSTXT,0)
  • Line Location: FDBWARN+4
Function Call: WRITE
  • Prompt: !!,"Spanish translation:"
  • Line Location: FDBWARN+5
Function Call: WRITE
  • Prompt: !,?3,^PS(50.626,SEQ,1,PSSTXT,0)
  • Line Location: FDBWARN+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSNDF(50.68 - [#50.68] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call