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 |  All
Print Page as PDF
Global: ^ACRAU

Package: Commitment Register

Global: ^ACRAU


Information

FileMan FileNo FileMan Filename Package
9002185.3 ARMS USER Commitment Register

Description

Directly Accessed By Routines, Total: 39

Package Total Routines
Commitment Register 38 ACR148    ACR999    ACRCD15    ACRF20PS    ACRFAU    ACRFCHK    ACRFEA3    ACRFFF3
ACRFFF4    ACRFFF5    ACRFIV4    ACRFNXT    ACRFPAY    ACRFPAY7    ACRFPAY8    ACRFPAYU
ACRFPR    ACRFSS4    ACRFSS41    ACRFSS42    ACRFSS6    ACRFSSA    ACRFSSU    ACRFTA
ACRFTOT    ACRFTPA1    ACRFTPAR    ACRFTR1    ACRFTVA    ACRFUP1    ACRFUTL1    ACRPBPA
ACRPER    ACRPPRS    ACRPTBI    ACRPTO    ACRPTRG    ACRPTS    
NCR Financial System 1 AFSLACHT    

Accessed By FileMan Db Calls, Total: 15

Package Total Routines
Commitment Register 14 ACRF20PS    ACRFAU    ACRFCCP    ACRFDUP    ACRFPAY2    ACRFPAY8    ACRFPAY9    ACRFPAYU
ACRFPR    ACRFPSR    ACRFSS4    ACRFTPAR    ACRFUP1    ACRFVLK    
NCR Financial System 1 AFSLVIEW    

Pointed To By FileMan Files, Total: 5

