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: 442.14

Package: IFCAP

PROCUREMENT & ACCOUNTING TRANSACTIONS(#442)-->442.14

Sub-Field: 442.14


Information

Parent File Name Number Package
PROCUREMENT & ACCOUNTING TRANSACTIONS(#442) 2237 REFERENCE NUMBER 442.14 IFCAP

Details

Field # Name Loc Type Details
.01 2237 REFERENCE NUMBER 0;1 POINTER TO CONTROL POINT ACTIVITY FILE (#410) CONTROL POINT ACTIVITY(#410)

  • INPUT TRANSFORM:  S DINUM=X
  • LAST EDITED:  AUG 10, 1987
  • DESCRIPTION:  
    This is the purchase order reference number.
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
1.5 CURRENT STATUS 0;7 POINTER TO PURCHASE ORDER STATUS FILE (#442.3)
************************REQUIRED FIELD************************
PURCHASE ORDER STATUS(#442.3)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)>59" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  DEC 03, 1986
  • DESCRIPTION:  
    This is the current status of the purchase order.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)>59"
  • EXPLANATION:  REQUIRED
2 ACCOUNTABLE OFFICER 0;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^(400)),$P(^(400),U,1)=2!($P(^(400),U,1)=4)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  DEC 18, 1992
  • DESCRIPTION:  
    This is the name of the accountable officer.
  • SCREEN:  S DIC("S")="I $D(^(400)),$P(^(400),U,1)=2!($P(^(400),U,1)=4)"
  • EXPLANATION:  Must be Accountable Officer or Manager
3 VALIDATION CODE 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • OUTPUT TRANSFORM:  S Y="/ES/"_$$DECODE^PRCHES0(D0,D1)
  • LAST EDITED:  DEC 09, 1992
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
  • DESCRIPTION:  
    This is the electronic signature of the accountable officer.
    DELETE AUTHORITY: ^
    WRITE AUTHORITY: ^
    UNEDITABLE
3.5 VALIDATION VERSION 0;14 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>35!($L(X)<1) X
  • LAST EDITED:  DEC 09, 1992
  • HELP-PROMPT:  Answer must be 1-35 characters in length.
  • DESCRIPTION:  
    Version of validation code for ESIG
3.7 ESIG CODE 0;13 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<2) X
  • LAST EDITED:  APR 12, 1993
  • HELP-PROMPT:  Answer must be 2-10 characters in length.
  • DESCRIPTION:  
    Encoded value used by IFCAP security utilities when confirming the integrity of this record.
4 DATE SIGNED 0;4 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 09, 1992
  • DESCRIPTION:  
    This is the date the purchase order was signed.
6 PURCHASING AGENT 0;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^(400)),$P(^(400),U,1)>2" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  DEC 18, 1992
  • DESCRIPTION:  
    This is the purchasing agent for this purchase order.
  • SCREEN:  S DIC("S")="I $D(^(400)),$P(^(400),U,1)>2"
  • EXPLANATION:  Must be a Purchase Agent or Manager
7 DATE ASSIGNED TO PA 0;6 DATE

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 18, 1986
  • DESCRIPTION:  
    This is the date this purchase order was assigned to the purchasing agent.
8 CP FUND STATUS 0;8 SET
  • '1' FOR INSUFFICIENT FUNDS;

  • LAST EDITED:  OCT 18, 1986
  • DESCRIPTION:  
    This is the Control Point Fund status.
9 TYPE OF REQUEST 0;9 SET
  • '1' FOR UNPOSTED;
  • '2' FOR POSTED;
  • '3' FOR SERVICE;
  • '4' FOR BULK SALE;
  • '5' FOR NX POSTED;

  • LAST EDITED:  MAR 24, 1987
  • DESCRIPTION:  
    This is the type of request.
10 SOURCE OF REQUEST 0;10 SET
  • '1' FOR VA STOCK;
  • '2' FOR GSA STOCK;
  • '3' FOR EXCESS;
  • '4' FOR NOT AVAILABLE FROM ANY OF THESE SOURCES;

  • LAST EDITED:  MAR 24, 1987
  • DESCRIPTION:  
    This is the source of this purchase order.
11 INVENTORY/DISTRIBUTION POINT 0;11 POINTER TO GENERIC INVENTORY FILE (#445) GENERIC INVENTORY(#445)

  • LAST EDITED:  AUG 11, 1987
  • HELP-PROMPT:  If the request was made for a service using the Generic Inventory/Distribution package, the name of the Inventory point that made the request should be entered here.
  • DESCRIPTION:  
    This is the inventory/distribution point for this purchase order.
  • CROSS-REFERENCE:  442^G
    1)= S ^PRC(442,"G",$E(X,1,30),DA(1),DA)=""
    2)= K ^PRC(442,"G",$E(X,1,30),DA(1),DA)
Info |  Details