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

Package: IHS Changes To Pharmacy

Routine: APSPSLBL


Information

APSPSLBL ;IHS/DSD/JCM/ENM - IHS SUMMARY LABEL;17-Jan-2006 09:36;SM

Source Information

Source file <APSPSLBL.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Outpatient Pharmacy 2 ^PSOLSET  PROFILE^PSORX1  
IHS Changes To Pharmacy 1 (EN,PAT)^APSPNUM  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Changes To Pharmacy 1 APSPNE4  

Entry Points

Name Comments DBIA/ICR reference
FEED
BEGIN ;
ESET ;
EOJ ;
PARM ;EP
EP2 ;EP
DEV ;
EP1 ;INITIALIZE
ZZL ;LABEL INFORMATION
EXIT
EPP ;
LABEL ;
EMSG ;IHS/DSD/ENM 01/29/97
EP ;IHS/DSD/ENM 11/09/94 ENTRY POINT FOR SUM OPT

External References

Name Field # of Occurrence
^%ZIS DEV+2, EP2+19
^%ZISC DEV+6, EOJ+2
^%ZTLOAD DEV+11
EN^APSPNUM EPP+3
PAT^APSPNUM EP+9
^PSOLSET EP+6
PROFILE^PSORX1 EPP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @($P(^%ZIS(2,IOST(0),12.1),U,1))
  • Line Location: EP2+21
Function Call: WRITE
  • Prompt: !
  • Line Location: BEGIN+1
Function Call: WRITE
  • Prompt: !,?(PSZCTAB),$P(ARRAY(N),"^",1)_" : "_APSHRN_" "
  • Line Location: BEGIN+4
Function Call: WRITE
  • Prompt: ?(PSZCTAB+PSZCW-9),+$E(APSPEDT,4,5),"-",$E(APSPEDT,6,7),"-",$E(APSPEDT,2,3)
  • Line Location: BEGIN+5
Function Call: WRITE
  • Prompt: ?(PSZCTAB+PSZCW-9),+$E(FDT,4,5),"-",$E(FDT,6,7),"-",$E(FDT,2,3)
  • Line Location: BEGIN+6
Function Call: WRITE
  • Prompt: !
  • Line Location: ZZL+3
Function Call: WRITE
  • Prompt: !
  • Line Location: FEED+0
Function Call: WRITE
  • Prompt: @($P(^%ZIS(2,IOST(0),6),U,1))
  • Line Location: EOJ+1
Function Call: WRITE
  • Prompt: !,?(PSZCTAB),DRUG," ",SIG,?(PSZCTAB+PSZCW-$L(QTY)),QTY
  • Line Location: LABEL+12
Function Call: WRITE
  • Prompt: !
  • Line Location: LABEL+15
Function Call: WRITE
  • Prompt: !,?(PSZCTAB),DRUG," ",$E(SIG,1,E)
  • Line Location: LABEL+19
Function Call: WRITE
  • Prompt: "-"
  • Line Location: LABEL+21
Function Call: WRITE
  • Prompt: !,?(PSZCTAB),$E(SIG,E+1,99)
  • Line Location: LABEL+23
Function Call: WRITE
  • Prompt: ?(PSZCTAB+PSZCW-$L(QTY)),QTY
  • Line Location: LABEL+24
Function Call: WRITE
  • Prompt: !,"No Rx's found for this date....!"
  • Line Location: EMSG+1
