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

Package: Outpatient Pharmacy

Routine: PSONEW1


Information

PSONEW1 ;BIR/DSD - new Rx order entry ; 12/21/18 9:45am

Source Information

Source file <PSONEW1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Outpatient Pharmacy 8 EN^PSODIAG  (DOSE,INS,PROV,SINS)^PSODIR  (COPIES,DAYS,PTSTAT,QTY,REFILL)^PSODIR1  (CLERK,CLINIC,EXP,FILLDT,ISSDT,MW,RMK)^PSODIR2  ^PSODRG  EN^PSOFSIG  $$INSCHK^PSOHELP3  MANUAL^PSONRXN  

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

Package Total Caller Graph
Outpatient Pharmacy 5 PSODIR  PSODIR1  PSODIR2  PSODIR3  PSONEW  

Entry Points

Name Comments DBIA/ICR reference
START ;
1
2
3
31
32
4
7
5
6
8
9
10
11
12
13
14
15
16
END ;
JUMP ;

External References

Name Field # of Occurrence
EN^PSODIAG 3+1
DOSE^PSODIR 31+9
INS^PSODIR 32+3, 32+7
PROV^PSODIR 9
SINS^PSODIR 32+8
COPIES^PSODIR1 6
DAYS^PSODIR1 7
PTSTAT^PSODIR1 2
QTY^PSODIR1 5
REFILL^PSODIR1 8+1
CLERK^PSODIR2 16
CLINIC^PSODIR2 11
EXP^PSODIR2 10
FILLDT^PSODIR2 15
ISSDT^PSODIR2 14
MW^PSODIR2 12
RMK^PSODIR2 13
^PSODRG 3
EN^PSOFSIG 4
$$INSCHK^PSOHELP3 32+12
MANUAL^PSONRXN 1+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Incomplete Dosaging Data!",!
  • Line Location: 32+1
Function Call: WRITE
  • Prompt: !,$C(7),"Cannot jump ahead ..",!
  • Line Location: JUMP+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(55 - [#55] 32+3, 32+4
^TMP($J 318END+1!

Label References

Name Line Occurrences
11 9+2
31 32+1
9 8
@( 1+2, 2+1, 3+2, 31+11, 32+14, 7+1, 5+1, 6+1, 8+2, 9+1
10+1, 11+1, 12+1, 13+1, 14+1, 15+1, 16+1
END 1+2, 2+1, 3+1, 3+2, 31+11, 32+14, 7+1, 5+1, 6+1, 8+2
9+1, 10+1, 11+1, 12+1, 13+1, 14+1, 15+1, 16+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CLOZFLG 31+8*
DIRUT 32+1!
DUZ("AG" 9+2, 10
PSODELINS 32!, 32+8
>> PSODFN 3132+3, 32+4, 8END+1
PSODONE 32+5~*, 32+6, 32+8, 32+9*, 32+13*
PSOINSCH 32+5~, 32+12*, 32+13
>> PSONEW 231+9, 32+3, 32+7, 32+8, 32+12, 4756
8+1, 910111213141516
>> PSONEW("# OF REFILLS" , 31+1*
>> PSONEW("DAYS SUPPLY" , 31+2*
>> PSONEW("DFLG" START+1*, 1+2, 2+1, 3+1, 3+2, 31+11, 32+8, 32+9!, 32+14, 7+1
5+1, 6+1, 8+2, 9+1, 10+1, 11+1, 12+1, 13+1, 14+1, 15+1
16+1
>> PSONEW("DOSE ORDERED" , 31+4*
>> PSONEW("DOSE" 31+3*
>> PSONEW("DURATION" 31+5*
>> PSONEW("ENT" 31+7*, 32+1
>> PSONEW("FIELD" START+1*, 1*, 1+2, 2+1, 3+2, 31+11, 32+14, 7+1, 5+1, 6+1
8+2, 9+1, 10+1, 11+1, 12+1, 13+1, 14+1, 15+1, 16+1, JUMP+1*
JUMP+2*
>> PSONEW("FLD" 1*, 2*, 3*, 31+9*, 32+3*, 32+7*, 7*, 5*, 6*, 8+1*
, 9*, 10*, 11*, 12*, 13*, 14*, 15*, 16*, JUMP+1, JUMP+2
>> PSONEW("INS" 32+2, 32+10!, 32+11
>> PSONEW("QFLG" 1+2
>> PSONEW("QTY" 31+6*
>> PSONEW("SIG" 32+10!
>> PSONEW("SINS" 32+2, 32+10, 32+11!
PSONEW1 START+1*, END+1!
PSOOEINS 32+2*, END+1!
PSOOSINS 32+2*, END+1!
>> PSOPAR 1+1, 6
>> SIG(0 4
>> SIGOK 4*
>> Y JUMP+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All