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 |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ASUCOSTS

Package: Supply

Routine: ASUCOSTS


Information

ASUCOSTS ; IHS/ITSC/LMH -CLOSEOUT STATUS FUNCTIONS ; [ 07/26/2000 9:00 AM ]

Source Information

Source file <ASUCOSTS.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
IHS VA Utilities 1 ^XBKVAR  
Kernel 1 HOME^%ZIS  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 16

Package Total Caller Graph
Supply 16 ASU179STAS  ASUCODAY  ASUCOHKP  ASUCOKIL  ASUCOMOR  ASUCOMTH  ASUCORPX  ASUCORUN  
ASUCOUTP  ASUCOYER  ASUMKBPS  ASURDINV  ASURDPRT  ASURMSTD  ASURQSTD  ASUW2SAM  

Entry Points

Name Comments DBIA/ICR reference
SETSX ;EP ;RPTXTR
SETSY ;EP ;YR
CKM ;;
SETSP ;EP ;UPDT
SETSS ;EP ;STNDRD
SETSM ;EP ;MTHLY
SETSI ;EP ;INV
CKS ;;
CKY ;;
CKX ;;
HELP ;;0;but NO FURTHUR HELP IS AVAILABLE.
SETSTA ;EP ;STAT
SETSTAT ;EP ;
SETCTRL ;EP ;
RPTS ;
SETST ;EP ;TRNS
EN2 ;EP ;
SETS ;EP ;
GETSTAT ;EP ;
SETTY ;EP ;TYP
PAUSE ;
SETLD ;EP ;LAST UPDATE
CKI ;;
SETLM ;EP ;LAST MTH
SETLY ;EP ; LAST YR

External References

Name Field # of Occurrence
HOME^%ZIS ASUCOSTS+5
^DIR PAUSE+1
^XBKVAR ASUCOSTS+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,?25,"R U N S T A T U S R E P O R T I N G",!!
  • Line Location: ASUCOSTS+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ASUCOSTS+6
Function Call: WRITE
  • Prompt: !!,"The status of the last closeout which was a '",ASUP("LSTN"),"' was : "
  • Line Location: EN2+6
Function Call: WRITE
  • Prompt: $P($T(HELP),";",4)
  • Line Location: EN2+12
Function Call: WRITE
  • Prompt: $P($T(HELP),";",4)
  • Line Location: EN2+13
Function Call: WRITE
  • Prompt: !!,"If the problem causing processing to end has been addressed,"
  • Line Location: EN2+39
Function Call: WRITE
  • Prompt: !,"the UPDATE RESTART option will start at that point and continue."
  • Line Location: EN2+40
Function Call: WRITE
  • Prompt: !!
  • Line Location: PAUSE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: RPTS+1
Function Call: WRITE
  • Prompt: !?5,"Invoice Reports Printed"
  • Line Location: RPTS+3
Function Call: WRITE
  • Prompt: !?5,"Invoice Reports Did NOT Print"
  • Line Location: RPTS+5
Function Call: WRITE
  • Prompt: !?5,"Standard Reports Printed"
  • Line Location: RPTS+7
Function Call: WRITE
  • Prompt: !?5,"Standard Reports Did NOT Print"
  • Line Location: RPTS+9
Routine Call
  • %ZIS
  • Line Location:
    • ASUCOSTS+5
