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 |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  All
Print Page as PDF
Global: ^BIVIMMD

Package: Immunization Tracking

Global: ^BIVIMMD


Information

FileMan FileNo FileMan Filename Package
9002084.118 BI V IMMUNIZATIONS DELETED Immunization Tracking

Description

Directly Accessed By Routines, Total: 1

Package Total Routines
Immunization Tracking 1 BIVISIT2    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Immunization Tracking 1 BI V IMMUNIZATIONS DELETED(#9002084.118)[1208]    

Pointer To FileMan Files, Total: 14

Package Total FileMan Files
Immunization Tracking 4 BI TABLE ELIGIBILITY CODES(#9002084.83)[.14]    BI TABLE NDC CODES(#9002084.95)[.16]    BI TABLE REACTION(#9002084.8)[.06]    BI V IMMUNIZATIONS DELETED(#9002084.118)[1208]    
IHS Patient 2 PATIENT(#9000001)[.02]    VISIT(#9000010)[.03]    
Kernel 2 PACKAGE(#9.4)[81202]    NEW PERSON(#200)[2.0112021204121412171219]    
Scheduling 2 CLINIC STOP(#40.7)[1203]    HOSPITAL LOCATION(#44)[1215]    
Utility Tables 2 IMMUNIZATION LOT(#9999999.41)[.05]    IMMUNIZATION(#9999999.14)[.01]    
DRG Grouper 1 ICD DIAGNOSIS(#80)[1213]    
PCE Patient Care Encounter 1 PCE DATA SOURCE(#839.7)[81203]    

Fields, Total: 43

Field # Name Loc Type Details
.01 IMMUNIZATION 0;1 POINTER TO IMMUNIZATION FILE (#9999999.14)
************************REQUIRED FIELD************************
IMMUNIZATION(#9999999.14)

  • LAST EDITED:  MAY 06, 2013
  • HELP-PROMPT:  Enter the name of the immunization given to the patient.
  • DESCRIPTION:  
    This is the type of immunization that was given to the patient at the encounter.
  • TECHNICAL DESCR:  
    Entries in the Immunization File (#9999999.14) may be made inactive.  Inactive entries cannot be selected.  APCDALVR Variable = APCDALVR("APCDTIMM")
  • CROSS-REFERENCE:  9002084.118^B
    1)= S ^BIVIMMD("B",$E(X,1,30),DA)=""
    2)= K ^BIVIMMD("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9002084.118^AV9^MUMPS
    1)= S:$D(APCDLOOK) DIC("DR")=""
    2)= Q
  • CROSS-REFERENCE:  9002084.118^AATOO^MUMPS
    1)= I $P(^BIVIMMD(DA,0),U,2)]"",$P(^(0),U,3)]"" S ^BIVIMMD("AA",$P(^BIVIMMD(DA,0),U,2),X,(9999999-$P(+^AUPNVSIT($P(^BIVIMMD(DA,0),U,3),0),".",1)),DA)=""
    2)= I $P(^BIVIMMD(DA,0),U,2)]"",$P(^(0),U,3)]"" K ^BIVIMMD("AA",$P(^BIVIMMD(DA,0),U,2),X,(9999999-$P(+^AUPNVSIT($P(^BIVIMMD(DA,0),U,3),0),".",1)),DA)
    This cross-reference is used for searches in sequence by patient, immunization internal entry, inverted visit date, and internal entry number.
    "AA",PATIENT,IMMUNIZATION,VISIT,DA
  • CROSS-REFERENCE:  9002084.118^AQTOO^MUMPS
    1)= S:$P($G(^AUTTSITE(1,0)),U,19)="Y" ^BIVIMMD("AQ",(X_";"_$P($G(^BIVIMMD(DA,0)),U,4)),DA)=""
    2)= K:$P($G(^AUTTSITE(1,0)),U,19)="Y" ^BIVIMMD("AQ",(X_";"_$P($G(^BIVIMMD(DA,0)),U,4)),DA),^BIVIMMD("AQ",(X_";"),DA)
    Q-MAN XREF
  • RECORD INDEXES:  AMAP (#476)
.02 PATIENT NAME 0;2 POINTER TO PATIENT FILE (#9000001)
************************REQUIRED FIELD************************
PATIENT(#9000001)

  • LAST EDITED:  APR 05, 1988
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDPAT")
    UNEDITABLE
  • CROSS-REFERENCE:  9002084.118^AC
    1)= S ^BIVIMMD("AC",$E(X,1,30),DA)=""
    2)= K ^BIVIMMD("AC",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9002084.118^AATOO2^MUMPS
    1)= I $P(^BIVIMMD(DA,0),U,3)]"" S ^BIVIMMD("AA",X,+^BIVIMMD(DA,0),(9999999-$P(+^AUPNVSIT($P(^BIVIMMD(DA,0),U,3),0),".",1)),DA)=""
    2)= I $P(^BIVIMMD(DA,0),U,3)]"" K ^BIVIMMD("AA",X,+^BIVIMMD(DA,0),(9999999-$P(+^AUPNVSIT($P(^BIVIMMD(DA,0),U,3),0),".",1)),DA)