Package Total FileMan Files
Commitment Register 4 FMS DOCUMENT(#9002196)[.2524148030999010#9002196.05(.01)#9002196.06(.01)]    ARMS OUTSTANDING TRAVEL ADVANCE(#9002185.4)[.02]    FMS SUPPLIES AND SERVICES(#9002193)[.17]    ARMS TRAINING PARTICIPANTS(#9002196.2)[.01]    
3780 Telecommunications 1 1166 APPROVALS FOR PAYMENT(#9002325)[#9002325.02(64)]    

Pointer To FileMan Files, Total: 4

Package Total FileMan Files
Commitment Register 1 ARMS CAN(#9002186.5)[16]    
Kernel 1 NEW PERSON(#200)[.01]    
MailMan 1 DOMAIN(#4.2)[#9002185.31(.01)]    
Utility Tables 1 LOCATION(#9999999.06)[1]    

Fields, Total: 24

Field # Name Loc Type Details
.01 ARMS USER 0;1 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • INPUT TRANSFORM:  S:$D(X) DINUM=X Q
  • OUTPUT TRANSFORM:  S Y=$$NAME2^ACRFUTL1(Y)
  • LAST EDITED:  SEP 30, 2005
  • HELP-PROMPT:  Select a name from the list.
  • DESCRIPTION:  
    This is a pointer to the user file.
  • TECHNICAL DESCR:  In an effort to standardize the name format in the New Person (200) file, there have been some significant changes made to the way the name is entered and displayed. Last names may no longer contain spaces or apostrophes. 
    While this was primarily done to help clarify patient data, it does have a great impact on ARMS for traveler payments and for the display/print of all documents.
    For this reason, effective ARMS V2.1 Patch 19, an output transform has been added to this field allowing the Name to display with punctuation.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9002185.3^B
    1)= S ^ACRAU("B",$E(X,1,30),DA)=""
    2)= K ^ACRAU("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  ^^TRIGGER^9002185.3^.02
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^ACRAU(D0,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S DIU=X K Y X ^DD(9002185.3,.01,1,2,1.1) X ^DD(9002185.3,.01,1,2,1.4)
    1.1)= S X=DIV S I(0,0)=$S($D(D0):D0,1:""),D0=DIV S:'$D(^VA(200,+D0,0)) D0=-1 S Y(101)=$S($D(^VA(200,D0,0)):^(0),1:"") S X=$P(Y(101),U,1) S D0=I(0,0)
    1.4)= S DIH=$S($D(^ACRAU(DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,2)=DIV,DIH=9002185.3,DIG=.02 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    CREATE VALUE)= ARMS USER:NAME
    DELETE VALUE)= NO EFFECT
    FIELD)= #.02
.02 USER NAME 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  NOV 06, 1997
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    Enter the users name.
  • NOTES:  TRIGGERED by the ARMS USER field of the ARMS USER File
  • CROSS-REFERENCE:  9002185.3^C
    1)= S ^ACRAU("C",$E(X,1,30),DA)=""
    2)= K ^ACRAU("C",$E(X,1,30),DA)
1 OFFICIAL DUTY STATION 1;1 POINTER TO LOCATION FILE (#9999999.06) LOCATION(#9999999.06)

  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Enter the name of a OFFICIAL DUTY STATION from the list.
  • DESCRIPTION:  
    This field allows the system manager to indicate the Traveler's official duty station.
2 MILES FROM HOME TO AIRPORT 1;2 NUMBER

  • INPUT TRANSFORM:  S X=+X K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Type a Number between 0 and 999, 0 Decimal Digits
  • DESCRIPTION:  
    Enter the number of miles from the travelers home to the airport.  This is used as a default for the number of miles allowed when the traveler travels via common carrier.
3 PAY PLAN 1;3 SET
  • 'GS' FOR GENERAL SCHEDULE;
  • 'GM' FOR GENERAL MERIT;
  • 'AD' FOR STUDENT ASST. EXTERN;
  • 'WG' FOR WAGE GRADE;
  • 'WL' FOR WAGE LEADER;
  • 'WS' FOR WAGE SUPERVISOR;
  • 'CO' FOR COMMISSIONED OFFICER;
  • 'SES' FOR SENIOR EXEC SERV;

  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Enter the appropriate code from the list.
  • DESCRIPTION:  
    Enter the appropriate code from the list to indicate the ARMS USER's pay plan.
4 GRADE 1;4 NUMBER

  • INPUT TRANSFORM:  S X=+X K:+X'=X!(X>18)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Type a Number between 1 and 18, 0 Decimal Digits
  • DESCRIPTION:  
    Enter the number for the ARMS USER's GRADE.
5 PROCUREMENT CREDIT CARD HOLDER 1;5 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Enter the appropriate code from the list.
  • DESCRIPTION:  
    Indicate whether or not this ARMS USER is an authorized holder of the small purchase credit care.
6 ATM CARD AUTHORIZED 1;6 SET
  • '1' FOR YES;
  • '0' FOR NO;
  • '2' FOR ATM CANCELLED;

  • LAST EDITED:  JUN 18, 1997
  • HELP-PROMPT:  Enter the appropriate code from the list.
  • DESCRIPTION:  
    Enter the appropriate code from the list to indicate if this ARMS user is authorized a government ATM card.
7 TYPE APPOINTMENT 1;7 SET
  • 'PFT' FOR PERM FULL TIME;
  • 'PPT' FOR PERM PART TIME;
  • 'PIT' FOR PERM INTERM;
  • 'TFT' FOR TEMP FULL TIME;
  • 'TPT' FOR TEMP PART TIME;
  • 'TI' FOR TEMP INTERM;

  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Enter the appropriate code from the list.
  • DESCRIPTION:  
    Enter the appropriate code from the list to indicate the type of personnel appointment for this ARMS USER.
8 SERIES 1;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>4!($L(X)<2) X
  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Answer must be 2-4 characters in length.
  • DESCRIPTION:  
    Enter the ARMS User's personnel series number.
9 TAXI - HOME TO AIRPORT 1;9 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Type a Number between 0 and 999, 0 Decimal Digits, to indicate the average round trip cost by taxi from your home to the nearest airport.
  • DESCRIPTION:  
    This indicates the usual ROUNDTRIP cost of taxi fair from your home to the nearest airport.  This will be used to calculate the maximum reimbursement allowed, for driving to and parking at the airport vs taking a taxi.
10 ADDITIONAL MAILMAN DOMAINS 2;0 POINTER Multiple #9002185.31 9002185.31

  • LAST EDITED:  APR 01, 1996
  • DESCRIPTION:  
    This is a multiple field which lists additional domains to which a mail message will be sent whenever a user needs to sign an ARMS document.
11 BANYAN/UNIX NAME 3;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>8!($L(X)<3)!'(X?1L.8L) X
  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Answer must be 3-8 lower case characters in length.
  • DESCRIPTION:  
    Enter the name of the user as required by UNIX and/or BANYAN mail, such as 'tfisher' for THOMAS FISHER.
12 TRAVEL AUDIT WATCH 1;12 SET
  • '1' FOR MONITOR ALL TV'S;
  • '0' FOR STANDARD AUDIT;

  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Enter the appropriate code from the list.
  • DESCRIPTION:  
    Enter the appropriate code to indicate whether all travel vouchers for this traveler should be audited.
13 USE SCREENMAN 1;13 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Enter the appropriate code from the list.
  • DESCRIPTION:  
    This field indicates whether the user prefers to use the full-screen editor or the line editor for ARMS editing.
14 ENTRY ON DUTY DATE 1;14 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 01, 1996
  • HELP-PROMPT:  Enter the date the employee entered on duty with IHS.
  • DESCRIPTION:  
    Enter the date the employee entered on duty with IHS.
15 POSITION NUMBER 1;15 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  SEP 25, 1997
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • DESCRIPTION:  
    Enter the employee's position number.
16 PAYROLL CAN 1;16 POINTER TO ARMS CAN FILE (#9002186.5) ARMS CAN(#9002186.5)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^ACRLOCB(""DCAN"",+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 30, 1997
  • HELP-PROMPT:  Enter the payroll CAN for this employee.
  • DESCRIPTION:  
    Enter the payroll CAN for this employee.
  • SCREEN:  S DIC("S")="I $D(^ACRLOCB(""DCAN"",+Y))"
  • EXPLANATION:  Ensure that CAN is from a valid department account.
  • CROSS-REFERENCE:  9002185.3^CAN
    1)= S ^ACRAU("CAN",$E(X,1,30),DA)=""
    2)= K ^ACRAU("CAN",$E(X,1,30),DA)
17 VENDOR EDIT AUTHORITY 1;17 SET
  • 'F' FOR FINANCE;
  • 'C' FOR CONTRACT;
  • 'A' FOR ALL;

  • LAST EDITED:  OCT 19, 2005
  • HELP-PROMPT:  Enter code from list for proper Vendor file edit restrictions
  • TECHNICAL DESCR:  
    Added field to control individual access to edit the National Vendor file for the jDCIS project 10/2005.
1901 EFT ACCOUNT TYPE 19;1 SET
  • 'C' FOR CHECKING;
  • 'S' FOR SAVINGS;

  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Enter the appropriate code from the list.
  • DESCRIPTION:  
    This field indicates the type of bank account to be used for electronic funds transfer to the vendor.
1902 EFT ROUTING TRANSIT NUMBER 19;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<9) X I $D(X) K:'$D(^XUSEC("ACRFZ EDIT EFT",DUZ)) X
  • OUTPUT TRANSFORM:  S Y=$S($D(^XUSEC("ACRFZ EDIT EFT",DUZ)):Y,$D(^XUSEC("ACRFZ VIEW EFT",DUZ)):Y,1:"")
  • LAST EDITED:  JUN 08, 2001
  • HELP-PROMPT:  Answer must be 9 characters in length.
  • DESCRIPTION:  
    This field contains the bank routing number need to identify the bank to which funds will be transferred via electronic funds transfer.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
