Global: ^AUPNVPRV

Providers giving care who do not hold the AK.PROVIDER security key may be documented in the Encounter Provider field for each PCE V-file (visit-related file, e.g., V CPT) for the itemized care provided.

The care giver must hold the AK.PROVIDER key in order to be a valid entry in this field.  APCDALVR Variable = APCDALVR("APCDTPRO")

1)= S ^AUPNVPRV("B",$E(X,1,30),DA)=""

2)= K ^AUPNVPRV("B",$E(X,1,30),DA)

1)= S:$D(APCDLOOK) DIC("DR")=""

2)= Q

9.2 = S Y(9000010.06,.019,80)=$S($D(D0):D0,1:""),Y(9000010.06,.019,1)=$S($D(^AUPNVPRV(D0,0)):^(0),1:"")

9.3 = X ^DD(9000010.06,.019,9.2) S D0=$P(Y(9000010.06,.019,1),U,1) S:'$D(^VA(200,+D0,0)) D0=-1 X $P(^DD(200,9999999.039,0),U,5,99) S Y(9000010.06,.019,101)=X

APCDALVR Variable = APCDALVR("APCDPAT")

UNEDITABLE

1)= S ^AUPNVPRV("AC",$E(X,1,30),DA)=""

2)= K ^AUPNVPRV("AC",$E(X,1,30),DA)

The encounter entry in the Visit file where the provider gave clinical care to the patient.

Pointer to the Visit file. Always stuffed by data entry, no editing allowed.  APCDALVR Variable = APCDALVR("APCDVSIT")

UNEDITABLE

1)= S ^AUPNVPRV("AD",$E(X,1,30),DA)=""

2)= K ^AUPNVPRV("AD",$E(X,1,30),DA)

This is used for programmed lookup by visit internal entry number.

1)= D ADD^AUPNVSIT

2)= D SUB^AUPNVSIT

This cross-reference is used to add "1" to the Dependent Entry Count field (#.09) of the related Visit file (9000010) entry to indicate that there is a file (in this case V Provider) pointing to the Visit.

When the measurement entry is deleted, this cross-reference is used to subtract "1" from the Dependent Entry Count field (#.09) of the related Visit file (9000010) entry.

decisions were being made.  The primary provider for this encounter may or may not be the "Primary Care Provider" for this patient for overall care.

Secondary providers are those providers, who were also providing care where clinical decisions were being made.  This may be nurses, social workers, pharmacists,...

There may be more than one "primary" and "secondary" V Provider entries for a particular encounter in the Visit file.

visit. APCDALVR Variable = APCDALVR("APCDTPS")

SOURCE OF DATA:   028/PSPRIME

A Provider may be furthur identified as the "Attending" provider or an "Operating" provider for the encounter.

This is the class of the provider at the time of the encounter.

and time of the appointment, not the time the provider performed the clinical event.

The date may be an imprecise date.

Date and time may be within 30 days before or after the visit date, with the restriction the date cannot be a future date.

provider had the encounter.  The event date does not have to be the visit date, but it must be within 30 days before or after the visit, and not be a future date.

If a user wants to enter a historical provider encounter, the user should use the Historical Encounter entry action to document the historical encounter with the provider. Historical entries will not be eligible for

credit.

PCE Data Sources for automatic (scanning) data capture will be blank unless the event date and time are passed to PCE for filing.  APCDALVR Variable = APCDALVR("APCDTCDT")

APCDALVR Variable = APCDALVR("APCDTPRV")

APCDALVR Variable = APCDALVR("APCDTCLN")

APCDALVR Variable = APCDALVR("APCDTEPR")

APCDALVR Variable = APCDALVR("APCDTPNT")

APCDALVR Variable = APCDALVR("APCDTEXK")

APCDALVR Variable = APCDALVR("APCDTOPR")

1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^AUPNVPRV(D0,12)):^(12),1:"") S X=$P(Y(1),U,17),X=X S DIU=X K Y S X=DIV I '$G(APCDVMUX) S X=DUZ X ^DD(9000010.06,1216,1,1,1.4)

1.4)= S DIH=$G(^AUPNVPRV(DIV(0),12)),DIV=X S $P(^(12),U,17)=DIV,DIH=9000010.06,DIG=1217 D ^DICR

2)= Q

CREATE VALUE)= I '$G(APCDVMUX) S X=DUZ

DELETE VALUE)= NO EFFECT

FIELD)= #1217

1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^AUPNVPRV(D0,12)):^(12),1:"") S X=$P(Y(1),U,18),X=X S DIU=X K Y S X=DIV I '$G(APCDVMUX) S X=$$NOW^XLFDT X ^DD(9000010.06,1216,1,2,1.4)

1.4)= S DIH=$G(^AUPNVPRV(DIV(0),12)),DIV=X S $P(^(12),U,18)=DIV,DIH=9000010.06,DIG=1218 D ^DICR

2)= Q

CREATE VALUE)= I '$G(APCDVMUX) S X=$$NOW^XLFDT

DELETE VALUE)= NO EFFECT

FIELD)= #1218

1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^AUPNVPRV(D0,12)):^(12),1:"") S X=$P(Y(1),U,19),X=X S DIU=X K Y S X=DIV I '$G(APCDVMUX) S X=DUZ X ^DD(9000010.06,1218,1,1,1.4)

1.4)= S DIH=$G(^AUPNVPRV(DIV(0),12)),DIV=X S $P(^(12),U,19)=DIV,DIH=9000010.06,DIG=1219 D ^DICR

2)= Q

CREATE VALUE)= I '$G(APCDVMUX) S X=DUZ

DELETE VALUE)= NO EFFECT

FIELD)= #1219

This field is automatically set to 1 if PCE detects that any original provider data is being edited.

PCE filing logic automatically compares the before and after pictures of the record to ddetermine if the edited flag should be set to "1".

This field is populated automatically by the PCE filing logic.  The formt of the field is as follows:  Pointer to PCE data source file_"-"_A for Add or E for Edit_"-"DUZ of the persion who entered the data_";"...

If the record is a new record, then an "A" is used to specify the source that added the data.  If the record existed previously, PCE filing logic compares the old and new records of information.  An "E" will be

automatically used if the filing logic finds the data has been edited.  If "E" is used, then the Edited Flag field is automatically set to 1.

The DUZ is stored in its internal format to represent the user who performed the addition or editing of data for this record.

Iterations of editing will be concatenated to the previous data source value, up to 85 characters.

This is a comment related to the patient's provider.  The provider may enter this manually via the PCE User Interface.

UNEDITABLE

UNEDITABLE

UNEDITABLE