.03 VISIT 0;3 POINTER TO VISIT FILE (#9000010)
************************REQUIRED FIELD************************
VISIT(#9000010)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,5)=$P(^BIVIMMD(DA,0),U,2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 08, 1989
  • HELP-PROMPT:  Enter the visit date/time for the encounter where the immunization was given.
  • DESCRIPTION:  
    This is the encounter defined in the Visit file that represents when and where the immunization was given.
  • TECHNICAL DESCR:  
    This is a pointer to the Visit File (#9000010).  This field is stuffed by the applications. No editing is allowed.  APCDALVR Variable = APCDALVR("APCDVSIT")
  • SCREEN:  S DIC("S")="I $P(^(0),U,5)=$P(^BIVIMMD(DA,0),U,2)"
  • EXPLANATION:  VISIT MUST BE FOR CURRENT PATIENT
    UNEDITABLE
  • CROSS-REFERENCE:  9002084.118^AD
    1)= S ^BIVIMMD("AD",$E(X,1,30),DA)=""
    2)= K ^BIVIMMD("AD",$E(X,1,30),DA)
    This cross-reference is used for searches by the visit pointer and internal entry number.
    "AD",VISIT pointer, DA
  • CROSS-REFERENCE:  9002084.118^AA^MUMPS
    1)= Q:$P(^BIVIMMD(DA,0),U,2)=""  S ^BIVIMMD("AA",$P(^BIVIMMD(DA,0),U,2),+^BIVIMMD(DA,0),(9999999-$P(+^AUPNVSIT(X,0),".",1)),DA)=""
    2)= Q:$P(^BIVIMMD(DA,0),U,2)=""  K ^BIVIMMD("AA",$P(^BIVIMMD(DA,0),U,2),+^BIVIMMD(DA,0),(9999999-$P(+^AUPNVSIT(X,0),".",1)),DA)
    This crossreference is used for searches in sequence by patient, Immunization pointer, inverted visit date, and internal entry number.
    "AA",PATIENT,IMMUNIZATION,VISIT,DA
  • CROSS-REFERENCE:  9002084.118^AV10^MUMPS
    1)= D ADD^AUPNVSIT
    2)= D SUB^AUPNVSIT
    This cross-reference adds and subtracts from the dependent entry count in the VISIT file.
  • CROSS-REFERENCE:  9002084.118^ADT^MUMPS
    1)= S ^BIVIMMD("ADT",$P(+^AUPNVSIT(X,0),"."),X,DA)=""
    2)= K ^BIVIMMD("ADT",$P(+^AUPNVSIT(X,0),"."),X,DA)
  • RECORD INDEXES:  AMAP (#476)
.04 SERIES 0;4 SET
  • 'P' FOR PARTIALLY COMPLETE;
  • 'C' FOR COMPLETE;
  • 'B' FOR BOOSTER;
  • '1' FOR SERIES 1;
  • '2' FOR SERIES 2;
  • '3' FOR SERIES 3;
  • '4' FOR SERIES 4;
  • '5' FOR SERIES 5;
  • '6' FOR SERIES 6;
  • '7' FOR SERIES 7;
  • '8' FOR SERIES 8;

  • LAST EDITED:  SEP 01, 1995
  • HELP-PROMPT:  Enter the series number, booster, partial or complete.
  • DESCRIPTION:  
    This field allows the provider to specify which series of immunization type was given to the patient.
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTSER")
  • CROSS-REFERENCE:  9002084.118^AQ^MUMPS
    1)= N % S %=$S($P($G(^AUTTSITE(1,0)),U,19)="Y":1,1:0) K:% ^BIVIMMD("AQ",$P(^BIVIMMD(DA,0),U)_";",DA) S:% ^BIVIMMD("AQ",($P(^BIVIMMD(DA,0),U)_";"_X),DA)=""
    2)= N % S %=$S($P($G(^AUTTSITE(1,0)),U,19)="Y":1,1:0) K:% ^BIVIMMD("AQ",($P(^BIVIMMD(DA,0),U)_";"_X),DA) S:% ^BIVIMMD("AQ",($P(^BIVIMMD(DA,0),U)_";"),DA)=""
    Q-MAN XREF
