Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^ASUL(2

Package: Supply

Global: ^ASUL(2


Information

FileMan FileNo FileMan Filename Package
9002039.02 ASUTBL STATION Supply

Description

Directly Accessed By Routines, Total: 10

Package Total Routines
Supply 10 ASULDIRA    ASUTP34    ASUTP35    ^ASUL(2    ASULARST    ASUMKBIO    ASURQ810    ASUTP3D
ASUTP3E    ASUUTIL    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Supply 1 ASUVAR    

Pointed To By FileMan Files, Total: 14

Package Total FileMan Files
Supply 14 ASUHST HISTORY TRANSACTIONS(#9002036)[.03]    ASUTBL AREA(#9002039.01)[2]    ASUMST BACK ORDER(#9002035)[#9002035.01(13)]    ASUMST CONTROL SHEET(#9002037)[.01]    ASUMST ISSUE BOOK(#9002033)[.01]    ASUMST STATION(#9002031)[.01]    ASUTRN DUE IN(#9002036.1)[.03]    ASUTRN RECEIPTS(#9002036.2)[.03]    ASUTRN ISSUES(#9002036.3)[.03]    ASUTRN INDEX(#9002036.4)[.03]    ASUTRN STATION(#9002036.5)[.03]    ASUTRN ADJUSTMENT(#9002036.6)[.03]    ASUTRN DIRECT ISSUE(#9002036.7)[.03]    ASUJIB ISSUE BOOK(#9002036.8)[.03]    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Supply 2 ASUTBL AREA(#9002039.01)[.02]    ASUTBL EOQ TABLE(#9002039.08)[6]    

Fields, Total: 11

Field # Name Loc Type Details
.001 AREA/STATION CODE NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<1000)!(X?.E1"."1N.N) X
  • LAST EDITED:  FEB 02, 1994
  • HELP-PROMPT:  Type the Area's Accounting point followed by the Station code
.01 STATION NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>45!($L(X)<3)!'(X?1A.E) X
  • LAST EDITED:  MAR 21, 1997
  • HELP-PROMPT:  Answer must be 3-45 characters in length.
  • CROSS-REFERENCE:  9002039.02^D
    1)= S ^ASUL(2,"D",$E(X,1,30),DA)=""
    2)= K ^ASUL(2,"D",$E(X,1,30),DA)
.02 AREA 0;2 POINTER TO ASUTBL AREA FILE (#9002039.01) ASUTBL AREA(#9002039.01)

  • LAST EDITED:  FEB 02, 1994
  • HELP-PROMPT:  Enter Area's Accounting Point code
  • CROSS-REFERENCE:  9002039.02^C
    1)= S ^ASUL(2,"C",$E(X,1,30),DA)=""
    2)= K ^ASUL(2,"C",$E(X,1,30),DA)
.1 TRANSACTION DATE 0;3 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 15, 1997
  • HELP-PROMPT:  Enter date last transaction entered for this station
.11 TRANSACTION SEQ# 0;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  AUG 15, 1997
  • HELP-PROMPT:  Type a Number between 1 and 999999, 0 Decimal Digits
1 STATION CODE 1;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>2!($L(X)<2) X
  • LAST EDITED:  APR 05, 1994
  • HELP-PROMPT:  Answer must be 2 characters in length.
  • CROSS-REFERENCE:  9002039.02^B
    1)= S ^ASUL(2,"B",$E(X,1,30),DA)=""
    2)= K ^ASUL(2,"B",$E(X,1,30),DA)
2 TYPE OF SUPPLIES 1;2 SET
************************REQUIRED FIELD************************
  • 'S' FOR STOCK SUPPLIES AND DIRECT ISSUE;
  • 'D' FOR DIRECT ISSUE ONLY;

  • LAST EDITED:  MAR 14, 1994
  • HELP-PROMPT:  Enter 'S' for SS and DI or 'D' for DI only
  • CROSS-REFERENCE:  9002039.02^T
    1)= S ^ASUL(2,"T",$E(X,1,30),DA)=""
    2)= K ^ASUL(2,"T",$E(X,1,30),DA)
3 STATION CONTACT PERSON 1;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X?1A.E) X
  • LAST EDITED:  FEB 02, 1994
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
4 PHONE NUMBER 1;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>13!($L(X)<13) X
  • LAST EDITED:  FEB 02, 1994
  • HELP-PROMPT:  Answer must be (XXX) XXX-XXXX format
5 USER LEVEL MONTHS 1;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>2)!(X<.5)!(X?.E1"."2N.N) X
  • LAST EDITED:  FEB 02, 1994
  • HELP-PROMPT:  Type a Number between .5 and 2, 1 Decimal Digit
6 EOQ TABLE IN USE 1;6 POINTER TO ASUTBL EOQ TABLE FILE (#9002039.08) ASUTBL EOQ TABLE(#9002039.08)

  • LAST EDITED:  FEB 02, 1994

Found Entries, Total: 1

STATION NAME: DEMO IHS STATION    

External References

Name Field # of Occurrence
^%DT .1+1
Y^DIQ ID.02+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ASUL(1 - [#9002039.01] ID.02+1
^ASUL(2 - [#9002039.02] .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), 1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K)
^DD(9002039.01 ID.02+1

Naked Globals

Name Field # of Occurrence
^(0 ID.02+1
^(1 ID1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT .1+1*
%I ID.02+1*!
>> C ID.02+1*
>> DA .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), 1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K)
>> DIC ID.02+1
U ID.02+1, ID1+1
X .001+1!, .01+1!, .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .1+1*!, .11+1!, 1+1!, 1(XREF 1S)
, 1(XREF 1K), 2(XREF 1S), 2(XREF 1K), 3+1!, 4+1!, 5+1!
>> Y ID.02+1*, .1+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All