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

Package: Outpatient Pharmacy

Routine: PSOCPBAK


Information

PSOCPBAK ;BIR/EJW-Tally unbilled NON-SERVICE CONNECTED copays ;03/28/03

Source Information

Source file <PSOCPBAK.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 3 ^%ZTLOAD  ($$DT,$$FMDIFF,$$FMTE)^XLFDT  (BMES,MES)^XPDUTL  
Integrated Billing 2 XTYPE^IBARX  $$RXST^IBARXEU  
VA Fileman 2 (,DD)^%DT  (C,NOW)^%DTC  
MailMan 1 ^XMD  
Outpatient Pharmacy 1 TALLY^PSOCPBA2  
Registration 1 DEM^VADPT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Outpatient Pharmacy 1 PSOCPIB3  

Entry Points

Name Comments DBIA/ICR reference
MAIL2 ;
EN ;
XTYPE ;
CHKLOG ;
ASK
MAIL ;
TOTAL ;
GETDATE ; GET DATE/TIME OF WHEN BACKGROUND JOB SHOULD BE RUN

External References

Name Field # of Occurrence
^%DT GETDATE+8
DD^%DT EN+4, MAIL+1, GETDATE+3, GETDATE+11
C^%DTC EN+7
NOW^%DTC EN+4, MAIL+1, MAIL2+2, GETDATE+3, GETDATE+7
^%ZTLOAD PSOCPBAK+15
XTYPE^IBARX XTYPE+6
$$RXST^IBARXEU EN+22
TALLY^PSOCPBA2 EN+25
DEM^VADPT XTYPE+2
$$DT^XLFDT EN+6
$$FMDIFF^XLFDT MAIL2+2
$$FMTE^XLFDT EN+5
^XMD MAIL+20, MAIL2+12
BMES^XPDUTL PSOCPBAK+7, PSOCPBAK+10, PSOCPBAK+11, PSOCPBAK+14, GETDATE+4, GETDATE+6, ASK
MES^XPDUTL PSOCPBAK+12, GETDATE+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: GETDATE+7
Function Call: WRITE
  • Prompt: "Task will be queued to run NOW"
  • Line Location: GETDATE+8
Function Call: READ
  • Timeout: 300
  • Variable: XX
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: " Enter Y or N"
  • Line Location: ASK+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DILOCKTM" PSOCPBAK+6, EN+1