Routine Call
  • DIR
  • Line Location:
    • PAUSE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ASUSITE(1 SETCTRL+3, SETCTRL+5, SETCTRL+7, SETCTRL+8, SETCTRL+10, SETCTRL+11, GETSTAT+2, GETSTAT+4, SETSP+1*, SETST+1*
, SETSS+1*, SETSI+1*, SETSM+1*, SETSX+1*, SETSY+1*, SETTY+1*, SETS+2*, SETSTA+1*, SETLD+1*, SETLM+1*
, SETLY+1*, SETSTAT+2*, SETSTAT+6*

Label References

Name Line Occurrences
EN2 ASUCOSTS+6
HELP EN2+12, EN2+13
PAUSE EN2+7
RPTS EN2+38
SETCTRL EN2+2
SETS SETSTAT+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ASUD("R13" SETCTRL+10*, SETCTRL+11*, SETCTRL+12!, SETCTRL+13!
>> ASUK("DT" SETCTRL+18, SETCTRL+29, SETSTAT+4
>> ASUK("IRPT" SETCTRL+26*, SETCTRL+27, SETCTRL+34*, SETCTRL+35
>> ASUK("SRPT" SETCTRL+15*, SETCTRL+16, SETCTRL+23*, SETCTRL+24
>> ASUL(2 SETCTRL+17, SETCTRL+28
>> ASUP EN2+11*, EN2+12, EN2+13, EN2+14, EN2+17, EN2+21, EN2+24, EN2+27, EN2+30
>> ASUP( EN2+13, EN2+17, SETCTRL+3*, SETCTRL+5*, GETSTAT+2*, GETSTAT+4*, SETS+2, SETSTAT+2, SETSTAT+6
>> ASUP("A13" SETCTRL+9, SETCTRL+12*, SETCTRL+13*
>> ASUP("AIV" SETCTRL+25
>> ASUP("ARMS" SETCTRL+8*
>> ASUP("AST" SETCTRL+14
>> ASUP("CKI" SETSI+1
>> ASUP("CKM" SETSM+1
>> ASUP("CKP" EN2+1, EN2+7, SETSP+1
>> ASUP("CKS" EN2+31, SETSS+1
>> ASUP("CKT" SETST+1
>> ASUP("CKX" SETSX+1
>> ASUP("CKY" EN2+7, SETSY+1
>> ASUP("HLT" SETCTRL+1*, SETSTAT+3
>> ASUP("IVD" SETCTRL+25, SETCTRL+26, SETCTRL+28*, SETCTRL+29*, SETCTRL+30*, SETCTRL+31, SETCTRL+32, SETCTRL+33, SETCTRL+35*
>> ASUP("IVR" RPTS+2, SETSI+1, SETTY+2*
>> ASUP("LOOP" SETCTRL+2*, SETCTRL+3, SETCTRL+4*, SETCTRL+5, GETSTAT+1*, GETSTAT+2, GETSTAT+3*, GETSTAT+4, SETS+1*, SETS+2
, SETSTAT+1*, SETSTAT+2, SETSTAT+5*, SETSTAT+6
>> ASUP("LSDT" SETLD+1, SETSTAT+4*
>> ASUP("LSMO" SETCTRL+6, SETLM+1
>> ASUP("LSTN" EN2+5*, EN2+6
>> ASUP("LSTY" EN2+4*, EN2+5
>> ASUP("LSYR" SETLY+1
>> ASUP("MOW" SETCTRL+8*
>> ASUP("NXMO" SETCTRL+8*
>> ASUP("OLIB" SETCTRL+8*
>> ASUP("STD" SETCTRL+14, SETCTRL+15, SETCTRL+17*, SETCTRL+18*, SETCTRL+19*, SETCTRL+20, SETCTRL+21, SETCTRL+22, SETCTRL+24*
>> ASUP("STR" RPTS+6, SETSS+1, SETTY+2*
>> ASUP("STS" SETTY+2*, SETSTA+1
>> ASUP("TYP" EN2+4, SETCTRL+17, SETTY+1
>> ASUP("UPLD" SETCTRL+7*
DIR PAUSE+1~
DIR(0 PAUSE+1*
IOF ASUCOSTS+5, ASUCOSTS+6
U SETCTRL+3, SETCTRL+5, SETCTRL+7, SETCTRL+8, SETCTRL+10, SETCTRL+11, GETSTAT+2, GETSTAT+4, SETSP+1, SETST+1
, SETSS+1, SETSI+1, SETSM+1, SETSX+1, SETSY+1, SETTY+1, SETS+2, SETSTA+1, SETLD+1, SETLM+1
, SETLY+1, SETSTAT+2, SETSTAT+6
>> X EN2+16*, EN2+18*, EN2+20*, EN2+23*, EN2+26*, EN2+29*, EN2+33*, EN2+36*, EN2+37*, SETCTRL+6*
, SETCTRL+8, SETCTRL+20*, SETCTRL+21*, SETCTRL+22*, SETCTRL+23, SETCTRL+31*, SETCTRL+32*, SETCTRL+33*, SETCTRL+34

Marked Items

Name Field # of Occurrence
$T(CKM+ASUP(1)+1 EN2+16, EN2+23, EN2+26, EN2+29, EN2+33, EN2+36
$T(HELP EN2+12, EN2+13
$T(HELP+ASUP(1) EN2+10, EN2+11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All