.05 LOT 0;5 POINTER TO IMMUNIZATION LOT FILE (#9999999.41) IMMUNIZATION LOT(#9999999.41)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,3)=0,$D(^AUTTIML(""C"",$P(^BIVIMMD(DA,0),U,1),Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  AUG 16, 1989
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTLOT")
  • SCREEN:  S DIC("S")="I $P(^(0),U,3)=0,$D(^AUTTIML(""C"",$P(^BIVIMMD(DA,0),U,1),Y))"
  • EXPLANATION:  LOT MUST BE AVAILABLE AND MUST BE A VALID LOT FOR THE IMMUNIZATION BEING ENTERED.
.06 REACTION 0;6 POINTER TO BI TABLE REACTION FILE (#9002084.8) BI TABLE REACTION(#9002084.8)

  • LAST EDITED:  AUG 26, 2003
  • HELP-PROMPT:  Enter the number representing the patients reaction to the immunization.
  • DESCRIPTION:  
    This is the reaction that may have been observed by the provider as a result of the immunization given.
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTREC")
.07 *CONTRAINDICATED 0;7 SET
  • '1' FOR YES (DO NOT REPEAT THIS VACCINE).;
  • '0' FOR NO (OK TO USE IN THE FUTURE);

  • LAST EDITED:  OCT 08, 1998
  • HELP-PROMPT:  Enter 1 if this immunization should not be given to the patient in the future.
  • DESCRIPTION:  
    This field allows the immunization to be recorded as contraindicated.  Reminders will include a check to see if the previous immunization was contraindicated before creating reminders.
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTCON")
.08 DOSE OVERRIDE 0;8 SET
  • '0' FOR @;
  • '1' FOR INVALID--BAD STORAGE;
  • '2' FOR INVALID--DEFECTIVE;
  • '3' FOR INVALID--EXPIRED;
  • '4' FOR INVALID--ADMIN ERROR;
  • '9' FOR FORCED VALID;

  • LAST EDITED:  JAN 13, 2005
.09 INJECTION SITE 0;9 SET
  • 'LTI' FOR Left Thigh IM;
  • 'LTS' FOR Left Thigh SQ;
  • 'RTI' FOR Right Thigh IM;
  • 'RTS' FOR Right Thigh SQ;
  • 'BTI' FOR Both Thighs IM;
  • 'LDI' FOR Left Deltoid IM;
  • 'LAS' FOR Left Arm SQ;
  • 'RDI' FOR Right Deltoid IM;
  • 'RAS' FOR Right Arm SQ;
  • 'O' FOR Oral;
  • 'IN' FOR Intranasal;
  • 'LID' FOR Left Arm Intradermal;
  • 'RID' FOR Right Arm Intradermal;

  • LAST EDITED:  MAY 31, 2011
  • HELP-PROMPT:  ENTER THE BODY SITE WHERE THE INJECTION WAS GIVEN.
.11 VOLUME 0;11 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>5)!(X<0)!(X?.E1"."3N.N) X
  • LAST EDITED:  AUG 27, 2003
  • HELP-PROMPT:  Type a Number between 0 and 5, 2 Decimal Digits
.12 DATE OF VAC INFO STATEMENT 0;12 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 08, 1998
.13 CREATED BY V CPT ENTRY 0;13 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  AUG 14, 2005
  • HELP-PROMPT:  Enter the IEN of the V CPT entry that created this V Immunization.
.14 VAC ELIGIBILITY 0;14 POINTER TO BI TABLE ELIGIBILITY CODES FILE (#9002084.83) BI TABLE ELIGIBILITY CODES(#9002084.83)

  • LAST EDITED:  AUG 30, 2012
  • HELP-PROMPT:  Enter the patient's VFC Eligibility on this visit.
.15 IMPORT FROM OUTSIDE REGISTRY 0;15 SET
  • '1' FOR IMPORTED;
  • '0' FOR NOT IMPORTED;
  • '2' FOR EDITED AFTER IMPORT;

  • LAST EDITED:  FEB 22, 2010
  • HELP-PROMPT:  Enter 1 if this immunization was imported from an outside registry.
.16 NDC 0;16 POINTER TO BI TABLE NDC CODES FILE (#9002084.95) BI TABLE NDC CODES(#9002084.95)

  • LAST EDITED:  AUG 17, 2011
  • HELP-PROMPT:  Select the NDC Code for this immunization. Enter
1 ADMINISTRATIVE NOTES 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>160!($L(X)<1) X
  • LAST EDITED:  MAY 24, 2013
  • HELP-PROMPT:  Answer must be 1-160 characters in length
2.01 IMMUNIZATION DELETED BY 2;1 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAY 29, 2013
2.02 DATE/TIME IMMUNIZATION DELETED 2;2 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  MAY 29, 2013
  • HELP-PROMPT:  (No range limit on date)
2.03 REASON IMMUNIZATION DELETED 812;4 SET
  • 'd' FOR Duplicate;
  • 'e' FOR Entered in Error;
  • 'o' FOR Other;

  • LAST EDITED:  MAY 29, 2013
2.04 REASON IF OTHER 2;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>100!($L(X)<2) X
  • LAST EDITED:  MAY 29, 2013
  • HELP-PROMPT:  Answer must be 2-100 characters in length
1101 REMARKS 11;0 WORD-PROCESSING #9002084.1191
1201 EVENT DATE AND TIME 12;1 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 01, 1994
  • HELP-PROMPT:  Enter the date and time the immunization was given.
  • DESCRIPTION:  This is the date and time the immunization was given. This date and time may be different from the visit date and time. For example, for clinic appointment visits, the visit date and time is the date 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 of after the visit date, with the restriction the date cannot be a future date.
  • TECHNICAL DESCR:  The PCE User Interface, which allows manual entry of data, will be the primary source of the immunization date and time. The immunization date prompt defaults to the visit date and the time is entered to reflect the
    actual time the immunization was given.  The immunization 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 the user wants to enter an historical immunization, the user should use the Historical Encounter entry action to document the historical immunization. Historical entries will not be eligible for credit.
    PCE data sources for automatic (scanning) data capture will be blank unless the immunization date and time are passed to PCE for filing.  APCDALVR Variable = APCDALVR("APCDTCDT")
1202 ORDERING PROVIDER 12;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^VA(200,""AK.PROVIDER"",$P(^(0),U)))",D="AK.PROVIDER" D IX^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  APR 25, 1994
  • HELP-PROMPT:  Enter the provider who ordered this immunization.
  • DESCRIPTION:  
    The field can be used to document the provider who ordered the immunization.
  • TECHNICAL DESCR:  
    The person entered here must hold the "AK.PROVIDER" security key.  APCDALVR Variable = APCDALVR("APCDTPRV")
  • SCREEN:  S DIC("S")="I $D(^VA(200,""AK.PROVIDER"",$P(^(0),U)))"
  • EXPLANATION:  Select the ordering Provider
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
1203 CLINIC 12;3 POINTER TO CLINIC STOP FILE (#40.7) CLINIC STOP(#40.7)

  • LAST EDITED:  JUL 09, 1996
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTCLN")
1204 ENCOUNTER PROVIDER 12;4 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  DEC 19, 1994
  • HELP-PROMPT:  Enter the provider who gave the immunization.
  • DESCRIPTION:  
    This is the provider who gave the immunization.
  • TECHNICAL DESCR:  
    This person can be any person in the new person file.  The person does not have to hold the "AK.PROVIDER" security key.  APCDALVR Variable = APCDALVR("APCDTEPR")
1208 PARENT 12;8 POINTER TO BI V IMMUNIZATIONS DELETED FILE (#9002084.118) BI V IMMUNIZATIONS DELETED(#9002084.118)

  • LAST EDITED:  JUL 09, 1996
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTPNT")
1209 EXTERNAL KEY 12;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  SEP 25, 1996
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTEXK")
1210 OUTSIDE PROVIDER NAME 12;10 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  SEP 25, 1996
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • TECHNICAL DESCR:  
    APCDALVR Variable = APCDALVR("APCDTOPR")
1213 ANCILLARY POV 12;13 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • LAST EDITED:  SEP 19, 2003
1214 USER LAST UPDATE 12;14 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JAN 10, 2007
1215 ORDERING LOCATION 12;15 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • LAST EDITED:  FEB 19, 2008
1216 DATE/TIME ENTERED 12;16 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 23, 2012
  • CROSS-REFERENCE:  ^^TRIGGER^9002084.118^1217
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^BIVIMMD(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(9002084.118,1216,1,1,1.4)
    1.4)= S DIH=$G(^BIVIMMD(DIV(0),12)),DIV=X S $P(^(12),U,17)=DIV,DIH=9002084.118,DIG=1217 D ^DICR
    2)= Q
    CREATE VALUE)= I '$G(APCDVMUX) S X=DUZ
    DELETE VALUE)= NO EFFECT
    FIELD)= #1217
  • CROSS-REFERENCE:  ^^TRIGGER^9002084.118^1218
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^BIVIMMD(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(9002084.118,1216,1,2,1.4)
    1.4)= S DIH=$G(^BIVIMMD(DIV(0),12)),DIV=X S $P(^(12),U,18)=DIV,DIH=9002084.118,DIG=1218 D ^DICR
    2)= Q
    CREATE VALUE)= I '$G(APCDVMUX) S X=$$NOW^XLFDT
    DELETE VALUE)= NO EFFECT
    FIELD)= #1218
