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 |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ASUARDTX

Package: Supply

Routine: ASUARDTX


Information

ASUARDTX ;DSD/DFM - RECEIPT ENTER DATE OF EXPIRATION; [ 04/15/98 2:44 PM ]

Source Information

Source file <ASUARDTX.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
VA Fileman 2 ^%DT  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
EXIT ;RETURN TO CALLING ROUTINE
DTCK ;
RDDT4 ;

External References

Name Field # of Occurrence
^%DT DTCK+2
^DIR RDDT4+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " ",Y
  • Line Location: DTCK+1
Function Call: WRITE
  • Prompt: " ",Y
  • Line Location: DTCK+2
Function Call: WRITE
  • Prompt: !,"Answer must be in MMYY format"
  • Line Location: DTCK+3
Function Call: WRITE
  • Prompt: !,"Answer may not be for a previous year"
  • Line Location: DTCK+4
Function Call: WRITE
  • Prompt: !,"Month must be current month or greater"
  • Line Location: DTCK+5
Function Call: WRITE
  • Prompt: !,"Month must be 01 - 12"
  • Line Location: DTCK+6
Routine Call
  • DIR
  • Line Location:
    • RDDT4+4

Label References

Name Line Occurrences
EXIT RDDT4+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT DTCK+2*
>> ASUK("DATE" DTCK+1, DTCK+4, DTCK+5
>> ASUTRNS RDDT4+5
>> ASUTRNS( RDDT4+5*
DIR EXIT+1!
DIR("?" RDDT4+2*
DIR("A" RDDT4+1*
DIR(0 RDDT4+3*
>> DIROUT RDDT4+4
>> DTOUT RDDT4+4
>> DUOUT RDDT4+4
X EXIT+1!, DTCK+1, DTCK+2, DTCK+3!, DTCK+4!, DTCK+5!, DTCK+6!, DTCK+7
Y RDDT4+5, EXIT+1!, DTCK+1*, DTCK+2*, DTCK+7*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All