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

Package: Outpatient Pharmacy

Routine: PSO283P1


Information

PSO283P1 ;BIR/MFR-EXPIRATION DATE PROBLEM TALLY (Cont.) ;05/03/07

Source Information

Source file <PSO283P1.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 3 ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  (BMES,MES)^XPDUTL  
VA Fileman 3 C^%DTC  ($$GET1,GETS)^DIQ  ^DIR  
MailMan 1 ^XMD  
Registration 1 $$SITE^VASITE  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Outpatient Pharmacy 1 PSO283PI  

Entry Points

Name Comments DBIA/ICR reference
LOG(COMMENT) ; Running Log
CALCEXP ; CALCULATE THE EXPIRATION DATE
TOT(FLD) ; returns the field to be displayed
JOBSTS() ; Returns the current job status
JOB(ZTDTH) ; Queue the job to run
MAIL ;
SETLN(TEXT) ; Add a new line to the mailman message text
DISPLAY ; Displays the current results
SETTXT ; Set the PSOTXT array with the Mailman message or screen display

External References

Name Field # of Occurrence
C^%DTC CALCEXP+9
^%ZTLOAD JOB+6
$$GET1^DIQ SETTXT+60
GETS^DIQ CALCEXP+2
^DIR DISPLAY+6
$$SITE^VASITE DISPLAY+2
$$FMTE^XLFDT SETTXT+7, SETTXT+9, SETTXT+59
$$NOW^XLFDT LOG+3
^XMD MAIL+14
BMES^XPDUTL JOB+10
MES^XPDUTL JOB+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPLAY+3
Function Call: WRITE
  • Prompt: !,PSOTX(J)
  • Line Location: DISPLAY+5
