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

Package: Outpatient Pharmacy

Routine: PSOREJP2


Information

PSOREJP2 ;BIRM/MFR - Third Party Rejects View/Process ;04/28/05

Source Information

Source file <PSOREJP2.m>

Call Graph

Call Graph Total: 17

Package Total Call Graph
Outpatient Pharmacy 8 ($$RXRLDT,$$RXSUDT)^PSOBPSUT  LST^PSOREJP0  ($$CLOSED,$$TRIC)^PSOREJP1  (PRINT,SAVECOM)^PSOREJP3  ($$COM,$$SIG,SEL)^PSOREJU1  (GET,RETRXF,SETOPN)^PSOREJU2  ($$FIND,CLOSE,SAVE)^PSOREJUT  CHANGE^PSOSUCH1  
VA Fileman 6 ^%DT  C^%DTC  ^DIC  ^DIE  $$GET1^DIQ  ^DIR  
Kernel 1 $$FMTE^XLFDT  
Pharmacy Data Management 1 (PSOL,PSOUL)^PSSLOCK  
Registration 1 FULL^VALM1  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Outpatient Pharmacy 3 PSO REJECTS VIEW/PROCESS  PSOREJP3  PSORXED  

Entry Points

Name Comments DBIA/ICR reference
DTRNG(BGN,END) ; Date Range Selection
CLO
CHG ; - Change Suspense Date action
SUDT ; Asks for the new Suspense Date
EXIT
OPN ; - Re-open a Closed/Resolved Reject
SEL ; - Field Selection (Patient/Drug/Rx)
PTLBL(RX,RFL) ; Returns whether the user should be prompted for 'Print Label?' or not

External References

Name Field # of Occurrence
^%DT SUDT+3, DTRNG+6, DTRNG+11
C^%DTC SUDT+1
^DIC SEL+17
^DIE SUDT+42
$$GET1^DIQ PSOREJP2+9, CHG+6, CHG+7, CHG+8, CHG+13, SUDT+15, PTLBL+4, PTLBL+9, PTLBL+14, PTLBL+16
, PTLBL+17
^DIR SEL+2, SEL+30, SEL+37, CLO+15, OPN+10, SUDT+37, PTLBL+23
$$RXRLDT^PSOBPSUT CHG+10, PTLBL+5, PTLBL+15
$$RXSUDT^PSOBPSUT CHG+6, SUDT+40
LST^PSOREJP0 SEL+40
$$CLOSED^PSOREJP1 CLO+4, OPN+1, CHG+1
$$TRIC^PSOREJP1 CLO+2, PTLBL+2
PRINT^PSOREJP3 CLO+19
SAVECOM^PSOREJP3 OPN+21
$$COM^PSOREJU1 CLO+10
$$SIG^PSOREJU1 CLO+8, OPN+5
SEL^PSOREJU1 PSOREJP2+9, SEL+7, SEL+11
GET^PSOREJU2 OPN+13
RETRXF^PSOREJU2 OPN+22, SUDT+46
SETOPN^PSOREJU2 OPN+13
$$FIND^PSOREJUT PTLBL+3
CLOSE^PSOREJUT CLO+16, SUDT+48
SAVE^PSOREJUT OPN+15
CHANGE^PSOSUCH1 SUDT+43
PSOL^PSSLOCK CHG+11
PSOUL^PSSLOCK SUDT+3, SUDT+37, SUDT+50
FULL^VALM1 CLO+7, OPN+4, SUDT+2
$$FMTE^XLFDT SUDT+2, SUDT+5, SUDT+7, SUDT+9, SUDT+18, SUDT+21, SUDT+27, SUDT+30, SUDT+48

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PSOREJP2+12
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL+17
Function Call: WRITE
  • Prompt: !?40,"Prescription does not have rejects!",$C(7)
  • Line Location: SEL+20
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL+25
Function Call: WRITE
  • Prompt: !
  • Line Location: CLO+9
Function Call: WRITE
  • Prompt: !
  • Line Location: CLO+11
Function Call: WRITE
  • Prompt: ?40,"[Closing..."
  • Line Location: CLO+16
Function Call: WRITE
  • Prompt: "OK]",!,$C(7)
  • Line Location: CLO+16
Function Call: WRITE
  • Prompt: !
  • Line Location: OPN+6
Function Call: WRITE
  • Prompt: ?40,"[Re-opening..."
  • Line Location: OPN+12
Function Call: WRITE
  • Prompt: "OK]",!,$C(7)
  • Line Location: OPN+23
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: CHG+2
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: CHG+9
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: CHG+10
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: CHG+11
Function Call: WRITE
  • Prompt: !
  • Line Location: SUDT+3
Function Call: WRITE
  • Prompt: !!?5,"Suspense Date cannot be before Issue Date: ",$$FMTE^XLFDT(ISSDT),".",$C(7)
  • Line Location: SUDT+5
Function Call: WRITE
  • Prompt: !!?5,"Suspense Date cannot be after Expiration Date: ",$$FMTE^XLFDT(EXPDT),".",$C(7)
  • Line Location: SUDT+7
