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 |  Pointer To FileMan Files |  Fields |  Found Entries |  All
Print Page as PDF
Global: ^ACRAL

Package: Commitment Register

Global: ^ACRAL


Information

FileMan FileNo FileMan Filename Package
9002193.7 FMS AIRLINE INFO Commitment Register

Description

Directly Accessed By Routines, Total: 15

Package Total Routines
Commitment Register 15 ACRALS    ACRFCALC    ACRFCLM    ACRFDUP    ACRFEAL    ACRFIV12    ACRFPSS    ACRFSS5
ACRFSS51    ACRFSSA1    ACRFSSU    ACRFTV2    ACRPSTI    ACRPTI    ACRPTVI    

Accessed By FileMan Db Calls, Total: 5

Package Total Routines
Commitment Register 5 ACRFDEL    ACRFDUP    ACRFEAL    ACRFSS5    ACRFSS51    

Pointer To FileMan Files, Total: 4

Package Total FileMan Files
Commitment Register 4 ARMS AIRLINE COMPANY(#9002193.6)[2]    FMS DOCUMENT(#9002196)[.03]    FMS REQUEST(#9002189)[.02.07]    ARMS PER DIEM CITY(#9002193.9)[57]    

Fields, Total: 15

Field # Name Loc Type Details
.01 FLIGHT 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S X=+X K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
  • HELP-PROMPT:  Type a Number between 0 and 999, 0 Decimal Digits
  • DESCRIPTION:  
    This is a sequential accession number which indicates whether this is the first, second, third, etc., flight for this trip.  This number is set automatically by the system and should not be entered or edited directly.
  • CROSS-REFERENCE:  9002193.7^B
    1)= S ^ACRAL("B",$E(X,1,30),DA)=""
    2)= K ^ACRAL("B",$E(X,1,30),DA)
.02 REQUEST 0;2 POINTER TO FMS REQUEST FILE (#9002189) FMS REQUEST(#9002189)

  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  
  • DESCRIPTION:  
    This is a pointer the FMS REQUEST file.  It is set internally and should not be edited directly.
  • CROSS-REFERENCE:  ^^TRIGGER^9002193.7^.07
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^ACRAL(D0,0)):^(0),1:"") S X=$P(Y(1),U,7),X=X S DIU=X K Y S X=DIV S X=DIV,X=X X ^DD(9002193.7,.02,1,1,1.4)
    1.4)= S DIH=$S($D(^ACRAL(DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,7)=DIV,DIH=9002193.7,DIG=.07 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    CREATE VALUE)= INTERNAL(#.02)
    DELETE VALUE)= NO EFFECT
    FIELD)= TRAVEL VOUCHER
.03 DOCUMENT 0;3 POINTER TO FMS DOCUMENT FILE (#9002196) FMS DOCUMENT(#9002196)

  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  
  • DESCRIPTION:  
    This is a pointer to the FMS DOCUMENT file.  It is set internally by ARMS and should not be edited directly.
  • CROSS-REFERENCE:  9002193.7^E
    1)= S ^ACRAL("E",$E(X,1,30),DA)=""
    2)= K ^ACRAL("E",$E(X,1,30),DA)
.07 TRAVEL VOUCHER 0;7 POINTER TO FMS REQUEST FILE (#9002189) FMS REQUEST(#9002189)

  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  
  • DESCRIPTION:  
    This is a pointer to the FMS REQUEST file.  It is set internally and should not be edited directly.  It is used to identify the TRAVEL VOUCHER to which this flight is associated.
  • NOTES:  TRIGGERED by the REQUEST field of the FMS AIRLINE INFO File
  • CROSS-REFERENCE:  9002193.7^C
    1)= S ^ACRAL("C",$E(X,1,30),DA)=""
    2)= K ^ACRAL("C",$E(X,1,30),DA)
1 DATE ISSUED DT;1 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • HELP-PROMPT:  Enter the DATE the airline ticket was ISSUED.
  • DESCRIPTION:  
    Enter the date the airline ticket was ISSUED, not the date of the flight.
2 AIRLINE COMPANY DT;2 POINTER TO ARMS AIRLINE COMPANY FILE (#9002193.6)
************************REQUIRED FIELD************************
ARMS AIRLINE COMPANY(#9002193.6)

  • LAST EDITED:  APR 01, 1996
  • DESCRIPTION:  
    Enter the name of the AIRLINE COMPANY.  You should select one from the list.  No additional AIRLINE COMPANIES can be added except by the ARMS manager.
3 FLIGHT NUMBER DT;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>4!($L(X)<2) X
  • HELP-PROMPT:  Answer must be 2-4 characters in length.
  • DESCRIPTION:  
    Enter the FLIGHT NUMBER as printed on the airline ticket for this flight.
4 DEPARTURE TIME DT;4 DATE

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Enter the date and departure time.
  • DESCRIPTION:  
    Enter the date and time when the flight is scheduled to depart.
5 DEPART FROM DT;5 POINTER TO ARMS PER DIEM CITY FILE (#9002193.9) ARMS PER DIEM CITY(#9002193.9)

  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Enter the name of a city from the list.
  • DESCRIPTION:  
    Enter the city from which the flight is scheduled to depart.
6 ARRIVAL TIME DT;6 DATE

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Enter the date and time the flight arrives.
  • DESCRIPTION:  
    Enter the date and time when the flight is scheduled to arrive.
7 ARRIVE IN DT;7 POINTER TO ARMS PER DIEM CITY FILE (#9002193.9) ARMS PER DIEM CITY(#9002193.9)

  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Enter the name of a city from the list.
  • DESCRIPTION:  
    Enter the City where the flight is scheduled to arrive.
8 SEAT ASSIGNMENT DT;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>4!($L(X)<1) X
  • HELP-PROMPT:  Answer must be 1-4 characters in length.
  • DESCRIPTION:  
    Enter the seat number of the seat assigned.
9 COST DT;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999.99)!(X<-9999.99)!(X?.E1"."3N.N) X
  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Type a Number between -9999.99 and 9999.99, 2 Decimal Digits
  • DESCRIPTION:  
    Enter the exact cost of the flight.
10 GTR NO. DT;10 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>14!($L(X)<11) X
  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Answer must be 11-14 characters in length.
  • DESCRIPTION:  
    Enter the GTR number.
11 CONTRACT FARE DT;11 SET
************************REQUIRED FIELD************************
  • '00' FOR CONTRACT FARE;
  • '01' FOR SPACE/FLIGHT NOT AVAILABLE;
  • '02' FOR SCHEDULE INCONSISTENT WITH POLICY;
  • '03' FOR LOWER NON-CONTRACT CARRIER FARE;

  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Select the appropriate code from the list.
  • DESCRIPTION:  Enter code '00' if the fare is a standard contract fare from a Government contract carrier. Use one of the following exception codes when a non- contract fare is used:
    01   Space or scheduled flights are not available in time to
    accomplish the purpose of travel, or use of contract service
    would require the traveler to incur unnecessary overnight
    lodging costs which would increase the total cost of the trip.
    02   The contractor's flight schedule is inconsistent with explicit
    policies of individual Federal departments and agencies, where
    applicable, to schedule travel during normal working hours.
    03   A non-contract carrier offers a lower fare available to the
    general public, the use of which will result in a lower total
    trip cost to the Government -- including the combined costs
    of transportation, lodging, meals and related expenses.
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Found Entries |  All