Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Local Variables |  All
Print Page as PDF
Global: ^ASUSITE

Package: Supply

Global: ^ASUSITE


Information

FileMan FileNo FileMan Filename Package
9002039.99 ASUTBL SITE Supply

Description

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Supply 1 ASUTBL AREA(#9002039.01)[.01]    

Fields, Total: 43

Field # Name Loc Type Details
.01 AREA 0;1 POINTER TO ASUTBL AREA FILE (#9002039.01)
************************REQUIRED FIELD************************
ASUTBL AREA(#9002039.01)

  • LAST EDITED:  OCT 25, 1996
  • HELP-PROMPT:  Enter the Area Accounting Point for this Site
  • DESCRIPTION:  
    Pointer to the Area that this site represents (to ASUTBL AREA file)
  • CROSS-REFERENCE:  9002039.99^B
    1)= S ^ASUSITE("B",$E(X,1,30),DA)=""
    2)= K ^ASUSITE("B",$E(X,1,30),DA)
2 TYPE OF LAST RUN 0;2 SET
  • '0' FOR DAILY RUN;
  • '1' FOR MONTHLY CLOSEOUT RUN;
  • '2' FOR YEARLY CLOSEOUT RUN;
  • '9' FOR DATA ENTRY ONLY RUN;
  • '8' FOR RE-EXTRACT RUN;

  • LAST EDITED:  APR 30, 1996
  • HELP-PROMPT:  ENTER TYPE OF LAST RUN
3 STANDARD REPORT FLAG 0;3 SET
  • 'Y' FOR STANDARD REPORTS PRINTED;
  • 'N' FOR STANDARD REPORTS NOT PRINTED;

  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  SET BY UPDATE ROUTINE TRUE OR FALSE
4 INVOICE REPORT FLAG 0;4 SET
  • 'Y' FOR INVOICE REPORTS PRINTED;
  • 'N' FOR INVOICE REPORTS NOT PRINTED;

  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  SET BY UPDATE ROUTINE TRUE OR FALSE
5 PREVIOUS UPDATE STATUS FLAG 0;5 SET
************************REQUIRED FIELD************************
  • 'Y' FOR PREVIOUS UPDATE SUCESSFULLY COMPLETED;
  • 'N' FOR PREVIOUS UPDATE NOT SUCESSFULLY COMPLETED;

  • LAST EDITED:  JAN 09, 1991
  • HELP-PROMPT:  SET BY UPDATE ROUTINE TRUE OR FALSE
6 STANDARD REPORT DEVICE 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  FEB 09, 1998
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
  • DESCRIPTION:  May have either a device name or number If the device name is HFS (Host file server) additional : parameters are
    second : piece = Host File Name - Default is ASU_(date in format MMDD)
    third : piece  = Host File Name extension (after .) Default is SRP
    fourth : piece = Host File Directory - Default is /usr/spool/uucppublic
6.1 UNIX STANDARD PRINT DEVICE 3;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  JAN 07, 1997
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    Name of device UNIX will use to route the spooled Standard reports For this field to have any effect, field 6, Standard Report Device will need to be HFS (Host file server).
7 INVOICE REPORT DEVICE 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<1) X
  • LAST EDITED:  FEB 09, 1998
  • HELP-PROMPT:  Answer must be 1-60 characters in length.
  • DESCRIPTION:  May have either a device name or number If the device name is HFS (Host file server) additional : parameters are
    second : piece = Host File Name - Default is ASU_(date in MMDD format)
    third : piece  = Host File Name extension (after .) Default is IRP
    fourth : piece = Host File Directory - Default is /usr/spool/uucppublic
    i.e. default hostfile entry would be:
    HFS:ASUIRP::/usr/spool/uucppublic