Function Call: WRITE
  • Prompt: !!?5,"Suspense Date cannot be after fill date plus 90 days: "_$$FMTE^XLFDT(CUTDT),".",$C(7)
  • Line Location: SUDT+9
Function Call: WRITE
  • Prompt: !
  • Line Location: SUDT+12
Function Call: WRITE
  • Prompt: ?40,"[Closing..."
  • Line Location: SUDT+47
Function Call: WRITE
  • Prompt: !
  • Line Location: DTRNG+10
Routine Call
  • DIE
  • Line Location:
    • SUDT+42
Routine Call
  • DIC
  • Line Location:
    • SEL+17
Routine Call
  • DIR
  • Line Location:
    • SEL+2
    • SEL+30
    • SEL+37
    • CLO+15
    • OPN+10
    • SUDT+37
    • PTLBL+23

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSRX - [#52] GET1^DIQ
52.01 GET1^DIQ
52.032 GET1^DIQ
52.1 GET1^DIQ
52.25 GET1^DIQ
^PS(52.5 - [#52.5] Classic Fileman Calls,  GET1^DIQ
^PS(59 - [#59] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.5 - [#52.5] CHG+14
^PSRX - [#52] SEL+19, PTLBL+8, PTLBL+13

Label References

Name Line Occurrences
$$DTRNG PSOREJP2+12
$$PTLBL CLO+19
EXIT PSOREJP2+9, PSOREJP2+12, SEL+2, SEL+35
SEL SEL+5, SEL+9, SEL+13, SEL+23
SUDT SUDT+4, SUDT+6, SUDT+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT CHG+4~, SUDT+2*, DTRNG+4~, DTRNG+6*, DTRNG+10!, DTRNG+11*
%DT("A" SUDT+2*, DTRNG+6*, DTRNG+11*
%DT("B" SUDT+2*, DTRNG+6*!, DTRNG+11*!
%DT(0 DTRNG+11*
BGN DTRNG~, DTRNG+6
>> CHANGE CLO+17*, OPN+24*, SUDT+49*
CMP PTLBL+1~, PTLBL+7*, PTLBL+8*, PTLBL+9
COM CLO+6~, CLO+10*, CLO+16, OPN+3~, OPN+17*, OPN+18, OPN+19, OPN+20
CUTDT CHG+4~, SUDT+1*, SUDT+8, SUDT+9
DA CHG+4~, SUDT+41~, SUDT+42*
DEAD SUDT+41~, SUDT+43*
DIC SEL+15~, SEL+16*
DIC("A" SEL+16*
DIC(0 SEL+16*
DIE CHG+4~, SUDT+41~, SUDT+42*
DIR PSOREJP2+4~, SEL+25~, CLO+6~, OPN+3~, SUDT+12~, PTLBL+21~
DIR("A" SEL+2*, SEL+26*, SEL+27*, SEL+28*, SEL+29*, SEL+32!*, SEL+37*, CLO+12*, CLO+13*, CLO+14*
, OPN+7*, OPN+8*, OPN+9*, SUDT+13*, SUDT+14*, SUDT+17*, SUDT+18*, SUDT+19*, SUDT+20*, SUDT+21*
, SUDT+23*, SUDT+26*, SUDT+27*, SUDT+28*, SUDT+29*, SUDT+30*, SUDT+32*, SUDT+33*, SUDT+35*, SUDT+36*
, PTLBL+22*
DIR("B" SEL+1*, SEL+3*, SEL+36*, CLO+12*, OPN+7*, SUDT+36*, PTLBL+22*
DIR(0 SEL+1*, SEL+29*, SEL+36*, CLO+12*, OPN+7*, SUDT+36*, PTLBL+22*
DIRUT PSOREJP2+4~, SEL+2, SEL+31, SEL+35, CLO+15, OPN+10, SUDT+12~, SUDT+37, PTLBL+21~, PTLBL+23
DR CHG+4~, SUDT+41~, SUDT+42*
DT SUDT+16, SUDT+25
DTOUT PSOREJP2+4~, SEL+13, SEL+18, SUDT+3, DTRNG+4~, DTRNG+7, DTRNG+12
DTRNG DTRNG+4~, DTRNG+5*, DTRNG+8*, DTRNG+15*, DTRNG+17
DUOUT PSOREJP2+4~, SEL+13, SEL+18, DTRNG+4~, DTRNG+7, DTRNG+12
DUZ CLO+16, OPN+14, SUDT+48
END DTRNG~, DTRNG+11
EXPDT CHG+4~, CHG+13*, SUDT+6, SUDT+7
FILDT CHG+4~, CHG+7*, CHG+8*, SUDT+1
>> FILL CLO+2, CLO+16, CLO+19, OPN+13, OPN+15, OPN+22
INDT SUDT+41~, SUDT+43*
ISSDT CHG+4~, CHG+13*, SUDT+4, SUDT+5
LBL PTLBL+1~, PTLBL+12*, PTLBL+13*, PTLBL+14, PTLBL+16, PTLBL+17
NEWDATA OPN+3~, OPN+14!*, OPN+15
NEWDATA("PHARMACIST" OPN+14*
NEWDATA("REJE CT IEN" , OPN+16, OPN+21
OK SEL+15~, SEL+17, SEL+18*, SEL+21*, SEL+25~, SEL+30, SEL+31*
PSOBYFLD PSOREJP2+4~, SEL+3*, SEL+5, SEL+9, SEL+13, SEL+23
PSODRFLT PSOREJP2+4~, SEL+6*, SEL+9, SEL+11, SEL+14*, SEL+24*
PSODTRNG PSOREJP2+5~, PSOREJP2+12*
PSOINFLT PSOREJP2+5~, SEL+6*, SEL+10*, SEL+14*, SEL+25!
PSOINFLT( SEL+32*
PSOINFLT("" SEL+23
PSOINGRP PSOREJP2+5~, PSOREJP2+6*
PSOMSG CHG+4~, CHG+11
PSOPTFLT PSOREJP2+4~, SEL+5, SEL+7, SEL+10*, SEL+14*, SEL+24*
>> PSOREJST PSOREJP2+9
>> PSORJASC PSOREJP2+6*
PSORJSRT PSOREJP2+4~, SEL+6*, SEL+10*, SEL+14*, SEL+24*
PSORXFLT PSOREJP2+4~, SEL+6*, SEL+10*, SEL+13, SEL+15!, SEL+21*, SEL+24*
>> PSOSITE PSOREJP2+9
PSOSTFLT PSOREJP2+4~, SEL+15!, SEL+35, SEL+38*, CLO+17, SUDT+49
PSOTRIC CLO+1~, CLO+2*, CLO+3, PTLBL+2~*, PTLBL+5, PTLBL+15
PSOTRITG PSOREJP2+5~, PSOREJP2+6*
PSOX SUDT+41~
PTLBL PTLBL+1~, PTLBL+7*, PTLBL+8, PTLBL+9*, PTLBL+10, PTLBL+13, PTLBL+18*, PTLBL+20, PTLBL+23*, PTLBL+25
>> REJ CLO+4, CLO+16, OPN+1, OPN+13, OPN+14, OPN+16, OPN+17, OPN+18, OPN+19, OPN+20
, CHG+1, CHG+6, SUDT+48
REJDATA OPN+3~, OPN+13!
REJDATA( OPN+14, OPN+16, OPN+17, OPN+18, OPN+19, OPN+20
REOPEN OPN+3~, OPN+15*
REPRINT PTLBL+1~, PTLBL+15*, PTLBL+22
RFL CHG+6*, CHG+7, CHG+10, SUDT+40, SUDT+43, SUDT+46, SUDT+48, PTLBL~, PTLBL+2, PTLBL+3
, PTLBL+5, PTLBL+9, PTLBL+14, PTLBL+15
RX CLO+2, CLO+4, CLO+16, CLO+19, OPN+1, OPN+13, OPN+15, OPN+21, OPN+22, CHG+1
, CHG+6, CHG+7, CHG+8, CHG+10, CHG+11, CHG+13, CHG+14, SUDT+3, SUDT+37, SUDT+40
, SUDT+43, SUDT+46, SUDT+48, SUDT+50, PTLBL~, PTLBL+2, PTLBL+3, PTLBL+4, PTLBL+5, PTLBL+8
, PTLBL+9, PTLBL+13, PTLBL+14, PTLBL+15, PTLBL+16, PTLBL+17
SFN SUDT+41~, SUDT+43*
SUSDT CHG+4~, CHG+6*, CHG+9, SUDT+2, SUDT+10*, SUDT+16, SUDT+18, SUDT+21, SUDT+25, SUDT+27
, SUDT+30, SUDT+40, SUDT+42, SUDT+43, SUDT+48
SUSRX CHG+4~, CHG+14*, SUDT+15, SUDT+42, SUDT+43
U DTRNG+8, DTRNG+15
>> VALMBCK CLO+3*, CLO+5*, CLO+8*, CLO+10*, CLO+15*, OPN+2*, OPN+5*, OPN+10*, CHG+2*, CHG+9*
, CHG+10*, CHG+11*, SUDT+3*, SUDT+37*
>> VALMSG CLO+3*, CLO+5*, OPN+2*, CHG+2*, CHG+9*, CHG+10*, CHG+11*
X SEL+15~, SEL+18, SEL+25~, SEL+31, SEL+32, CLO+1~, OPN+3~, SUDT+1, DTRNG+4~
X(1 OPN+18*, OPN+21
X(2 OPN+19*, OPN+21
X(3 OPN+20*, OPN+21
>> X1 SUDT+1*
>> X2 SUDT+1*
Y SEL+3, SEL+15~, SEL+19, SEL+21, SEL+25~, SEL+38, CLO+15, OPN+10, CHG+4~, SUDT+3
, SUDT+4, SUDT+6, SUDT+8, SUDT+10, SUDT+37, PTLBL+21~, PTLBL+23, DTRNG+4~, DTRNG+7, DTRNG+8
, DTRNG+11, DTRNG+12, DTRNG+15
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