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

Package: Pharmacy Data Management

Routine: PSSWMAP


Information

PSSWMAP ;BIR/EJW-MAP WARNINGS FROM RX CONSULT FILE TO FDB ;05/21/04

Source Information

Source file <PSSWMAP.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 3 ^DIC  ^DIE  ^DIR  
Kernel 1 BMES^XPDUTL  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Pharmacy Data Management 1 PSS WARNING MAPPING  

Entry Points

Name Comments DBIA/ICR reference
FULL ;
HDR ;
EDIT ; ADD WARNING MAPPING AND/OR SPANISH TRANSLATION TO RX CONSULT FILE ENTRY
EDIT1
SPANISH ;
ASK
FILL ;

External References

Name Field # of Occurrence
^DIC EDIT1
^DIE FILL+4, FILL+5, FILL+6, FILL+7, FILL+8, EDIT1+9, ASK+2, SPANISH+3
^DIR EDIT1+6, ASK, SPANISH+1, HDR+1
BMES^XPDUTL FILL+1, FILL+2, FILL+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," Note: Warning mapping is only used as an aid when using the warning builder."
  • Line Location: EDIT+2
Function Call: WRITE
  • Prompt: !," If a DRUG WARNING is defined with a warning mapping of 0, that entry will be"
  • Line Location: EDIT+3
Function Call: WRITE
  • Prompt: !," skipped when choosing option 6 Drug has WARNING LABEL that does not map to"
  • Line Location: EDIT+4
Function Call: WRITE
  • Prompt: !," new data source."
  • Line Location: EDIT+5
Function Call: WRITE
  • Prompt: !,RXNUM,?8,$P($G(^PS(54,RXNUM,0)),"^"),?40," ",$G(^PS(54,RXNUM,2))
  • Line Location: EDIT+8
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT1+0
Function Call: WRITE
  • Prompt: !,?3,^PS(54,RXNUM,1,PSSTXT,0)
  • Line Location: EDIT1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT1+3
Function Call: WRITE
  • Prompt: !,"Rx Consult file number "_RXNUM_" is mapped to WARNING LABEL-ENGLISH number "_MAP
  • Line Location: EDIT1+4
Function Call: WRITE
  • Prompt: !,?3,^PS(50.625,MAP,1,PSSTXT,0)
  • Line Location: EDIT1+5
Function Call: WRITE
  • Prompt: !,?3,^PS(50.625,NEW,1,PSSTXT,0)
  • Line Location: EDIT1+10
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !,?3,^PS(50.625,X,1,PSSTXT,0)
  • Line Location: ASK+3
Function Call: WRITE
  • Prompt: !
  • Line Location: SPANISH+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SPANISH+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SPANISH+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!," CURRENT WARNING MAPPING",!!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "DRUG WARNING",?30,"Mapped to New data source number"
  • Line Location: HDR+4
Routine Call
  • DIE
  • Line Location:
    • FILL+4
    • FILL+5
    • FILL+6
    • FILL+7
    • FILL+8
    • EDIT1+9
    • ASK+2
    • SPANISH+3
Routine Call
  • DIC
  • Line Location:
    • EDIT1
Routine Call
  • DIR
  • Line Location:
    • EDIT1+6
    • ASK
    • SPANISH+1
    • HDR+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(54 - [#54] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(50.625 - [#50.625] EDIT1+5, EDIT1+10, ASK+3
^PS(54 - [#54] EDIT+7, EDIT+8, EDIT1+2, EDIT1+4

Label References

Name Line Occurrences
ASK EDIT1+4
EDIT1 SPANISH+2, SPANISH+4
FULL EDIT+8
HDR EDIT+6, FULL+1
SPANISH EDIT1+7, EDIT1+11, ASK+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA FILL+4*!, FILL+5*!, FILL+6*!, FILL+7*!, FILL+8*!, EDIT1+9*!, ASK+2*!, SPANISH+3*!
DIC EDIT1*!
DIC("A" EDIT1*
DIC(0 EDIT1*
DIE FILL+4*!, FILL+5*!, FILL+6*!, FILL+7*!, FILL+8*!, EDIT1+9*!, ASK+2*!, SPANISH+3*!
DIR EDIT1+6!, ASK!, SPANISH+1!, HDR+1!
DIR("A" EDIT1+6*, ASK*, SPANISH+1*
DIR("B" EDIT1+6*, ASK*, SPANISH+1*
DIR(0 EDIT1+6*, ASK*, SPANISH+1*, HDR+1*
DR FILL+4*!, FILL+5*!, FILL+6*!, FILL+7*!, FILL+8*!, EDIT1+9*!, ASK+2*!, SPANISH+3*!
IOF HDR+2
IOSL FULL+1
JJ FILL+3~, FILL+4*
MAP EDIT+1~, EDIT1+4*, EDIT1+5, EDIT1+6
NEW EDIT+1~, EDIT1+8*, EDIT1+9, EDIT1+10
>> PSSOUT EDIT+8, FULL+1, HDR+1*
PSSTXT EDIT+1~, EDIT1+2*, EDIT1+5*, EDIT1+10*, ASK+3*
>> QUIT HDR+1*
RXNUM EDIT+1~, EDIT+7*, EDIT+8, EDIT1+1*, EDIT1+2, EDIT1+4, EDIT1+9, ASK+2, SPANISH+3
>> X ASK+3
>> Y EDIT1, EDIT1+1, EDIT1+7, EDIT1+8, ASK+1, SPANISH+2, HDR+1
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