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

Package: Commitment Register

Global: ^ACRTPAR


Information

FileMan FileNo FileMan Filename Package
9002196.2 ARMS TRAINING PARTICIPANTS Commitment Register

Description

Directly Accessed By Routines, Total: 2

Package Total Routines
Commitment Register 2 ACRFTPA1    ACRFTPAR    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Commitment Register 1 ACRFTPAR    

Pointer To FileMan Files, Total: 4

Package Total FileMan Files
Commitment Register 4 ARMS USER(#9002185.3)[.01]    FMS DOCUMENT(#9002196)[.02, .08]    FMS DEPARTMENT ACCOUNT(#9002188)[.03]    FMS SUPPLIES AND SERVICES(#9002193)[.04, .05]    

Fields, Total: 8

Field # Name Loc Type Details
.01 TRAINING PARTICIPANT 0;1 POINTER TO ARMS USER FILE (#9002185.3)
************************REQUIRED FIELD************************
ARMS USER(#9002185.3)

  • LAST EDITED:  OCT 01, 1996
  • HELP-PROMPT:  Enter the name of the training participant
  • DESCRIPTION:  
    Enter the name of the individual who will participate in this training.
  • CROSS-REFERENCE:  9002196.2^B
    1)= S ^ACRTPAR("B",$E(X,1,30),DA)=""
    2)= K ^ACRTPAR("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9002196.2^AC^MUMPS
    1)= N ACRX S ACRX=$G(^ACRTPAR(+DA,0)) S:$P(ACRX,U,2) ^ACRTPAR("AC",$P(ACRX,U,2),X,DA)=""
    2)= N ACRX S ACRX=$G(^ACRTPAR(+DA,0)) K:$P(ACRX,U,2) ^ACRTPAR("AC",$P(ACRX,U,2),X,DA)
.02 TRAINING DOCUMENT 0;2 POINTER TO FMS DOCUMENT FILE (#9002196) FMS DOCUMENT(#9002196)

  • LAST EDITED:  OCT 01, 1996
  • HELP-PROMPT:  Enter the document number of the 350 for training for this individual.
  • DESCRIPTION:  
    Enter the document number of the training 350 under which the individual will be training.
  • CROSS-REFERENCE:  9002196.2^C
    1)= S ^ACRTPAR("C",$E(X,1,30),DA)=""
    2)= K ^ACRTPAR("C",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9002196.2^AC2^MUMPS
    1)= N ACRX S ACRX=$G(^ACRTPAR(+DA,0)) S:+ACRX ^ACRTPAR("AC",X,+ACRX,DA)=""
    2)= N ACRX S ACRX=$G(^ACRTPAR(+DA,0)) K:+ACRX ^ACRTPAR("AC",X,+ACRX,DA)
.03 DEPARTMENT ACCOUNT 0;3 POINTER TO FMS DEPARTMENT ACCOUNT FILE (#9002188) FMS DEPARTMENT ACCOUNT(#9002188)

  • LAST EDITED:  OCT 01, 1996
  • HELP-PROMPT:  Enter the Department Account to which to charge expenses for this trainee.
  • DESCRIPTION:  
    Enter the Department Account to which to charge expenses for this trainee.
.04 TUITION AND FEES 0;4 POINTER TO FMS SUPPLIES AND SERVICES FILE (#9002193) FMS SUPPLIES AND SERVICES(#9002193)

  • LAST EDITED:  OCT 01, 1996
  • HELP-PROMPT:  Enter the Tuition and Fees entry for this trainee.
  • DESCRIPTION:  
    This points to the Tuition and Fees entry for this participant.
.05 BOOKS AND OTHER EXPENSES 0;5 POINTER TO FMS SUPPLIES AND SERVICES FILE (#9002193) FMS SUPPLIES AND SERVICES(#9002193)

  • LAST EDITED:  OCT 01, 1996
  • HELP-PROMPT:  Enter the Books and Other expenses entry for this trainee.
  • DESCRIPTION:  
    This indicates the pointer to the Books and Other expenses entry for this trainee.
.06 CONTINUOUS YEARS OF SERVICE 0;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>50)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 01, 1996
  • HELP-PROMPT:  Type a Number between 0 and 50, 0 Decimal Digits
  • DESCRIPTION:  
    Enter the number of years of service for the employee.
.07 CONTINUOUS MONTHS OF SERVICE 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>12)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 01, 1996
  • HELP-PROMPT:  Type a Number between 0 and 12, 0 Decimal Digits
  • DESCRIPTION:  
    Enter the number of months of service for the employee.
.08 TRAVEL ORDER 0;8 POINTER TO FMS DOCUMENT FILE (#9002196) FMS DOCUMENT(#9002196)

  • INPUT TRANSFORM:  S DIC("S")="I $P($G(^ACRDOC(+Y,""TO"")),U,9)=$P($G(^ACRTPAR(+$G(DA),0)),U)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  FEB 11, 1997
  • HELP-PROMPT:  Enter the Travel Order Number for this attendee's travel.
  • DESCRIPTION:  
    Enter the Travel Order Number for this attendee's travel associated with this training.
  • SCREEN:  S DIC("S")="I $P($G(^ACRDOC(+Y,""TO"")),U,9)=$P($G(^ACRTPAR(+$G(DA),0)),U)"
  • EXPLANATION:  Select attendee's Travel Order for this training.
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  All