7.1 UNIX INVOICE PRINT DEVICE 3;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  JAN 07, 1997
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    Name of device UNIX will use to route the spooled Invoice reports.  For this field to have any effect, field 7 Invoice Print Device must be HFS (Host file server)
8 LAST MONTHLY EXTRACT DATE 0;8 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Computer stored date
9 EXTRACT DEVICE 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1)!'(X?1A.":".ANP) X
  • LAST EDITED:  MAR 27, 1996
  • HELP-PROMPT:  Answer must be 'F'- disk file; 'C' or 'T' option ':directory'
10 ASK STANDARD DEVICE 0;10 SET
  • '0' FOR AUTOMATIC SELECTION OF DEFAULT;
  • '1' FOR PROMPT WITH DEFAULT;
  • '2' FOR PROMPT WITHOUT DEFAULT;

  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Enter preference for opening of device for Standard Reports
11 ASK INVOICE DEVICE 0;11 SET
  • '0' FOR AUTOMATIC SELECTION OF DEFAULT;
  • '1' FOR PROMPT WITH DEFAULT;
  • '2' FOR PROMPT WITHOUT DEFAULT;

  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Enter preference for opening of device for Invoice Reports
12 ASK REPORT 13 0;12 SET
  • '0' FOR NEVER ASK - R13 ONLY FROM MENUES;
  • '1' FOR ASK FOR SELECTION AND RANGE;
  • '2' FOR ALWAYS CREATE REPORT WITH DEFAULT SELECTIONS;

  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Enter preference for method of generating report 13
13 DATE OF LAST UPDATE RUN 0;13 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Computer stored
14 LAST MONTHLY RUN (MMFY) 0;14 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>4!($L(X)<4)!'(X?4N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Answer must be Month and Fiscal year of last Monthly Close out update
15 LAST YEARLY RUN (MMFY) 0;15 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>4!($L(X)<4)!'(X?4N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Answer must be Month and Fiscal year of last Yearly Close out Update
16 RPT13 SELECT 0;16 SET
  • '1' FOR PERRY POINT;
  • '3' FOR GSA;
  • '4' FOR VA;
  • '5' FOR MILITARY;
  • '6' FOR OTHER GOV;
  • '0' FOR ALL OTHER;
  • 'A' FOR ALL ITEMS;
  • 'S' FOR DROP SHIP;
  • 'Y' FOR YEARLY;

  • LAST EDITED:  DEC 01, 1993
  • HELP-PROMPT:  SELECT ONE OF THE REPORT 13 OPTIONS
17 RPT13 RANGE 0;17 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 01, 1993
  • HELP-PROMPT:  Type a Number between 0 and 999, 0 Decimal Digits
18 ISSUE VOUCHER SER# 1;8 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 14, 1996
  • HELP-PROMPT:  Type a Number between 1 and 999, 0 Decimal Digits
19 ARMS INTERFACE 3;1 SET
************************REQUIRED FIELD************************
  • '0' FOR NO ARMS INTERFACE ACTIVE;
  • '1' FOR IMPORT ARMS DATA FROM SAME UCI;
  • '2' FOR IMPORT ARMS DATA FROM HOST FILE;

  • LAST EDITED:  FEB 15, 1996
  • HELP-PROMPT:  Enter correct selection for Interfacing with the ARMS system
21 UPLOAD TYPE 1;1 SET
************************REQUIRED FIELD************************
  • '0' FOR NO UPLOAD;
  • '1' FOR SAMS;
  • '2' FOR STORES;
  • '3' FOR BOTH;

  • LAST EDITED:  MAY 19, 1998
  • HELP-PROMPT:  Enter 1 if up loading to SAMS or 2 if up loading to Stores or 3 for both
