Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 423.2

Package: IFCAP

CALM/LOG CODE SHEET(#423)-->423.2

Sub-Field: 423.2


Information

Parent File Name Number Package
CALM/LOG CODE SHEET(#423) NX ITEMS 423.2 IFCAP

Details

Field # Name Loc Type Details
.01 NX ITEMS 0;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Type a Number between 1 and 999, 0 Decimal Digits
  • CROSS-REFERENCE:  423.2^B
    1)= S ^PRCF(423,DA(1),57,"B",$E(X,1,30),DA)=""
    2)= K ^PRCF(423,DA(1),57,"B",$E(X,1,30),DA)
1 SEGMENT TYPE NA 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 3 characters in length.
2 CSN 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<3) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 3-20 characters in length.
3 MANUFACTURER 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
4 PROPERTY TYPE 0;5 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
5 MODEL 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
6 SERIAL NUMBER 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
7 IFCAP PO NUMBER 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>11!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1-11 characters in length.
8 VENDOR NAME 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<3) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 3-25 characters in length.
9 ACQUISITION VALUE 1;1 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits
10 ACQUISITION DATE 1;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 13, 1991
11 ACQUISITION CODE 1;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Type a Number between 0 and 9, 0 Decimal Digits
12 GEN LEDGER ACCT # 1;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Type a Number between 0 and 9999, 0 Decimal Digits
13 YALD CODE 1;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>4!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1-4 characters in length.
14 COST CENTER 1;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>6!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1-6 characters in length.
15 CAPITALIZATION FLAG 1;7 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  SEP 13, 1991
16 USE CODE 1;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1 character in length.
17 OWNERSHIP CODE 1;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1 character in length.
18 LEASE COST/MONTH 1;10 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits
19 LIFE EXPECTANCY 1;11 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Type a Number between 0 and 99, 0 Decimal Digits
20 FINAL DISPOSAL DATE 1;12 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 13, 1991
21 REPLACEMENT COST 1;13 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits
22 RETIREMENT DATE 1;14 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 13, 1991
23 DISPOSITION CODE 1;15 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1 character in length.
24 DISPOSITION PROCEEDS 1;16 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits
25 LAST INVENTORY DATE 1;17 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 13, 1991
26 PM TOTAL COST 1;18 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits
27 CAT STK # DESC 2;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
28 REPLACEMENT NUMBER 2;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Type a Number between 0 and 99999999, 0 Decimal Digits
29 CMR DEPARTMENT # 2;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>5!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1-5 characters in length.
30 CONTROLLED ITEM 2;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1 character in length.
31 REASON CODE 2;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>4!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1-4 characters in length.
32 PARENT SYSTEM 2;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
33 COMMENTS 2;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1-25 characters in length.
34 NSN 2;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
35 SPECIAL HANDLING CODE 2;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1) X
  • LAST EDITED:  SEP 13, 1991
  • HELP-PROMPT:  Answer must be 1 character in length.
36 FIPS AGENCY CODE 2;10 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>4!($L(X)<1) X
  • LAST EDITED:  JAN 02, 1992
  • HELP-PROMPT:  Answer must be 1-4 characters in length.
37 ADP UNIT DESIGNATOR 2;11 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  JAN 02, 1992
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
38 ADP MFG CODE 2;12 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>5!($L(X)<1) X
  • LAST EDITED:  JAN 02, 1992
  • HELP-PROMPT:  Answer must be 1-5 characters in length.
39 ADP MODEL CODE 2;13 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>5!($L(X)<1) X
  • LAST EDITED:  JAN 02, 1992
  • HELP-PROMPT:  Answer must be 1-5 characters in length.
40 ADP COMPUTER QTY 2;14 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 02, 1992
  • HELP-PROMPT:  Type a Number between 0 and 999999, 0 Decimal Digits
41 ADP DESCRIPTION 2;15 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<1) X
  • LAST EDITED:  JAN 02, 1992
  • HELP-PROMPT:  Answer must be 1-25 characters in length.
42 CITY 2;16 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<1) X
  • LAST EDITED:  JAN 02, 1992
  • HELP-PROMPT:  Answer must be 1-25 characters in length.
43 STATE 2;17 POINTER TO STATE FILE (#5) STATE(#5)

  • LAST EDITED:  JAN 02, 1992
44 USCODE 2;18 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1) X
  • LAST EDITED:  JAN 02, 1992
  • HELP-PROMPT:  Answer must be 1 character in length.
45 DS IND 2;19 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1) X
  • LAST EDITED:  JAN 02, 1992
  • HELP-PROMPT:  Answer must be 1 character in length.
Info |  Details