Sub-Field: 365.21

Parent File	Name	Number	Package
IIV RESPONSE REVIEW(#365.2)	COMMENT	365.21	Integrated Billing

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	COMMENT DATE TIME	0;1	DATE	INPUT TRANSFORM: `S %DT="ESTX" D ^%DT S X=Y K:X<1 X` LAST EDITED: `MAY 01, 2013` HELP-PROMPT: `Enter the date/time that the comment is being entered.` DESCRIPTION: `This is the date and time the comment was entered by the user. It is defaulted to NOW when added a comment from the IBCN Potential COB Worklist.` CROSS-REFERENCE: `365.21^B` `1)= S ^IBCN(365.2,DA(1),1,"B",$E(X,1,30),DA)=""` `2)= K ^IBCN(365.2,DA(1),1,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `^^TRIGGER^365.21^.02` `1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^IBCN(365.2,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S DIU=X K Y S X=DIV S X=DUZ X ^DD(365.21,.01,1,2,1.4)` `1.4)= S DIH=$G(^IBCN(365.2,DIV(0),1,DIV(1),0)),DIV=X S $P(^(0),U,2)=DIV,DIH=365.21,DIG=.02 D ^DICR` `2)= Q` `CREATE VALUE)= S X=DUZ` `DELETE VALUE)= NO EFFECT` `FIELD)= #.02` `This trigger will insert the current user into ENTERED BY field of the COMMENT DATE TIME multiple.`
.02	ENTERED BY	0;2	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `MAY 22, 2013` HELP-PROMPT: `Enter the user adding the comment.` DESCRIPTION: `This is the user that who added the comment. The field is not asked but is automatically stored when comments are entered.` NOTES: `TRIGGERED by the COMMENT DATE TIME field of the COMMENT sub-field of the IIV RESPONSE REVIEW File`
1	COMMENT	1;0	WORD-PROCESSING #365.211	DESCRIPTION: `This field is for any comments the user chooses to enter in regards to the selected IIV Response.` LAST EDITED: `MAY 01, 2013` HELP-PROMPT: `Enter the comment for the selected response file entry.`

.01

COMMENT DATE TIME

0;1

DATE

INPUT TRANSFORM: S %DT="ESTX" D ^%DT S X=Y K:X<1 X
LAST EDITED: MAY 01, 2013
HELP-PROMPT: Enter the date/time that the comment is being entered.
DESCRIPTION:
This is the date and time the comment was entered by the user. It is defaulted to NOW when added a comment from the IBCN Potential COB Worklist.
CROSS-REFERENCE: 365.21^B
1)= S ^IBCN(365.2,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^IBCN(365.2,DA(1),1,"B",$E(X,1,30),DA)
CROSS-REFERENCE: ^^TRIGGER^365.21^.02
1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^IBCN(365.2,D0,1,D1,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S DIU=X K Y S X=DIV S X=DUZ X ^DD(365.21,.01,1,2,1.4)
1.4)= S DIH=$G(^IBCN(365.2,DIV(0),1,DIV(1),0)),DIV=X S $P(^(0),U,2)=DIV,DIH=365.21,DIG=.02 D ^DICR
2)= Q
CREATE VALUE)= S X=DUZ
DELETE VALUE)= NO EFFECT
FIELD)= #.02
This trigger will insert the current user into ENTERED BY field of the COMMENT DATE TIME multiple.

.02

ENTERED BY

0;2

POINTER TO NEW PERSON FILE (#200)

NEW PERSON(#200)

LAST EDITED: MAY 22, 2013
HELP-PROMPT: Enter the user adding the comment.
DESCRIPTION:
This is the user that who added the comment. The field is not asked but is automatically stored when comments are entered.
NOTES: TRIGGERED by the COMMENT DATE TIME field of the COMMENT sub-field of the IIV RESPONSE REVIEW File

COMMENT

1;0

WORD-PROCESSING #365.211

DESCRIPTION:
This field is for any comments the user chooses to enter in regards to the selected IIV Response.
LAST EDITED: MAY 01, 2013
HELP-PROMPT: Enter the comment for the selected response file entry.

Customize PDF page

Package: Integrated Billing

IIV RESPONSE REVIEW(#365.2)-->365.21

Sub-Field: 365.21

Information

Details