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.07

Package: IFCAP

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

Sub-Field: 442.07


Information

Parent File Name Number Package
PROCUREMENT & ACCOUNTING TRANSACTIONS(#442) AMENDMENT 442.07 IFCAP

Details

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

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X I $D(X) S DINUM=X
  • LAST EDITED:  FEB 14, 1986
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 99
  • DESCRIPTION:  
    This is the amendment to the purchase order.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  442.07^B
    1)= S ^PRC(442,DA(1),6,"B",$E(X,1,30),DA)=""
    2)= K ^PRC(442,DA(1),6,"B",$E(X,1,30),DA)
1 EFFECTIVE DATE 0;2 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • DESCRIPTION:  
    This is the effective date of the amendment.
2 AMOUNT CHANGED 0;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<-99999999)!(X?.E1"."3N.N) X
  • LAST EDITED:  MAY 02, 1985
  • HELP-PROMPT:  TYPE A NUMBER BETWEEN -99999999 AND 99999999
  • DESCRIPTION:  
    This is the amount changed in the amendment.
3 AUTHORITY 0;4 POINTER TO TYPE OF AMENDMENT FILE (#442.2)
************************REQUIRED FIELD************************
TYPE OF AMENDMENT(#442.2)

  • INPUT TRANSFORM:  S DIC("S")=$S('$D(PRCHREQ):"I Y<10",1:"I Y>10,Y<20") D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  APR 29, 1994
  • DESCRIPTION:  
    This is the type of amendment.
  • SCREEN:  S DIC("S")=$S('$D(PRCHREQ):"I Y<10",1:"I Y>10,Y<20")
  • EXPLANATION:  CHOOSE A,B,C,D OR E
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
4 TYPE COMMENTS 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>150!($L(X)<3) X
  • LAST EDITED:  JAN 09, 1986
  • HELP-PROMPT:  ANSWER MUST BE 3-150 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    These are comments regarding the type of amendment.
5 CONTRACTOR REQUIRED TO SIGN? 0;5 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  JAN 02, 1986
  • DESCRIPTION:  
    User-entered flag for whether or not Contractor needs to sign P.O./Req.
5.2 NUMBER OF COPIES 0;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 02, 1985
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 9
  • DESCRIPTION:  
    This is the number of copies of the amendment needed.
6 PA/PPM/AUTHORIZED BUYER 1;1 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^(400)),$P(^(400),U,1)>1 Q:$D(PRCHNRQ) I $P(^(400),U,1)>2" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 11, 1996
  • DESCRIPTION:  
    This is the purchasing agent making the amendment.
  • SCREEN:  S DIC("S")="I $D(^(400)),$P(^(400),U,1)>1 Q:$D(PRCHNRQ) I $P(^(400),U,1)>2"
  • EXPLANATION:  Must be a PPM Official or Manager for Requisitions, a Purchasing Agent or Manager for P.O.s.
7 VALIDATION CODE 1;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • OUTPUT TRANSFORM:  S Y="/ES/"_$$DECODE^PRCHES6(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 purchasing agent making the agreement.
    UNEDITABLE
7.5 VALIDATION VERSION 0;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 09, 1992
  • HELP-PROMPT:  Type a Number between 1 and 99, 0 Decimal Digits
  • DESCRIPTION:  
    Version of validation code
7.7 ESIG CODE 0;10 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:  
    Esig code
8 DATE SIGNED 1;3 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 purchasing agent signed the amendment.
9 AMENDMENT/ADJUSTMENT STATUS 1;4 POINTER TO PURCHASE ORDER STATUS FILE (#442.3) PURCHASE ORDER STATUS(#442.3)

  • LAST EDITED:  JUL 12, 1994
  • DESCRIPTION:  
    This is the status of the amendment/adjustment.
10 FISCAL APPROVED BY 1;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  NOV 16, 1992
  • DESCRIPTION:  
    This is the Fiscal Service person approving the amendment.
11 FISCAL VALIDATION CODE 1;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • OUTPUT TRANSFORM:  S Y="/ES/"_$$DECODE^PRCHES7(D0,D1)
  • LAST EDITED:  DEC 09, 1992
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
  • DESCRIPTION:  
    This is the electronic signature code of the person approving the amendment.
    UNEDITABLE
11.5 FISCAL VALIDATION VERSION 0;11 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 09, 1992
  • HELP-PROMPT:  Type a Number between 1 and 99, 0 Decimal Digits
  • DESCRIPTION:  
    Version of validation code
11.7 FISCAL ESIG CODE 1;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • LAST EDITED:  APR 14, 1993
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
  • DESCRIPTION:  
    Encoded value used by IFCAP security utilities when confirming the integrity of this record.
11.8 FISCAL VALIDATION DATE 1;8 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 09, 1992
  • DESCRIPTION:  
    Date/time of validation of ESIG
12 DESCRIPTION 2;0 WORD-PROCESSING #442.13

  • DESCRIPTION:  
    This is a description of the amendment.
  • LAST EDITED:  DEC 18, 1985
  • DESCRIPTION:  
    Description of AMENDMENT
13 ADJUSTMENT VOUCHER 0;8 SET

  • LAST EDITED:  DEC 05, 1986
  • DESCRIPTION:  
    This is the adjustment voucher.
14 CHANGES 3;0 Multiple #442.714 442.714

  • DESCRIPTION:  
    This multiple stores all the changes belonging to this amendment.
  • TECHNICAL DESCR:  
    The information within this multiple comes from file 443.6 after the amendment is obligated.
16 JUSTIFICATION 4;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>240!($L(X)<1) X
  • LAST EDITED:  APR 28, 1994
  • HELP-PROMPT:  Answer must be 1-240 characters in length.
  • DESCRIPTION:  
    The reason for amendment of the purchase order. Answer must be 1-240 characters in length.
Info |  Details