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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: PSOHLSN1

Package: Outpatient Pharmacy

Routine: PSOHLSN1


Information

PSOHLSN1 ;BIR/RTR - Send order info to OERR from file 52 ;10/10/94

Source Information

Source file <PSOHLSN1.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Outpatient Pharmacy 6 EN^PSOHDR  (DELP,SEGPARX)^PSOHLSN  (DG1,ZCL,ZSC)^PSOHLSN2  ORC^PSOHLSN3  FSIG^PSOUTLA  EN3^PSOUTLA1  
Kernel 2 ($$DT,$$FMTHL7)^XLFDT  MSG^XQOR  
Registration 2 DEM^VADPT  $$SITE^VASITE  
National Drug File 1 (,$$DFSU)^PSNAPIS  
Order Entry Results Reporting 1 $$ESC^ORHLESC  
Pharmacy Data Management 1 $$EN^PSSUTIL1  
VA FileMan 1 EN^DIQ1  

Caller Graph

Caller Graph Total: 67

Package Total Caller Graph
Outpatient Pharmacy 61 PSO293PI  PSO52API  PSOARCDE  PSOARCS2  PSOAUTOC  PSOBBC  PSOBUILD  PSOCAN  
PSOCAN2  PSOCAN3  PSOCMOP  PSOCP1  PSOCPC  PSOCPTRH  PSOCPTRI  PSOCSRL  
PSODISP  PSODISPS  PSOELPS2  PSOELPST  PSOEXBCH  PSOHLD  PSOHLDA  PSOHLDC  
PSOHLDIS  PSOHLEXP  PSOHLNE1  PSOHLNEW  PSOHLSN  PSOHLSN2  PSOHLSN3  PSOHLUP  
PSOHLUP1  PSOLBL4  PSOMAUEX  PSONEW  PSONVNEW  PSOORDRG  PSOORED1  PSOOREDT  
PSOORNE6  PSOORUT1  PSOORUTL  PSOPI136  PSOPKIV1  PSOPOST  PSOPOST6  PSORENW  
PSORENW4  PSORESK  PSORRPA1  PSORXDL  PSORXL1  PSORXPA1  PSORXRP1  PSORXRP2  
PSORXRPT  PSOSUCHG  PSOSUTL  PSOUTLA1  PSOVER1  
CMOP 6 PSXBLD  PSXNEW  PSXRPPL  PSXRXU  PSXSRST  PSXVND  

Entry Points

