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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSOREF1

Package: Outpatient Pharmacy

Routine: PSOREF1


Information

PSOREF1 ;IHS/DSD/JCM-ASKS ALL QUESTIONS FOR REFILL RX ORDER ENTRY;21-Apr-2005 14:19;SM

Source Information

Source file <PSOREF1.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Outpatient Pharmacy 3 ^PSOBUILD  GMRA^PSODEM  (CLERK,EXP,FILLDT,MW)^PSODIR2  
IHS Changes To Pharmacy 2 (AWP,BST,COST,INSURER,LOT,MANUF,NDC)^APSPDIR  ($$AWP,$$COST)^APSQDAWP  
VA Fileman 1 ^%DT  

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Outpatient Pharmacy 6 PSOBBC  PSODIR  PSODIR1  PSOREF  PSOREF0  PSORENW0  
IHS Changes To Pharmacy 1 APSQFUTI  

Entry Points

Name Comments DBIA/ICR reference
11
10
JUMP ;
END ;
PROFILEX
EN(PSOREF) ;
IHSSET ; EP
1
START ;
3
2 ;S PSOREF("FLD")=2,PSORX("MAIL/WINDOW")="MAIL" D MW^PSODIR2(.PSOREF)
5
4
7
6
9
8
PROFILE ;

External References

Name Field # of Occurrence
^%DT START+2
AWP^APSPDIR 8+1
BST^APSPDIR 5+1
COST^APSPDIR 9+1
INSURER^APSPDIR 6+1
LOT^APSPDIR 11+1
MANUF^APSPDIR 10+1
NDC^APSPDIR 7+1
$$AWP^APSQDAWP END+3
$$COST^APSQDAWP END+4
^PSOBUILD PROFILE+2
GMRA^PSODEM PROFILE+3
CLERK^PSODIR2 3
EXP^PSODIR2 4
FILLDT^PSODIR2 1+1
MW^PSODIR2 2+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),"Cannot jump ahead ..",!
  • Line Location: JUMP+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(55.95 - [#55.95] IHSSET+10
^PSDRUG - [#50] START+6, IHSSET+2, IHSSET+3, IHSSET+5, IHSSET+6, IHSSET+8
^PSRX - [#52] START+3, START+6, 1, IHSSET+1

Label References

Name Line Occurrences
@( 1+2, 2+3, 3+1, 4+1, 5, 6, 7, 8, 9, 10
, 11
END 1+2, 2+3, 3+1, 4+1, 5, 6, 7, 8, 9, 10
, 11
IHSSET START+9
PROFILEX PROFILE+3
START EN+1

Naked Globals

Name Field # of Occurrence
^(0 1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT START+2*
>> APSPMAN 10, 11, IHSSET+9, IHSSET+12
>> DEA START+7*
>> DFN PROFILE+3*
DT START+4
DUZ("AG" 3, 4
NODE IHSSET+7~, IHSSET+8*, IHSSET+10, IHSSET+11, IHSSET+12
>> PSOAWP 8
>> PSOBBC1("FROM" START+4
>> PSOBILST 5, 6, IHSSET+4
>> PSOCOST 9
>> PSODFN PROFILE+3
>> PSODRG PROFILE+4*
>> PSODRUG("DEA" START+6*, START+7
>> PSODRUG("IEN" END+3, END+4, IHSSET+1*, IHSSET+2, IHSSET+3, IHSSET+5, IHSSET+6, IHSSET+8
>> PSODRUG("NDC" END+3, END+4, IHSSET+2*
>> PSOID START+3*
>> PSONDC 7
>> PSONEW("# OF REFILLS" , 1*
>> PSONEW("DAYS SUPPLY" , 1*
>> PSONEW("FIELD" JUMP+3*
PSOREF 1+1, 2+1, 3, 4, 5+1, 6+1, 7+1, 8+1, 9+1, 10+1
, 11+1, EN~
PSOREF("AWP" 7+3!, END+3*, IHSSET+3*
PSOREF("BST" IHSSET+4*
PSOREF("COST" 7+4!, END+4*, IHSSET+5*
PSOREF("CS" START+6*, START+7*
PSOREF("DFLG" START+1*, 1+2, 2+3, 3+1, 4+1, 5, 6, 7, 7+2, 8
, 9, 10, 11, END+3, END+4
PSOREF("EXPIR ATION DATE" , IHSSET+12*
PSOREF("FIELD" START+1*, 1+2, 2+3, 3+1, 4+1, 5, 6, 7, 8, 9
, 10, 11, JUMP+1*, JUMP+4*
PSOREF("FLD" 1+1*, 2+1*, 3*, 4*, 5+1*, 6+1*, 7+1*, 8+1*, 9+1*, 10+1*
, 11+1*, JUMP+1, JUMP+4
PSOREF("IRXN" START+3, START+6, 1, IHSSET+1
PSOREF("ISSUE DATE" , START+3*, START+4*
PSOREF("LOT # " , IHSSET+11*
PSOREF("MANUFACTURER" IHSSET+10*
PSOREF("NDC" END+3, END+4, IHSSET+2*
PSOREF1 START+1*, END+1!
>> PSORX("BAR CO DE" , START+4
>> PSORX("MAIL/WINDOW" 2+1*
>> PSORX("REFILL" PROFILE+1*, PROFILE+4*
>> PSORX("RENEW" PROFILE+1*, PROFILE+4*
>> PSOSD PROFILE+3
>> PSOSD( PROFILE+4
PSOX PROFILE+1*, PROFILE+4*, PROFILE+5!
>> TALK END+3, END+4
U IHSSET+1, IHSSET+2, IHSSET+3, IHSSET+10, IHSSET+11, IHSSET+12
X START+2*, START+5!
X1 START+5!
X2 START+5!
>> Y START+3, JUMP+1, JUMP+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All