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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PSSCOMMN

Package: Pharmacy Data Management

Routine: PSSCOMMN


Information

PSSCOMMN ;BIR/RTR-Most Common Dosages Report ;06/07/00

Source Information

Source file <PSSCOMMN.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$DT^XLFDT  
VA Fileman 2 ^%DT  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Pharmacy Data Management 1 PSS COMMON DOSAGES  

Entry Points

Name Comments DBIA/ICR reference
EN ;
END ;
ENDX ;
QUEUE ;
START ;
COMMH ;

External References

Name Field # of Occurrence
^%DT EN+4
^%ZIS QUEUE+1
^%ZISC ENDX+2
^%ZTLOAD QUEUE+3
^DIR EN+3, EN+8
$$DT^XLFDT START+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This report displays common dosages of Dispense Drugs for Unit Dose orders",!,"based on the time frame entered. Unit Dose orders without a Dosage Ordered",!,"are not included on this report."
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !,"If there are multiple Dispense Drugs associated with an order, only the first",!,"Dispense Drug of the order will print with the Dosage Ordered.",!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!,"Nothing queued to print.",!
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!,"Nothing queued to print.",!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !!,"Nothing queued to print.",!
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !!,"Because of the length of this report, and the time needed to gather the",!,"information, this report must be queued to a printer.",!
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !!,"Nothing queued to print.",!
  • Line Location: QUEUE+1
Function Call: WRITE
  • Prompt: !!,"This report must be queued to a printer.",!
  • Line Location: QUEUE+2
Function Call: WRITE
  • Prompt: !!,"Report queued to print.",!
  • Line Location: QUEUE+3
Function Call: WRITE
  • Prompt: !,PSSDNM
  • Line Location: START+27
Function Call: WRITE
  • Prompt: ?43,PSSDOSEG,?65,^TMP("PSSDOS",$J,PSSDNM,PSSDOSEG)
  • Line Location: START+28
Function Call: WRITE
  • Prompt: !!,"NO DATA TO PRINT",!!
  • Line Location: START+30
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: COMMH+1
Function Call: WRITE
  • Prompt: !?3,"COMMON DOSAGES REPORT STARTING FROM "_$G(PSSPRINT)_$S($G(PSSCT)=1:"",1:" (cont.)"),?67,"PAGE: "_$G(PSSCT)
  • Line Location: COMMH+1
Function Call: WRITE
  • Prompt: !!,"DRUG",?43,"DOSAGE",?62,"FREQUENCY",!,PSSLINE,!
  • Line Location: COMMH+2
Routine Call
  • DIR
  • Line Location:
    • EN+3
    • EN+8
Routine Call
  • %ZIS
  • Line Location:
    • QUEUE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] START+11
^DGPM("ATT1" START+10
^PS(55 - [#55] START+14, START+15, START+16, START+17
^PSDRUG - [#50] START+17, START+18
^TMP("PSSDOS" START+4!, START+19*, START+20*, START+22, START+23, START+28, ENDX+1!
^TMP("PSSPAT" START+4!, START+12, START+13*, ENDX+1!

Label References

Name Line Occurrences
COMMH START+7, START+25
END START+8
ENDX EN+3, EN+4, EN+8, QUEUE+1, QUEUE+3
QUEUE QUEUE+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT EN+4!*
%DT("A" EN+4*
%DT(0 EN+4*
%ZIS QUEUE+1!*, ENDX+2!
DIR EN+3!, EN+6!, EN+8!
DIR("?" EN+7*
DIR("A" EN+3*, EN+6*
DIR("B" EN+8*
DIR(0 EN+3*, EN+6*
>> DIRUT EN+8
DT EN+4, START+2*, START+10
>> DTOUT EN+4
IO START+1
IO("Q" QUEUE+2
IOF END+1, COMMH+1
IOP QUEUE+1!
IOSL START+25
POP QUEUE+1!
PSSBEG EN+5*, START+6, START+8, START+9, ENDX+1!
>> PSSCT START+3*, COMMH+1*
PSSD START+4!, START+9*, START+10, START+14, ENDX+1!
PSSDCT START+4!, START+22*, START+27, START+28, START+29*, ENDX+1!
PSSDIEN START+4!, START+17*, START+18, ENDX+1!
PSSDNAME START+4!, START+18*, START+19, START+20, ENDX+1!
PSSDNM START+4!, START+22*, START+23, START+27, START+28, ENDX+1!
PSSDO START+4!, START+15*, START+19, START+20, ENDX+1!
PSSDOSEG START+4!, START+22*, START+23, START+28, ENDX+1!
PSSDV START+3*, START+4!, ENDX+1!
PSSIEN START+4!, START+10*, START+11, ENDX+1!
PSSLINE START+4!, START+5*, ENDX+1!, COMMH+2
PSSMIN EN+9*, START+23, ENDX+1!
PSSONE START+4!, START+16*, START+17, ENDX+1!
PSSOR START+4!, START+14*, ENDX+1!
PSSORDA START+4!, START+14*, START+15, START+16, START+17, ENDX+1!
>> PSSOUT START+3*
PSSP START+4!, START+10*, ENDX+1!
PSSPAT START+4!, START+11*, START+12, START+13, START+14, START+15, START+16, START+17, ENDX+1!
PSSPFLAG START+4!, START+21*, START+26*, START+30, ENDX+1!
PSSPRINT START+4!, START+6*, ENDX+1!, COMMH+1
PSSXXX START+4!, START+24*, START+25*, START+27, ENDX+1!
>> Y EN+3, EN+4, EN+5, EN+8, EN+9
>> ZTDESC QUEUE+3*
>> ZTQUEUED ENDX+2
>> ZTREQ ENDX+2*
>> ZTRTN QUEUE+3*
>> ZTSAVE("PSSBEG" QUEUE+3*
>> ZTSAVE("PSSMIN" QUEUE+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All