Routine Call
  • %ZIS
  • Line Location:
    • DEV+2
    • EP2+19

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(2 - [#3.2] EP2+21, EOJ+1
^APSPCTRL - [#9009033] EP2+7, EP2+12, EP2+13, PARM+3
^AUPNPAT - [#9000001] ESET+8
^DPT - [#2] ESET+8
^PS(59 - [#59] ESET+7
^PSDRUG - [#50] ESET+8
^PSRX - [#52] ESET+1, ESET+5

Label References

Name Line Occurrences
BEGIN EP2+27, ZZL+4
DEV DEV+4
EMSG EPP+4
EOJ EPP+4, DEV+3, EP1+4, EP2+29
EP EPP+5
EP1 DEV+13
EP2 EP1+4
ESET EP1+3
FEED EP2+28
LABEL ZZL+1
PARM EP+8, EP2+4
ZZL BEGIN+5

Naked Globals

Name Field # of Occurrence
^(0 ESET+7, ESET+8, PARM+3
^(12.1 EP2+21
^(6 EP2+21, EOJ+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS DEV+1*
>> %ZIS("A" DEV+2*
AAPSITE EP2+1~, EP2+7*, EP2+8
APSHRN EP+5~, ESET+8*, ESET+9, BEGIN+4
>> APSNBR ESET+7*, ESET+8
APSP EP1+2~, ESET+1*, EP2+3~
APSPD EP1+2~, ESET+1*, ESET+8, EP2+3~
APSPEDT EP+2~, EP+7*, BEGIN+5
APSPF EP1+2~, ESET+1*, ESET+9
APSPFLG EP+1~
APSPID EP+3~, EP+5~, EPP+2*, BEGIN+5
APSPN EP1+2~, ESET+1*, ESET+8
APSPQ EP1+2~, ESET+1*, ESET+9
APSPQFLG EP+2~, EP+7*
>> APSPRX EP1+3*, ESET+1, ESET+5, ESET+9
APSPS EP1+2~, ESET+1*, ESET+5*, ESET+9
APSPZ EP1+2~, EP1+3*
APSPZDT EP+5~
APSPZZN EP+1~, EP2+5
>> APSXPS ESET+7*
ARRAY EP+1~
ARRAY( ESET+9*, EP2+6, BEGIN+4, ZZL+4, LABEL+1, LABEL+3, LABEL+7, LABEL+9
AUPDAYS EP+2~
AUPNDOB EP+2~
AUPNDOD EP+2~
AUPNPAT EP+2~
AUPNSEX EP+2~
>> C EP2+6*, EP2+27*, ZZL+1*, ZZL+3, ZZL+4*, LABEL+15, LABEL+27*
>> DRUG LABEL+3*, LABEL+5, LABEL+12, LABEL+19
E EP2+2~, LABEL+5*, LABEL+9, LABEL+19, LABEL+21, LABEL+23
FDT EP2+2~, EP2+6*, BEGIN+6
>> G DEV+9*
>> I BEGIN+1*, ZZL+3*, FEED*
IO DEV+4, EP2+19, EOJ+3
IO("Q" DEV+4, DEV+6!, DEV+7
IO(0 DEV+4
ION DEV+8
>> IOP DEV+2*, EP2+19*
IOST EP2+21, EOJ+1
IOST(0 EP2+21, EOJ+1
L EP2+2~, FEED*
LENGTH EP2+2~, LABEL+1*, LABEL+12
N EP1+2~, EP1+3*, ESET+9, EP2+5*, EP2+6, EP2+27, BEGIN+4, ZZL+1*, ZZL+4, LABEL+1
, LABEL+3, LABEL+7, LABEL+9, LABEL+15*
NUM EP2+2~, EP2+6*, EP2+27*, ZZL+1, ZZL+4*
>> PNM ESET+8*, ESET+9
>> POP DEV+3
PSODFN EP+1~, EP+2~, EP+10
>> PSOFROM EP2+29
>> PSOLAP DEV+2, EP2+19
PSOLIST EP+3~
PSOLIST(1 EP1+1, EP1+3
PSONUM EP+3~, EPP+3*
PSOOPT EP+3~, EPP+3*
>> PSOPAR EP+6
PSOSD EP+3~
>> PSOSITE ESET+7, EP2+7, EP2+12, EP2+13, PARM+3
PSOZSLBL EP2+2~
PSOZSLBL("COPIES" EP2+8*, EP2+26
PSOZSLBL("I" EP2+26*
PSZB EP+1~, EP+3~, EP2+1~, BEGIN+1, FEED, PARM+3*
PSZCTAB EP2+1~, EP2+2~, EP2+13*, BEGIN+4, BEGIN+5, BEGIN+6, LABEL+12, LABEL+19, LABEL+23, LABEL+24
PSZCW EP2+1~, EP2+12*, EP2+14*, BEGIN+5, BEGIN+6, LABEL+3, LABEL+5, LABEL+9, LABEL+12, LABEL+24
PSZDRUG EP+3~, ESET+8*, ESET+9
PSZE EP+1~, EP+3~, EP2+1~, EP2+3~, ZZL+3, FEED, PARM+3*
PSZK EP+1~, EP2+1~, FEED, PARM+3*
PSZL EP+1~, EP2+1~, EP2+10, FEED, PARM+3*
PSZTAB EP+1~, EP2+1~, PARM+3*
PSZW EP+1~, ESET+9, EP2+1~, EP2+14, PARM+3*
PSZZL EP2+2~, EP2+10*, ZZL+1, ZZL+3, LABEL+15
PZX EP2+1~, EP2+6*, EP2+27*, ZZL+1
QTY EP2+2~, LABEL+7*, LABEL+9, LABEL+12, LABEL+24
SIG EP2+2~, LABEL+9*, LABEL+12, LABEL+19, LABEL+21, LABEL+23
U ESET+1, ESET+8, EP2+21, EOJ+1, PARM+3
>> X PARM+3*
Y EP+5~, EPP+5
Y(1 EPP+4
>> ZTDESC DEV+10*
>> ZTIO DEV+8*
>> ZTRTN DEV+8*
>> ZTSAVE( DEV+9*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All