1217 ENTERED BY 12;17 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAR 01, 2012
  • NOTES:  TRIGGERED by the DATE/TIME ENTERED field of the BI V IMMUNIZATIONS DELETED File
1218 DATE/TIME LAST MODIFIED 12;18 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 23, 2012
  • NOTES:  TRIGGERED by the DATE/TIME ENTERED field of the BI V IMMUNIZATIONS DELETED File
  • CROSS-REFERENCE:  ^^TRIGGER^9002084.118^1219
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^BIVIMMD(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(9002084.118,1218,1,1,1.4)
    1.4)= S DIH=$G(^BIVIMMD(DIV(0),12)),DIV=X S $P(^(12),U,19)=DIV,DIH=9002084.118,DIG=1219 D ^DICR
    2)= Q
    CREATE VALUE)= I '$G(APCDVMUX) S X=DUZ
    DELETE VALUE)= NO EFFECT
    FIELD)= #1219
1219 LAST MODIFIED BY 12;19 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAR 01, 2012
  • NOTES:  TRIGGERED by the DATE/TIME LAST MODIFIED field of the BI V IMMUNIZATIONS DELETED File
2601 SNOMED CT 26;0 Multiple #9002084.1206 9002084.1206
2701 LOINC CODES 27;0 Multiple #9002084.1207 9002084.1207
80101 EDITED FLAG 801;1 SET
  • '1' FOR EDITED;

  • LAST EDITED:  APR 01, 1994
  • HELP-PROMPT:  Answer is automatically entered by PCE filing logic.
  • DESCRIPTION:  
    This field is automatically set to 1 if PCE detects that any original immunization data is being edited.
  • TECHNICAL DESCR:  
    PCE filing logic automatically compares the before and after pictures of the record to determine if the edited flag should be set to "1".