1903 EFT DEPOSITOR ACCOUNT NUMBER 19;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>17!($L(X)<3) X I $D(X) K:'$D(^XUSEC("ACRFZ EDIT EFT",DUZ)) X
  • OUTPUT TRANSFORM:  S Y=$S($D(^XUSEC("ACRFZ EDIT EFT",DUZ)):Y,$D(^XUSEC("ACRFZ VIEW EFT",DUZ)):Y,1:"")
  • LAST EDITED:  JUN 08, 2001
  • HELP-PROMPT:  Answer must be 3-17 characters in length.
  • DESCRIPTION:  
    This field contains the bank account number for the vendor which will be used to transfer funds to the vendor via electronic funds transfer.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
1904 EFT SUB-ROUTING TRANSIT NUMBER 19;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<9) X I $D(X) K:'$D(^XUSEC("ACRFZ EDIT EFT",DUZ)) X
  • OUTPUT TRANSFORM:  S Y=$S($D(^XUSEC("ACRFZ EDIT EFT",DUZ)):Y,$D(^XUSEC("ACRFZ VIEW EFT")):Y,1:"")
  • LAST EDITED:  APR 06, 2001
  • HELP-PROMPT:  Answer must be 9 characters in length.
  • DESCRIPTION:  
    This field contains information for a second bank transit number if needed to make electronic funds transfer to a vendor.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
1905 EFT SUB-DEPOSITOR ACCOUNT NO. 19;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>17!($L(X)<3) X I $D(X) K:'$D(^XUSEC("ACRFZ EDIT EFT",DUZ)) X
  • OUTPUT TRANSFORM:  S Y=$S($D(^XUSEC("ACRFZ EDIT EFT",DUZ)):Y,$D(^XUSEC("ACRFZ VIEW EFT",DUZ)):Y,1:"")
  • LAST EDITED:  APR 06, 2001
  • HELP-PROMPT:  Answer must be 3-17 characters in length.
  • DESCRIPTION:  
    This field contains information for a second depositor account number if required for electronic funds transfer.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  All