^DIC(4 - [#4] MAIL2+3
^DPT - [#2] EN+10
^PS(59 - [#59] XTYPE+4
^PSRX - [#52] EN+10, EN+17, EN+18, EN+19, EN+20, EN+21, CHKLOG+2
^PSRX("AL" EN+9, EN+16
^XMB(1 - [#4.3] MAIL2+3
^XTMP("PSOCPBAK" PSOCPBAK+6, PSOCPBAK+8, EN+1, EN+7*, EN+11, EN+12, EN+15*, EN+23*, EN+24*, EN+29
, TOTAL+5, TOTAL+7
^XUSEC("PSO COPAY" MAIL+4

Label References

Name Line Occurrences
ASK ASK+1
CHKLOG EN+13
GETDATE PSOCPBAK+13, ASK+2
MAIL EN+27
MAIL2 EN+28
TOTAL EN+26
XTYPE EN+15

Naked Globals

Name Field # of Occurrence
^( XTYPE+4
^("IB" XTYPE+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN+4, EN+5, MAIL+1, MAIL2+2, GETDATE+3, GETDATE+7
%DT GETDATE+7!*, GETDATE+8!
%DT("A" GETDATE+7*
%DT(0 GETDATE+7*
>> BADDT EN+12*, EN+13, EN+14, EN+23, CHKLOG+1*, CHKLOG+2*
COUNT TOTAL+1~, TOTAL+7*
COUNTED TOTAL+1~, TOTAL+6*, TOTAL+7*
COUNTS MAIL2+1~, MAIL2+5*, MAIL2+6*, MAIL2+11
DFN XTYPE+1~, XTYPE+2*
DIFROM MAIL+20~, MAIL2+12~
DT EN+6*, EN+7
>> DTOUT GETDATE+8
DUZ MAIL+2, MAIL2+7
I MAIL2+1~, MAIL2+6*, XTYPE+1~, XTYPE+8*, TOTAL+3~, TOTAL+4*, TOTAL+7*, TOTAL+8*
J MAIL2+6*, XTYPE+1~, XTYPE+4*, XTYPE+8*, TOTAL+3~, TOTAL+7*
>> NOW GETDATE+2*, GETDATE+8*, GETDATE+9, ASK
PSOCNT EN+2~, EN+3*, MAIL+8, MAIL+9, MAIL+19, MAIL2+11, TOTAL+8*
PSOCNT( MAIL2+6, TOTAL+7*
PSOCNT("YR2002" MAIL+12, MAIL+13, MAIL+14, TOTAL+4*, TOTAL+8
PSOCNT("YR2003" MAIL+16, MAIL+17, MAIL+18, TOTAL+4*, TOTAL+8
>> PSOCXPDA MAIL+4*
>> PSODFN EN+10*, EN+11, EN+12, EN+15, EN+22, EN+23, EN+24, XTYPE+2, XTYPE+6, TOTAL+5*
, TOTAL+7
PSODT EN+2~, EN+8*, EN+9*, EN+14, EN+16
PSOEND EN+2~, MAIL+1*, MAIL+7
>> PSOINST MAIL2+3*, MAIL2+10
>> PSOLOG CHKLOG+2*
>> PSOREL EN+17*, EN+22, EN+24
>> PSOS1 EN+4*, MAIL2+2
>> PSOSCMX EN+15, XTYPE+2*, XTYPE+3*, XTYPE+8*, XTYPE+9, XTYPE+10
>> PSOSQ CHKLOG+2*
PSOSTART EN+2~, EN+4*, MAIL+7
>> PSOSTRT2 EN+5*, MAIL2+11
PSOTEXT EN+2~, MAIL2+4!
PSOTEXT(1 MAIL+6*, MAIL2+11*
PSOTEXT(10 MAIL+15*
PSOTEXT(11 MAIL+16*
PSOTEXT(12 MAIL+17*
PSOTEXT(13 MAIL+18*
PSOTEXT(2 MAIL+7*
PSOTEXT(3 MAIL+8*, MAIL+19*
PSOTEXT(4 MAIL+9*
PSOTEXT(5 MAIL+10*
PSOTEXT(6 MAIL+11*
PSOTEXT(7 MAIL+12*
PSOTEXT(8 MAIL+13*
PSOTEXT(9 MAIL+14*
>> PSOTIME MAIL2+2*, MAIL2+11
PSOVETS EN+2~, MAIL+9, MAIL2+11, TOTAL+2*, TOTAL+7*
>> PSOXIN EN+22*
RXP EN+2~, EN+9*, EN+10, EN+12, EN+16, EN+17, EN+18, EN+19, EN+20, EN+21
, EN+23, EN+24, CHKLOG+2
>> SAVEY GETDATE+10*, GETDATE+13
SAVY XTYPE+1~, XTYPE+3*, XTYPE+8*, XTYPE+9
>> TODAY GETDATE+3*
>> VADM(6 XTYPE+2
X EN+7, GETDATE+12*, ASK, XTYPE+1~, XTYPE+3*, XTYPE+4*, XTYPE+5, XTYPE+6*
>> X1 EN+7*
>> X2 EN+7*
XMDUZ MAIL+3*, MAIL+20!, MAIL2+10*, MAIL2+12!
XMSUB MAIL+3*, MAIL+20!, MAIL2+10*, MAIL2+12!
XMTEXT MAIL+20*!, MAIL2+12*!
>> XMY( MAIL+2*, MAIL+4*, MAIL2+7!
>> XMY("" MAIL+5
>> XMY("CARROLL.DAN@FORUM.VA.GOV" MAIL2+9*
>> XMY("WHITE.ELAINE@FORUM.VA.GOV" MAIL2+8*
>> XX ASK+1*, ASK+2
Y EN+4*, MAIL+1*, GETDATE+3*, GETDATE+8, GETDATE+9, GETDATE+10, GETDATE+12, GETDATE+13*, ASK+3, XTYPE+1~
, XTYPE+7
Y( XTYPE+8
YY EN+2~, EN+16*, EN+17, EN+18, EN+19, EN+20, EN+21, EN+24
ZTDESC PSOCPBAK+15*!
ZTDTH PSOCPBAK+4*, PSOCPBAK+5*, PSOCPBAK+7, PSOCPBAK+9, PSOCPBAK+15!, GETDATE+1*, GETDATE+8*, ASK+3*, ASK+4*
ZTIO PSOCPBAK+15*!
>> ZTQUEUED PSOCPBAK+5, PSOCPBAK+16, EN+1, EN+30
>> ZTREQ EN+1*, EN+30*
ZTRTN PSOCPBAK+15*!
>> ZTSK PSOCPBAK+16
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All