Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details |  All
Print Page as PDF
Sub-Field: 9001002.212

Package: Patient Care Component

PCC DATA ENTRY DM UPDATE(#9001002.2)-->9001002.212

Sub-Field: 9001002.212


Information

Parent File Name Number Package
PCC DATA ENTRY DM UPDATE(#9001002.2) DM EDUCATION 9001002.212 Patient Care Component

Details

Field # Name Loc Type Details
.01 DM EDUCATION 0;1 POINTER TO EDUCATION TOPICS FILE (#9999999.09) EDUCATION TOPICS(#9999999.09)

  • INPUT TRANSFORM:  S DIC("S")="I '$P(^(0),U,3)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 04, 2010
  • SCREEN:  S DIC("S")="I '$P(^(0),U,3)"
  • EXPLANATION:  MUST BE AN ACTIVE TOPIC.
  • CROSS-REFERENCE:  9001002.212^B
    1)= S ^APCDDMUP(DA(1),12,"B",$E(X,1,30),DA)=""
    2)= K ^APCDDMUP(DA(1),12,"B",$E(X,1,30),DA)
.02 DATE EDUCATION DONE 0;2 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X D:$D(X) VSIT01^APCDDMUP
  • LAST EDITED:  MAR 16, 2000
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.03 LEVEL OF UNDERSTANDING 0;3 SET
  • '1' FOR POOR;
  • '2' FOR FAIR;
  • '3' FOR GOOD;
  • '4' FOR GROUP-NO ASSESSMENT;
  • '5' FOR REFUSED;

  • LAST EDITED:  MAR 06, 2000
.04 PROVIDER 0;4 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUL 09, 2002
.05 OBJECTIVES MET 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  FEB 02, 2004
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
.06 INDIVIDUAL/GROUP 0;6 SET
  • 'I' FOR INDIVIDUAL;
  • 'G' FOR GROUP;

  • LAST EDITED:  FEB 02, 2004
.07 LENGTH 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  FEB 02, 2004
  • HELP-PROMPT:  Type a Number between 1 and 999, 0 Decimal Digits
.08 BEHAVIOR CODE 0;8 SET
  • 'GS' FOR GOAL SET;
  • 'GM' FOR GOAL MET;
  • 'GNM' FOR GOAL NOT MET;

  • LAST EDITED:  FEB 02, 2004
.09 READINESS TO LEARN 0;9 POINTER TO READINESS TO LEARN FILE (#99999.15) READINESS TO LEARN(#99999.15)

  • LAST EDITED:  MAR 04, 2010
Info |  Details |  All