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 |  All
Print Page as PDF
Routine: ORSNAST

Package: Order Entry Results Reporting

Routine: ORSNAST


Information

ORSNAST ;SLC/RAF - Policy order search ;06/25/2007

Source Information

Source file <ORSNAST.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Order Entry Results Reporting 1 EN^ORSNAST1  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Order Entry Results Reporting 1 OR NATURE/STATUS ORDER SEARCH  

Entry Points

Name Comments DBIA/ICR reference
SORT
SERV ;sets the variable SERVICE equal to 1 if the user wants to sort by
SDATE ;sets DIR call to ask the user for a starting date
EN ;
FORMAT ;allows choice of formats for evaluation purpose
LONER ;sets DIR call to allow the user to select a single service/section
CKDATE ; Make sure the end date is not older than the start date.
SINGLE ;sets variable SINGLE to set up a search of a single service
TASK ;
EXIT ;
EDATE ;sets DIR call to ask the user for an ending date (optional)

External References

Name Field # of Occurrence
^%ZIS TASK+1
^%ZISC EXIT+2
^%ZTLOAD TASK+8
^DIR SORT+3, SORT+6, FORMAT+4, SERV+7, SINGLE+5, LONER+5, SDATE+4, EDATE+4
EN^ORSNAST1 TASK+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!?18,"Nature of Order or Order Status Search.",!?15,"This report is formatted for 132 column output."
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,?32,"REQUEST QUEUED"
  • Line Location: TASK+8
Function Call: WRITE
  • Prompt: !!,?10,"The starting date must be older than the ending date.",!,?10,"Please re-enter start and end dates.",!!
  • Line Location: CKDATE+2
Routine Call
  • DIR
  • Line Location:
    • SORT+3
    • SORT+6
    • FORMAT+4
    • SERV+7
    • SINGLE+5
    • LONER+5
    • SDATE+4
    • EDATE+4
Routine Call
  • %ZIS
  • Line Location:
    • TASK+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("ORNS" EN+1!, EXIT+1!
^TMP("ORSERV" EN+1!, EXIT+1!

Label References

Name Line Occurrences
CKDATE SORT+9, CKDATE+5
EDATE SORT+8, CKDATE+4
EXIT SORT+3, SORT+6, SORT+7, SORT+8, SORT+9, FORMAT+4, SERV+2, SINGLE+1, LONER+1, TASK+10
SDATE SORT+7, CKDATE+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS TASK+1*
DASH EN+3~
DATE EN+3~
DFN EN+3~
DIR EN+3~, SORT+3!, SORT+6!, FORMAT+4!, SERV+7!, SINGLE+5!, LONER+5!, SDATE+4!, EDATE+4!
DIR("?" SORT+2*, FORMAT+3*, SERV+5*, SINGLE+4*, SDATE+3*, EDATE+3*
DIR("A" SORT+1*, SORT+5*, FORMAT+2*, SERV+4*, SINGLE+3*, LONER+4*, SDATE+2*, EDATE+2*
DIR("B" SERV+6*, SINGLE+2*
DIR(0 SORT*, SORT+4*, FORMAT+1*, SERV+3*, SINGLE+2*, LONER+3*, SDATE+1*, EDATE+1*
DTOUT EN+3~, SORT+3, SORT+6, SORT+7, SORT+8, SORT+9, FORMAT+4, SERV+2, SINGLE+1, LONER+5
, SDATE+4, EDATE+4, CKDATE+3, CKDATE+4
DUOUT EN+3~, SORT+3, SORT+6, SORT+7, SORT+8, SORT+9, FORMAT+4, SERV+2, SINGLE+1, LONER+5
, SDATE+4, EDATE+4, CKDATE+3, CKDATE+4
EDATE EN+3~, EDATE+4*, EDATE+5*, CKDATE+1
FORMAT EN+3~, FORMAT+4*, SERV+2, SINGLE+1, LONER+1
HDR EN+3~
HDR1 EN+3~
IEN EN+3~
IO TASK+9
IO("Q" TASK+2!
IOF EN+2
ION TASK+3
LOC EN+4~
LONER EN+4~, LONER+1
LONER( LONER+5*
ORIGVIEW EN+4~
PAGE EN+4~
PNM EN+4~
>> POP TASK+1
PROV EN+4~
QUIT EN+4~, LONER+1, LONER+2, LONER+5*
REF EN+4~
RPDT EN+4~
SDATE EN+4~, SDATE+4*, SDATE+5*, CKDATE+1
SEARCH EN+5~, SORT+6*
SER EN+4~
SERVICE EN+4~, SERV+7*, SINGLE+1, LONER+1
SIGNED EN+5~
SINGLE EN+5~, SINGLE+5*, LONER+1
SNAME EN+5~, SORT+6*
SORT EN+5~, SORT+3*, SORT+4, SORT+5
SSN EN+5~
STATUS EN+5~
STOP EN+4~
SUB EN+5~
TEXT EN+4~
TEXTSUB EN+4~
U EN+1*, SORT+6, LONER+5
VA EN+6~
VADM EN+6~
WHEN EN+6~
WHO EN+6~
Y EN+6~, SORT+3, SORT+6, FORMAT+4, SERV+7, SINGLE+5, LONER+2, LONER+5, SDATE+4, EDATE+4
>> ZTDESC TASK+3*
>> ZTIO TASK+3*
>> ZTRTN TASK+4*
>> ZTSAVE("ED1" TASK+7*
>> ZTSAVE("EDATE" TASK+5*
>> ZTSAVE("FORMAT" TASK+4*
>> ZTSAVE("LONER*" TASK+7*
>> ZTSAVE("SD1" TASK+6*
>> ZTSAVE("SDATE" TASK+5*
>> ZTSAVE("SEARCH" TASK+5*
>> ZTSAVE("SERVICE" TASK+6*
>> ZTSAVE("SINGLE" TASK+7*
>> ZTSAVE("SNAME" TASK+6*
>> ZTSAVE("SORT" TASK+4*
>> ZTSK TASK+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All