80102 AUDIT TRAIL 801;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>85!($L(X)<2) X
  • LAST EDITED:  MAY 09, 1996
  • HELP-PROMPT:  Answer is automatically entered by the PCE filing logic.
  • DESCRIPTION:  
    This field is populated automatically by the PCE filing logic.  The format of the field is as follows:  Pointer to PCE data source file_"-"_A for Add or E for Edit_" "_DUZ of the person who entred the data_";"...
  • TECHNICAL DESCR:  The PCE filing logic requires a pointer to the PCE data source file. If this is not passed, the PCE filing logic will not process 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 informtion.  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 adding or editing of data for this record.
    Iterations of editing will be concatenated to the previous data source value, up to 85 characters.
81101 COMMENTS 811;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>245!($L(X)<1) X
  • LAST EDITED:  JUL 11, 1995
  • HELP-PROMPT:  Enter a comment 1-245 characters in length.
  • DESCRIPTION:  
    This is a comment related to the patient's immunization.  The provider may enter this manually via the PCE User Interface.
81201 VERIFIED 812;1 SET
  • '1' FOR ELECTRONICALLY SIGNED;
  • '2' FOR VERIFIED BY PACKAGE;

  • LAST EDITED:  MAY 09, 1996
    UNEDITABLE
81202 PACKAGE 812;2 POINTER TO PACKAGE FILE (#9.4) PACKAGE(#9.4)

  • LAST EDITED:  MAY 09, 1996
    UNEDITABLE
81203 DATA SOURCE 812;3 POINTER TO PCE DATA SOURCE FILE (#839.7) PCE DATA SOURCE(#839.7)

  • LAST EDITED:  MAY 09, 1996
    UNEDITABLE
Info |  Desc |  Directly Accessed By Routines |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  All