Name Comments DBIA/ICR reference
EN(PSRXIEN,STAT,PSSTAT,COMM,PSNOO) ;
  • ICR #2385
    • Status: Active
    • Usage: Private
    SKIP ;
    NCM
    INIT
    PID
    DG1
    PV1 ;
    ORC ;
    RXO ;
    RXE ;
    RXR ;
    ZCL
    ZSC
    ZRX ;
    SEG
    SEND
    NOO ;
    DUR(PSODX1,PSODX2) ;

    External References

    Name Field # of Occurrence
    EN^DIQ1 INIT
    $$ESC^ORHLESC RXE+8, RXE+9, RXE+17, RXE+20, RXE+22, RXE+24, RXE+35, RXE+36, RXE+39, RXE+40
    , RXE+43, RXE+45
    ^PSNAPIS RXE+20
    $$DFSU^PSNAPIS RXE+20
    EN^PSOHDR SKIP+5, SEND, SEND+3
    DELP^PSOHLSN EN+5, EN+6
    SEGPARX^PSOHLSN SKIP+13, RXE+31
    DG1^PSOHLSN2 DG1
    ZCL^PSOHLSN2 ZCL
    ZSC^PSOHLSN2 ZSC
    ORC^PSOHLSN3 ORC+1
    FSIG^PSOUTLA RXE+43
    EN3^PSOUTLA1 RXE+45
    $$EN^PSSUTIL1 RXE+30
    DEM^VADPT PID+1
    $$SITE^VASITE INIT
    $$DT^XLFDT RXE+5
    $$FMTHL7^XLFDT RXE+4, RXE+6
    MSG^XQOR SEND

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^PS(50.606 - [#50.606] RXO+4, RXE+23
    ^PS(50.607 - [#50.607] RXE+8, RXE+22
    ^PS(50.7 - [#50.7] RXO+4, RXE+23
    ^PS(51.2 - [#51.2] RXR+4
    ^PS(52.41 - [#52.41] SKIP+5, ZRX+5
    ^PSDRUG - [#50] RXE+16, RXE+17
    ^PSNDF( RXE+21
    ^PSRX - [#52] SKIP+1, SKIP+4, SKIP+6, SKIP+7*, PID+1, PV1+4, RXO+3, RXE+4, RXE+6, RXE+7
    , RXE+8, RXE+9, RXE+11, RXE+12, RXE+13, RXE+16, RXE+23, RXE+25, RXE+26, RXE+27
    , RXE+28, RXE+29, RXE+33, RXE+34, RXE+35, RXE+36, RXE+37, RXE+38, RXE+39, RXE+40
    , RXE+42, RXE+44, RXR+1, RXR+4, ZRX+4, ZRX+8, ZRX+9, DUR+1
    ^UTILITY("DIQ1" INIT!
    ^VA(200 - [#200] ZRX+10

    Label References

    Name Line Occurrences
    $$DUR RXE+11
    DG1 SKIP+11, SKIP+12
    INIT SKIP+8
    NCM SKIP+10, SKIP+11
    ORC SKIP+9
    PID SKIP+9
    PV1 SKIP+9
    RXE SKIP+11, SKIP+12, SKIP+13
    RXO SKIP+11, SKIP+12
    RXR SKIP+11, SKIP+12
    SEG PID+5, PV1+5, RXO+5, RXR+6, ZRX+12
    SEND NCM
    SKIP EN+5
    ZCL SKIP+11, SKIP+12
    ZRX SKIP+11, SKIP+12, SKIP+14
    ZSC SKIP+11, SKIP+12

    Naked Globals

    Name Field # of Occurrence
    ^( RXE+7
    ^("ND" RXE+16
    ^(0 PV1+4, RXO+4, RXE+8, RXE+40
    ^(2 RXE+6
    ^(3 RXE+6

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    BBB EN+1~
    BSIG EN+2~
    BSIG( RXE+45
    BSIG(1 RXE+45
    CCC EN+1~, RXE+34*, RXE+35, RXE+36*, RXE+38*, RXE+39, RXE+40*, RXE+43*, RXE+45*
    CCCX EN+2~, RXE+40*
    COMM EN~
    COUNT EN+1~, SKIP+3*, SKIP+9*, RXE+34*, RXE+35, RXE+36, RXE+38*, RXE+39, RXE+40, RXE+41*
    , RXE+43, RXE+45, SEG+1*
    CSCOUNT EN+1~, RXE+36*
    DA EN+2~, INIT*!
    DFN EN+1~, PID+1*, PID+3
    DIC INIT*!
    DIQ INIT!
    DIQ(0 INIT*
    DR INIT*!
    DT RXE+5*, RXE+6
    DUZ ZRX+9
    EDUZ EN+1~
    FIELD EN+3!, SEND!
    FIELD( SEG
    FIELD(0 PID+2*, PV1+2*, RXO+2*, RXE+3*, RXR+3*, ZRX+3*
    FIELD(1 RXO+4*, RXE+8*, RXE+9*, RXE+10*, RXE+11*, RXE+12*, RXE+13*, RXE+15*, RXR+5*, ZRX+4*
    , ZRX+5*
    FIELD(10 RXE+25*
    FIELD(12 RXE+26*
    FIELD(14 RXE+27*
    FIELD(15 RXE+28*
    FIELD(2 PV1+3*, RXE+17*, ZRX+6*
    FIELD(22 RXE+29*
    FIELD(25 RXE+30*
    FIELD(26 RXE+30*
    FIELD(3 PID+3*, PV1+4*, ZRX+7*
    FIELD(4 ZRX+8*
    FIELD(5 PID+4*, RXE+20*, RXE+22*, ZRX+10*
    FIELD(6 RXE+24*, ZRX+11*
    FSIG EN+2~
    FSIG( RXE+43
    FSIG(1 RXE+43
    J EN+1~, SEG*
    LIMIT EN+1~, PID*, PV1+1*, RXO+1*, RXE+2*, RXR+2*, ZRX+2*, SEG
    MMZZ RXE+7~*, RXE+8, RXE+9, RXE+11, RXE+12, RXE+13, RXE+30!*
    MMZZT RXE+7~*, RXE+8, RXE+9, RXE+10, RXE+11, RXE+12, RXE+13, RXE+14*, RXE+15
    MSG EN+1~, SEND
    MSG( RXE+35*, RXE+36*, RXE+39*, RXE+40*, RXE+43*, RXE+45*, SEG+1*
    MSG(1 INIT+1*
    NAME EN+1~, PID+1*, PID+4
    NULLFLDS EN+1~, SKIP+3*, PID, PV1+1, RXO+1, RXE+2, RXR+2, ZRX+2
    PLIM RXE+31~
    PODOSE EN+1~, RXE+23*, RXE+24
    PODOSENM EN+1~, RXE+23*, RXE+24
    POIPTR EN+1~, RXE+23*, RXE+24
    PPTR EN+1~, RXO+3*, RXO+4
    PRODUCT EN+1~, RXE+21*
    PSDIEN EN+1~, RXE+16*, RXE+17, RXE+30
    PSFLAG EN+1~, RXE+16*, RXE+17, RXE+19
    PSHORX EN+2~
    PSHRX EN+2~
    PSND1 EN+1~, RXE+16*, RXE+17, RXE+20, RXE+21
    PSND2 EN+1~, RXE+16*, RXE+17
    PSND3 EN+1~, RXE+16*, RXE+17, RXE+20, RXE+21
    PSNOO EN~, ZRX+6, NOO+1, NOO+2
    PSNOOTX EN+2~, NOO+1*, NOO+2*
    >> PSOCANRC ZRX+9
    PSOCDDUZ EN+2~, ZRX+9*, ZRX+10
    PSOCPS EN+2~
    PSODFN EN+1~
    >> PSODISPP ZRX+11
    PSODX DUR+1~*, DUR+2, DUR+3, DUR+4*, DUR+5, DUR+6
    PSODX1 DUR~, DUR+1
    PSODX2 DUR~, DUR+1
    PSODX4 DUR+1~, DUR+3*
    PSODX5 DUR+1~, DUR+3*, DUR+4
    PSODX6 DUR+1~, DUR+5*, DUR+6
    PSODX7 DUR+1~, DUR+6*, DUR+7
    >> PSOEDIT ZRX+7
    PSOHINST EN+1~, INIT*, INIT+1
    PSOHISSD EN+1~
    PSOHSTOP EN+1~, RXE+4*, RXE+6*, RXE+15
    PSOHSTRT EN+1~, RXE+4*, RXE+15
    >> PSOHUIOR ZRX+9
    PSOICD EN+2~
    >> PSOMSORR INIT+1
    PSOMZT RXE+7~, RXE+10*
    >> PSOOPT ZRX+7
    >> PSORDEDT ZRX+5
    >> PSOROPCH ZRX+9
    PSORTLP EN+1~, RXR+1*, RXR+4
    >> PSOSSMES SEND
    PSOXN RXE+20*!
    PSOZSTAT EN+2~, EN+5*, EN+6*
    PSROUTE EN+1~, RXR+4*, RXR+5
    PSRXIEN EN~, SKIP+1, SKIP+4, SKIP+5, SKIP+6, SKIP+7, NCM+1!, PID+1, PV1+4, RXO+3
    , RXE+4, RXE+6, RXE+7, RXE+8, RXE+9, RXE+11, RXE+12, RXE+13, RXE+16, RXE+23
    , RXE+25, RXE+26, RXE+27, RXE+28, RXE+29, RXE+33, RXE+34, RXE+35, RXE+36, RXE+37
    , RXE+38, RXE+39, RXE+40, RXE+42, RXE+43, RXE+44, RXE+45, RXR+1, RXR+4, ZRX+4
    , ZRX+8, ZRX+9, SEND, SEND+3
    PSSTAT EN~, EN+6, SKIP+1, SKIP+2*, SKIP+5, SKIP+7, SKIP+12, SEND+2
    PVAR RXE+31~
    PVAR1 RXE+31~
    RTNAME EN+1~, RXR+4*, RXR+5
    RXE2FLAG EN+1~, SKIP+9*, SKIP+13, RXE+1*
    RXE2ONLY EN+1~, SKIP+9*, SKIP+13*, RXE+2, RXE+18
    SEGMENT EN+1~, SEG*, SEG+1
    STAT EN~, EN+4, EN+5*, EN+6*, SKIP+1, SKIP+2*, SKIP+5, SKIP+6, SKIP+7, SKIP+10
    , SKIP+11, SKIP+12, RXE+6, ZRX+7, ZRX+11, SEND+1, SEND+2
    SUBCOUNT RXE+31~
    UNIT EN+1~, RXE+21*, RXE+22
    VADM PID+1!
    VADM(1 PID+1
    X RXE+4*, RXE+6*, RXE+7!
    ZPRE EN+2~, ZRX+4*
    ZRXFLAG EN+1~, SKIP+9*, SKIP+14, ZRX+1*

    Marked Items

    Name Field # of Occurrence
    $T(EN^PSOHDR SEND
    $T(^PSNAPIS RXE+20
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All