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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: APSPCTR

Package: IHS Changes To Pharmacy

Routine: APSPCTR


Information

APSPCTR ; IHS/DSD/ENM/BAO/DMH/CIA/PLS - CONTROLLED DRUG LIST BY DIV;10-Nov-2011 13:16;PLS

Source Information

Source file <APSPCTR.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
IHS Changes To Pharmacy 2 PRINT^APSPCTR1  ($$DIR,$$GETIEN,ASKDATES)^APSPUTIL  
Kernel 2 $$FMTE^XLFDT  $$UP^XLFSTR  
IHS VA Utilities 1 ^XBDBQUE  
VA Fileman 1 $$GET1^DIQ  

Entry Points

Name Comments DBIA/ICR reference
DCVRY(DCLS,RX) ;EP
EN ;EP
DIVVRY(RX,DIV,TYP,SIEN) ;EP
FIND(SDT,EDT,XREF,DCLS) ;EP
CHKSTAT(RX) ; EP
DSPRDT(RX,TYP,SIEN) ;EP
CVTDCLS(DCLS) ; EP
DEV ;
SET(FDT,RX,XREF,SIEN) ;EP
OUT ;EP

External References

Name Field # of Occurrence
PRINT^APSPCTR1 OUT+5
$$DIR^APSPUTIL EN+12, EN+19, EN+22
$$GETIEN^APSPUTIL EN+17
ASKDATES^APSPUTIL EN+6
$$GET1^DIQ FIND+11, CHKSTAT+6, SET+11, SET+17, SET+18, SET+19, SET+20, SET+21, SET+22, SET+23
, SET+25
^XBDBQUE DEV+4
$$FMTE^XLFDT EN+8, EN+9
$$UP^XLFSTR SET+29

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!,"Pharmacy Controlled Drug List by Division"
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !,*7,?10,"132 Character Format!",!
  • Line Location: EN+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^OR(100 - [#100] GET1^DIQ
^DPT - [#2] GET1^DIQ
^VA(200 - [#200] GET1^DIQ
^PSRX - [#52] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSDRUG - [#50] DCVRY+4, DCVRY+5, SET+12, SET+13
^PSRX - [#52] FIND+3, FIND+5, FIND+8, FIND+10, CHKSTAT+2, DCVRY+2, DCVRY+3, DIVVRY+2, DSPRDT+1, SET+6
, SET+7, SET+8
^TMP($J OUT+2!, OUT+6!, SET+4, SET+28*, SET+30*, SET+31*, SET+32*

Label References

Name Line Occurrences
$$CHKSTAT FIND+6
$$CVTDCLS SET+14
$$DCVRY FIND+9
$$DIVVRY FIND+12
$$DSPRDT FIND+13
DEV EN+25
FIND OUT+3, OUT+4
SET FIND+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT EN+3~
%ZIS EN+3~
A0 FIND+1~
ACTIEN FIND+1~
APSP EN+1~
APSPANS EN+1~
APSPAT EN+1~
APSPATN EN+1~
APSPBD EN+1~, EN+2~, EN+6, EN+8, EN+10*, OUT+3, OUT+4
APSPBDF EN+3~, EN+8*
APSPC9 EN+3~
APSPCHN EN+1~
APSPCLER EN+2~
APSPD EN+1~
>> APSPDCLS EN+22*, OUT+3, OUT+4, FIND+9
>> APSPDCT( DCVRY+6
>> APSPDCT(1 EN+23*
>> APSPDCT(2 EN+23*
>> APSPDCT(3 EN+23*
>> APSPDCTN(1 EN+24*
>> APSPDCTN(2 EN+24*
>> APSPDCTN(3 EN+24*
APSPDES EN+1~
APSPDIV EN+2~, EN+12*, EN+14, EN+15*, EN+17*, FIND+12
APSPDR EN+1~
APSPDRUG EN+2~
APSPDTDR EN+1~, EN+19*
APSPDV EN+2~
APSPED EN+1~, EN+2~, EN+6, EN+9, EN+10*, OUT+3, OUT+4
APSPEDF EN+3~, EN+9*
APSPGO EN+2~
APSPGT EN+3~
APSPITM EN+2~
APSPMD EN+2~
APSPMSG EN+2~
APSPN EN+1~
APSPOP EN+2~
APSPQ EN+3~, EN+6, EN+7, EN+12, EN+13, EN+16, EN+17, EN+18, EN+19, EN+20
, EN+21, EN+22
APSPQTY EN+2~
APSPRN EN+2~
APSPRX EN+1~
APSPRXN EN+2~
APSPSH EN+1~
APSPT EN+3~
APSPX EN+1~
APSPZZ EN+2~
CLERK SET+2~, SET+23*, SET+28
DAYS SET+2~, SET+20*, SET+28
DCLS FIND~, DCVRY~, DCVRY+6, SET+1~, SET+13*, SET+14, SET+30, SET+31, CVTDCLS~, CVTDCLS+1
, CVTDCLS+2, CVTDCLS+3, CVTDCLS+4
DCLSVAL DCVRY+1~, DCVRY+5*, DCVRY+6
DFN SET+2~, SET+10*, SET+11
DIC EN+1~
DIV DIVVRY~, DIVVRY+1, DIVVRY+2, SET+1~, SET+17*, SET+28, SET+30, SET+31
DRGIEN DCVRY+1~, DCVRY+3*, DCVRY+4, DCVRY+5
>> DRGNM SET+12*, SET+28, SET+29*, SET+30, SET+31
DRUG SET+1~, SET+9*, SET+12, SET+13, SET+28
DT EN+6
EDCLS SET+2~, SET+14*, SET+28
EDT FIND~, FIND+3
FDT SET~, SET+28, SET+30, SET+31
FDTLP FIND+1~, FIND+2*, FIND+3*, FIND+5, FIND+10, FIND+14
FILLDT FIND+1~
FTYPE SET+1~, SET+3*, SET+17, SET+19, SET+20, SET+21, SET+23, SET+25, SET+28, SET+32
IEN FIND+1~, FIND+10*, FIND+11, FIND+12, FIND+13, FIND+14
IO OUT+1
IOF EN+4
LSTDSPDT SET+1~, SET+15*
NODE0 SET+1~, SET+6*, SET+9, SET+10, SET+28
NODE2 SET+1~, SET+7*
NODE3 SET+1~, SET+8*, SET+15
NXT SET+2~, SET+4*, SET+5*, SET+28, SET+30, SET+31, SET+32
OPRV SET+2~, SET+21*, SET+22, SET+28
OPRVNM SET+2~, SET+22*, SET+24*
PHRM SET+2~, SET+25*, SET+28
PNM SET+2~, SET+11*
POP EN+3~
QTY SET+2~, SET+19*, SET+28
RDT SET+1~, SET+18*
RIFLG SET+1~, SET+16*, SET+28
RTSDATE SET+1~
RTSDT FIND+1~
RX CHKSTAT~, CHKSTAT+2, CHKSTAT+6, DCVRY~, DCVRY+3, DIVVRY~, DIVVRY+2, DSPRDT~, DSPRDT+1, SET~
, SET+6, SET+7, SET+8, SET+17, SET+18, SET+19, SET+20, SET+21, SET+23, SET+25
, SET+32
RXIEN FIND+1~, FIND+4*, FIND+5*, FIND+6, FIND+8, FIND+9, FIND+10, FIND+11, FIND+12, FIND+13
, FIND+14, DCVRY+2, SET+28
RXRTSDT DCVRY+1~, DCVRY+2*
SDT FIND~, FIND+2
SIEN DIVVRY~, DIVVRY+2, DSPRDT~, DSPRDT+1, SET~, SET+3, SET+17, SET+19, SET+20, SET+21
, SET+23, SET+25, SET+28, SET+32
STA CHKSTAT+1~, CHKSTAT+2*, CHKSTAT+3, CHKSTAT+6
TYP DIVVRY~, DIVVRY+2, DSPRDT~, DSPRDT+1
U FIND+8, CHKSTAT+2, DCVRY+2, DCVRY+3, DCVRY+5, DIVVRY+2, DSPRDT+1, SET+9, SET+10, SET+12
, SET+13, SET+28
XBNS DEV+1~, DEV+3*
XBRP DEV+1~, DEV+2*
XREF FIND~, FIND+3, FIND+5, FIND+10, FIND+12, FIND+13, FIND+14, SET~, SET+3, SET+28
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All