Routine Call
  • DIR
  • Line Location:
    • DISPLAY+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^PSDRUG - [#50] GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XTMP( SETTXT+7, SETTXT+9, SETTXT+10, SETTXT+45, SETTXT+49, SETTXT+50, SETTXT+56, SETTXT+57, SETTXT+58, TOT+1
, JOB+4, JOBSTS+1, JOBSTS+2, JOBSTS+3, JOBSTS+4, LOG+2, LOG+3*

Label References

Name Line Occurrences
$$JOBSTS SETTXT+5
$$TOT SETTXT+17, SETTXT+18, SETTXT+19, SETTXT+20, SETTXT+24, SETTXT+25, SETTXT+26, SETTXT+30, SETTXT+31, SETTXT+32
, SETTXT+36, SETTXT+40, SETTXT+42
LOG JOB+8
SETLN SETTXT+3, SETTXT+4, SETTXT+11, SETTXT+12, SETTXT+13, SETTXT+14, SETTXT+15, SETTXT+16, SETTXT+17, SETTXT+18
, SETTXT+19, SETTXT+20, SETTXT+21, SETTXT+22, SETTXT+23, SETTXT+24, SETTXT+25, SETTXT+26, SETTXT+27, SETTXT+28
, SETTXT+29, SETTXT+30, SETTXT+31, SETTXT+32, SETTXT+33, SETTXT+34, SETTXT+35, SETTXT+36, SETTXT+37, SETTXT+38
, SETTXT+39, SETTXT+40, SETTXT+41, SETTXT+42, SETTXT+43, SETTXT+44, SETTXT+46, SETTXT+47, SETTXT+48, SETTXT+50
, SETTXT+51, SETTXT+52, SETTXT+53, SETTXT+54, SETTXT+55, SETTXT+56, SETTXT+61, SETTXT+62
SETTXT MAIL+12, DISPLAY+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT CALCEXP+1~
COMMENT LOG~, LOG+3
DA CALCEXP+1~
>> DAYSSUP CALCEXP+4, CALCEXP+8
DIFROM MAIL+1~
DIR DISPLAY+1~, DISPLAY+6!
DIR("A" DISPLAY+6*
DIR(0 DISPLAY+6*
>> DRUG CALCEXP+2, CALCEXP+3
DUZ MAIL+2, JOB+5, LOG+3
EXCEL SETTXT+1~, SETTXT+45*, SETTXT+46, SETTXT+49*, SETTXT+50
>> EXPIRDT CALCEXP+9*
FLD TOT~, TOT+1
>> ISSUEDT CALCEXP+4
J DISPLAY+1~, DISPLAY+4*, DISPLAY+5, DISPLAY+6, SETTXT+1~, SETTXT+45*, SETTXT+49*, SETTXT+57*, SETTXT+58, SETTXT+59
JOBSTS SETTXT+1~, SETTXT+5*, SETTXT+6, SETTXT+7, SETTXT+8, SETTXT+9
LINE SETTXT+1~, SETTXT+2*, SETLN+1*
LOGCNT LOG+1~, LOG+2*, LOG+3
LOGLN SETTXT+1~, SETTXT+59*, SETTXT+60*, SETTXT+61
NMSP SETTXT+1~, SETTXT+2*, SETTXT+7, SETTXT+9, SETTXT+10, SETTXT+45, SETTXT+49, SETTXT+50, SETTXT+56, SETTXT+57
, SETTXT+58, TOT+1, JOB+4, JOBSTS+1, JOBSTS+2, JOBSTS+3, JOBSTS+4, LOG+2, LOG+3
>> NUMREFS CALCEXP+4
PSDEA CALCEXP+1~, CALCEXP+3*, CALCEXP+6
PSOARR CALCEXP+1~, CALCEXP+2!
PSOARR(50 CALCEXP+3
PSOCS CALCEXP+1~, CALCEXP+5*, CALCEXP+6, CALCEXP+7*, CALCEXP+8
PSODUZ MAIL+2, JOB+1~, JOB+5*, LOG+3
PSOINST DISPLAY+1~, DISPLAY+2*, SETTXT+13, SETTXT+45, SETTXT+49
PSOTX MAIL+1~, DISPLAY+1~
PSOTX( DISPLAY+4, DISPLAY+5, SETLN+1*
QQ CALCEXP+1~, CALCEXP+6*
STS SETTXT+1~, SETTXT+6*, SETTXT+7*, SETTXT+8*, SETTXT+9*, SETTXT+10*, SETTXT+11
TEXT SETLN~, SETLN+1
X CALCEXP+1~, CALCEXP+9
X1 CALCEXP+1~, CALCEXP+4*
X2 CALCEXP+1~, CALCEXP+4*, CALCEXP+8*
XMDUZ MAIL+1~, MAIL+3*
XMSUB MAIL+1~, MAIL+4*
XMTEXT MAIL+1~, MAIL+14*
XMY MAIL+1~
XMY( MAIL+2*
XMY("ANWER.MOHAMED@FORUM.VA.GOV" MAIL+6*
XMY("BARRON.LUANNE@FORUM.VA.GOV" MAIL+10*
XMY("JONES.TRES@FORUM.VA.GOV" MAIL+11*
XMY("ROCHA.MARCELO@FORUM.VA.GOV" MAIL+9*
XMY("RUZBACKI.RON@FORUM.VA.GOV" MAIL+5*
XMY("WILLETTE.CANDY@FORUM.VA.GOV" MAIL+8*
XMY("WILLIAMSON.ERIC@FORUM.VA.GOV" MAIL+7*
XPDQUES JOB+12!
Z SETTXT+1~, SETTXT+58*, SETTXT+59, SETTXT+60
ZTDESC JOB+1~, JOB+3*
ZTDTH JOB~
ZTIO JOB+1~, JOB+2*
ZTRTN JOB+1~, JOB+2*
ZTSAVE JOB+1~
ZTSAVE("PSODUZ" JOB+5*
ZTSK JOB+1~, JOB+7, JOB+9
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