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 |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PSOPRA

Package: Outpatient Pharmacy

Routine: PSOPRA


Information

PSOPRA ;BIR/JLC/MHA - INTERNET PRESCRIPTION REFILL APIS ; 4/14/05 4:51pm

Source Information

Source file <PSOPRA.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 5 NOW^%DTC  FILE^DICN  ^DIE  $$GET1^DIQ  EN^DIQ1  
Uncategorized 1 $$GETICN^MPIF001  

Entry Points

Name Comments DBIA/ICR reference
AP5(PSODFN,PSORX) ;PROCESS MHEV UPDATE
; Input: PSODFN (required) - Patient IEN Number
; PSORX (required) - Prescription Number
; Output: PSORET - Return Value
; See IA ... for description and values
  • ICR #3768
    • Status: Active
    • Usage: Private
    FILEAP1
    ENDAP5
    AP1(PSODFN,PSORX) ;ACCEPT REQUEST
    ; Input: PSODFN (required) - Patient IEN Number
    ; PSORX (required) - Prescription Number
    ; Output: PSORET - Return Value
    ; See IA# 3768 for description and values
  • ICR #3768
    • Status: Active
    • Usage: Private
    AP6(PSODIEN,PSOAP6) ;OUTPATIENT PHARMACY DIVISION LOOKUP
    ; Input: PSODIEN (required) - Outpatient Pharmacy Division IEN.
    ; 1. Single Division IEN.
    ; 2. Delimited list of Division IEN's (IEN1,IEN2,IEN3).
    ; 3. Text word "ALL".
    ; PSOAP6 (required) - Information return Array.
    ; Output: PSOAP6 - Information return Array.
    ; PSOAP6(DIV)=Active(0)/Inactive(1)
    ; PSOAP6(DIV,1)=Division Name^Area Code^Phone Number
    ; PSOAP6(DIV,2,1)=Narrative text 1st line.
    ; PSOAP6(DIV,2,n)=Narrative text nth line.
    ; PSORET - 0 (Process failure).
    ; 1 (Process success).
  • ICR #3768
    • Status: Active
    • Usage: Private
    ENDAP6
    AP2(PSODFN,PSORX) ;STATUS OF REQUEST
    ; Input: PSODFN (required) - Patient IEN Number
    ; PSORX (required) - Prescription Number
    ; Output: PSORET - Return Value
    ; See IA ... for description and values
  • ICR #3768
    • Status: Active
    • Usage: Private
    QUITAP1
    QUITAP2

    External References

    Name Field # of Occurrence
    NOW^%DTC FILEAP1+1
    FILE^DICN FILEAP1
    ^DIE FILEAP1+2, AP5+17
    $$GET1^DIQ AP6+18, AP6+20, AP6+21, AP6+22, AP6+25
    EN^DIQ1 AP1+16
    $$GETICN^MPIF001 AP1+8

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^PS(52.43 - [#52.43] Classic Fileman Calls
    ^PS(59 - [#59] GET1^DIQ

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^PS(52.43 - [#52.43] AP1+17, AP1+18, AP1+19, AP1+20, AP2+9, AP2+10, AP2+11!, AP2+12, AP5+9, AP5+10
    , AP5+11!, AP5+12, AP5+18!
    ^PS(59 - [#59] AP6+16
    ^PSRX - [#52] AP1+13
    ^PSRX("B" AP1+11, AP1+12, AP1+13
    ^XMB(1 - [#4.3] AP1+16

    Label References

    Name Line Occurrences
    ENDAP5 AP5+7, AP5+8, AP5+9, AP5+11, AP5+13
    FILEAP1 AP1+17, AP1+19
    QUITAP1 AP1+7, AP1+9, AP1+10, AP1+11, AP1+12, AP1+14, AP1+15, AP1+21, AP1+22, FILEAP1
    QUITAP2 AP2+7, AP2+8, AP2+9, AP2+11, AP2+13

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % FILEAP1+1~, FILEAP1+2
    AREACODE AP6+14~, AP6+20*, AP6+24
    DA AP1+16*, FILEAP1+2!*, AP5+15!, AP5+16*
    DD FILEAP1!
    DIC AP1+16*, FILEAP1!*, FILEAP1+2
    DIC(0 FILEAP1*
    DIE FILEAP1+2!*, AP5+15!, AP5+17*
    DIEN AP6+14~, AP6+17*, AP6+18, AP6+20, AP6+21, AP6+22, AP6+23, AP6+24, AP6+25
    >> DIQ AP1+16*
    >> DIQ(0 AP1+16*
    DO FILEAP1!
    DR AP1+16*, FILEAP1+2!*, AP5+15!, AP5+17*
    IEN AP1+6~, AP1+18*, AP1+19, AP1+20, AP2+6~, AP2+10*, AP2+11, AP2+12, AP5+6~, AP5+10*
    , AP5+11, AP5+12, AP5+16
    INACTIVE AP6+14~, AP6+22*, AP6+23
    NAME AP6+14~, AP6+18*, AP6+19, AP6+24
    PHONENUM AP6+14~, AP6+21*, AP6+24
    PSOAP6 AP6~
    PSOAP6( AP6+23*, AP6+24*
    PSODFN AP1~, AP1+7, AP1+8, AP1+15, AP1+17, AP1+18, FILEAP1+2, AP2~, AP2+7, AP2+9
    , AP2+10, AP2+11, AP5~, AP5+7, AP5+9, AP5+10, AP5+11, AP5+18
    PSODIEN AP6~, AP6+15, AP6+16*, AP6+17
    PSOICN AP1+6~, AP1+8*, AP1+9, FILEAP1
    PSOIN AP5+6~, AP5+14*
    PSORET AP1+6~, AP1+7*, AP1+9*, AP1+10*, AP1+11*, AP1+12*, AP1+14*, AP1+15*, AP1+21*, AP1+22*
    , FILEAP1*, FILEAP1+3*, QUITAP1, AP2+6~, AP2+7*, AP2+8*, AP2+9*, AP2+11*, AP2+13*, AP2+14*
    , QUITAP2, AP5+6~, AP5+7*, AP5+8*, AP5+9*, AP5+11*, AP5+13*, AP5+17*, ENDAP5
    PSORR AP1+6~, AP1+20*, AP1+21, AP2+6~, AP2+12*, AP2+13, AP2+14, AP5+6~, AP5+12*, AP5+13
    , AP5+14
    PSORX AP1~, AP1+10, AP1+11, AP1+12, AP1+13, AP1+17, AP1+18, FILEAP1+2, AP2~, AP2+8
    , AP2+9, AP2+10, AP2+11, AP5~, AP5+8, AP5+9, AP5+10, AP5+11, AP5+18
    PSOSITE AP1+6~, AP1+16*, FILEAP1+2
    PSRX AP1+6~, AP1+13*, FILEAP1+2
    PSRXD AP1+6~, AP1+13*, AP1+14, AP1+15
    >> PSXUTIL(4 AP1+16
    SITE AP1+6~, AP1+16*
    TEMP AP6+14~, AP6+25*
    >> X FILEAP1*
    >> XX AP6+17*
    >> Y FILEAP1, FILEAP1+2
    >> ZS2 AP6+16*
    Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All