22 ASU1 THROUGH 1;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Type a Number between 0 and 999999999, 0 Decimal Digits
23 ASU2 THROUGH 1;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Type a Number between 0 and 999999999, 0 Decimal Digits
24 ASU3 THROUGH 1;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Type a Number between 0 and 999999999, 0 Decimal Digits
25 ASU4 THROUGH 1;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Type a Number between 0 and 999999999, 0 Decimal Digits
26 ASU5 THROUGH 1;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Type a Number between 0 and 999999999, 0 Decimal Digits
27 ASU23 THROUGH 1;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Type a Number between 0 and 999999999, 0 Decimal Digits
31 UPDATE STATUS SWITCH 2;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>60)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Type a Number between 0 and 60, 0 Decimal Digits
32 TRANS POSTING STATUS 2;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>60)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Type a Number between 0 and 60, 0 Decimal Digits
  • TECHNICAL DESCR:  
    This field is used to determine the last closeout type. (see routine ASUCOSTS at tag EN. A null field indicates a daily closeout. An entry of 1 is a monthlyand 2 is fr a yearly.
33 STANDARD REPORTS STATUS 2;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>60)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Type a Number between 0 and 60, 0 Decimal Digits
34 INVOICE REPORTS STATUS 2;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>60)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Type a Number between 0 and 60, 0 Decimal Digits
35 MONTHLY UPDATE STATUS 2;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>60)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Type a Number between 0 and 60, 0 Decimal Digits
36 YEARLY CLOSEOUT STATUS 2;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>60)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Type a Number between 0 and 60, 0 Decimal Digits
37 EARLIEST DAY MONTHLY CLOSE 2;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>31)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Type a Number between 1 and 31, 0 Decimal Digits
38 WARN MONTH CLOSE NEEDED DATE 2;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2)!'(X?2N) X
  • LAST EDITED:  DEC 01, 1993
  • HELP-PROMPT:  Answer must be 2 characters in length.
39 MONTH CLOSE CUTOFF DAY 2;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>31)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 22, 1993
  • HELP-PROMPT:  Type a Number between 1 and 31, 0 Decimal Digits
40 REPORT SORT STATUS 2;10 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>20)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 17, 1994
  • HELP-PROMPT:  Type a Number between 0 and 20, 0 Decimal Digits
41 STATUS PRE-INIT 3;2 SET
  • '0' FOR PRE-INIT NOT COMPLETED;
  • '1' FOR PRE-INIT COMPLETED;
  • '2' FOR PRE-INIT & MAIN INIT COMPLETED;

  • LAST EDITED:  SEP 05, 1996
  • HELP-PROMPT:  SET BY ASUINIT ROUTINES
42 STATUS POST-INIT 3;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>50)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 05, 1996
  • HELP-PROMPT:  Type a Number between 0 and 50, 0 Decimal Digits
43 INIT VERSION 3;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>6!($L(X)<1) X
  • LAST EDITED:  SEP 05, 1996
  • HELP-PROMPT:  Answer must be 1-6 characters in length.
44 MO BEG VOU SER # 3;8 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 14, 1996
  • HELP-PROMPT:  Type a Number between 1 and 9999, 0 Decimal Digits
45 ONLINE ISSUEBOOK FLAG 3;5 SET
  • '1' FOR ONLINE ISSUEBOOK ACTIVE;
  • '0' FOR ONLINE ISSUEBOOK NOT ACTIVE;

  • LAST EDITED:  APR 23, 1997

Found Entries, Total: 1

AREA: 9002039.01^40    

External References

Name Field # of Occurrence
^%DT 8+1, 13+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ASUSITE("B" .01(XREF 1S), .01(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 8+1*, 13+1*
>> DA .01(XREF 1S), .01(XREF 1K)
X .01(XREF 1S), .01(XREF 1K), 6+1!, 6.1+1!, 7+1!, 7.1+1!, 8+1*!, 9+1!, 13+1*!, 14+1!
, 15+1!, 17+1!, 18+1!, 22+1!, 23+1!, 24+1!, 25+1!, 26+1!, 27+1!, 31+1!
, 32+1!, 33+1!, 34+1!, 35+1!, 36+1!, 37+1!, 38+1!, 39+1!, 40+1!, 42+1!
, 43+1!, 44+1!
>> Y 8+1, 13+1
Info |  Desc |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Local Variables |  All