Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Print Page as PDF

Sub-Field: 451.99

Package: PAID

POC DAILY TIME RECORDS(#451)-->451.09-->451.99

Sub-Field: 451.99

Information

Parent File	Name	Number	Package
451.09	DAY #	451.99	PAID

Details

Field #	Name	Loc	Type	Details
.01	DAY #	0;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>14)!(X<1)!(X?.E1"."1.N) X I $D(X) S DINUM=X` LAST EDITED: `SEP 03, 2009` HELP-PROMPT: `Type a day number between 1 and 14, 0 Decimal Digits` DESCRIPTION: `The day # from day 1 to day 14 of a pay period.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `451.99^B` `1)= S ^PRSN(451,DA(2),"E",DA(1),"D","B",$E(X,1,30),DA)=""` `2)= K ^PRSN(451,DA(2),"E",DA(1),"D","B",$E(X,1,30),DA)`
1	CORRECTION STATUS	0;2	SET	'E' FOR Entered; 'A' FOR Approved; 'R' FOR Released; LAST EDITED: `NOV 23, 2009` HELP-PROMPT: `Enter processing status for the corrected released daily POC record.` DESCRIPTION: `This is the status of a correction to the daily point of care record. Daily status only applies to records that have been released with a pay period and then the daily record is corrected.` FIELD INDEX: `ACA (#1005) MUMPS IR SORTING ONLY WHOLE FILE (#451)` `Short Descr: X-REF contains all daily corrections to released pay periods.` `Description: Cross reference contains all approved daily corrections to POC records for which the pay period has already been released. The index is sorted by Division, pay period, nurse and then day number.` `Set Logic: S ^PRSN(451,"ACA",X(1),DA(2),DA(1),DA)=""` `Set Cond: S X=X(2)="A"` `Kill Logic: K ^PRSN(451,"ACA",X(1),DA(2),DA(1),DA)` `Whole Kill: K ^PRSN(451,"ACA")` `X(1): Computed Code: S X=$P($G(^PRSN(451,DA(2),"E",DA(1),0)),U,5)` `(Subscr 1)` `X(2): CORRECTION STATUS (451.99,1) (Subscr 2) (forwards)` FIELD INDEX: `ACE (#1006) MUMPS IR SORTING ONLY WHOLE FILE (#451)` `Short Descr: x-ref contains entered daily corrections to released pay periods.` `Description: Cross reference contains all "Entered" daily corrections to POC records for which the pay period has already been released. The index is sorted by Division, pay period, nurse and then day number.` `Set Logic: S ^PRSN(451,"ACE",X(1),DA(2),DA(1),DA)=""` `Set Cond: S X=X(2)="E"` `Kill Logic: K ^PRSN(451,"ACE",X(1),DA(2),DA(1),DA)` `Whole Kill: K ^PRSN(451,"ACE")` `X(1): Computed Code: S X=$P($G(^PRSN(451,DA(2),"E",DA(1),0)),U,5)` `(Subscr 1)` `X(2): CORRECTION STATUS (451.99,1) (forwards)` FIELD INDEX: `ACR (#1007) MUMPS IR SORTING ONLY WHOLE FILE (#451)` `Short Descr: x-ref contains all released corrections` `Description: Cross reference contains all "Released" daily corrections to POC records for which the pay period has already been released. The index is sorted by Division, pay period, nurse and then day number.` `Set Logic: S ^PRSN(451,"ACR",X(1),DA(2),DA(1),DA)=""` `Set Cond: S X=X(2)="R"` `Kill Logic: K ^PRSN(451,"ACR",X(1),DA(2),DA(1),DA)` `Whole Kill: K ^PRSN(451,"ACR")` `X(1): Computed Code: S X=$P($G(^PRSN(451,DA(2),"E",DA(1),0)),U,5)` `(Subscr 1)` `X(2): CORRECTION STATUS (451.99,1) (Subscr 2) (forwards)` FIELD INDEX: `CS (#1012) REGULAR IR LOOKUP & SORTING WHOLE FILE (#451)` `Short Descr: Index of correction status of day # multiple of va nurse.` `Description: This index is used to approve and release all POC corrected data records.` `Set Logic: S ^PRSN(451,"CS",$E(X,1,5),DA(2),DA(1),DA)=""` `Set Cond: S X=",E,A,"[(","_X_",")` `Kill Logic: K ^PRSN(451,"CS",$E(X,1,5),DA(2),DA(1),DA)` `Whole Kill: K ^PRSN(451,"CS")` `X(1): CORRECTION STATUS (451.99,1) (Subscr 1) (Len 5) (forwards)`
2	ACTIVITY EXTRACTION #	0;3	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<1)!(X?.E1"."1.N) X` LAST EDITED: `JUL 20, 2009` HELP-PROMPT: `Type a number between 1 and 999, 0 Decimal Digits` DESCRIPTION: `The field is updated during Releasing POC DAILY TIME RECORDS of File #451.7. The ACTIVITY EXTRACTION # is set in a field of the POC DAILY ACTIVITY record`
9	VERSION #	V;0	Multiple #451.999	451.999 DESCRIPTION: `The version # of a release (corrected) employee's time card.`