BTPW1PSU.m

BTPW1PSU ;VNGT/HS/BEE-Post Installation Overflow for CMET ; 24 Apr 2008  7:46 PM

 ;;1.0;CARE MANAGEMENT EVENT TRACKING;;Feb 07, 2011

 ;

 Q

 ;

TPS ;EP - Set tooltips

 N BI,TEXT

 F BI=1:1 S TEXT=$P($T(TIP+BI),";;",2) Q:TEXT=""  D

 . N CODE,IEN,BJ,TXT,HELP,ERROR

 . S CODE=$P(TEXT,"~",1)

 . S IEN=$O(^BQI(90506.1,"B",CODE,"")) I IEN="" Q

 . F BJ=1:1 S TXT=$P($T(@CODE+BJ),";;",2) Q:TXT=""  D

 .. S HELP(BJ)=TXT

 . D WP^DIE(90506.1,IEN_",",4,"","HELP","ERROR")

 K BI,TEXT

 ;

 Q

 ;

TIP ;  Tooltips

 ;;BTPWNCAT

 ;;BTPWNEDT

 ;;BTPWNENM

 ;;BTPWNPEV

 ;;BTPWQCAT

 ;;BTPWQEDT

 ;;BTPWQENM

 ;;BTPWQRES

 ;;BTPWQSTS

 ;;BTPWTCAT

 ;;BTPWTEDT

 ;;BTPWTENM

 ;;BTPWTFDA

 ;;BTPWTFND

 ;;BTPWTFUA

 ;;BTPWTFUP

 ;;BTPWTNOA

 ;;BTPWTNOT

 ;;BTPWTSTA

 Q

 ;

BTPWNCAT ;

 ;;Events are categorized into Breast; Cervical; Colon; and Skeletal.

 Q

 ;

BTPWNEDT ;

 ;;The date by which the recommended Follow-up is to occur.

 Q

 ;

BTPWNENM ;

 ;;This is the recommended Follow-up entered in CMET.

 Q

 ;

BTPWNPEV ;

 ;;The event date of the preceding event.

 Q

 ;

BTPWQCAT ;

 ;;Events are categorized into Breast; Cervical; Colon; and Skeletal.

 Q

 ;

BTPWQEDT ;

 ;;The date the event was performed.  Access the visit by clicking on the

 ;;link.

 Q

 ;

BTPWQENM ;

 ;;Events are procedures, exams or tests that have been documented in RPMS.

 ;;Events are predefined. See the CMET Glossary for a list of events.

 Q

 ;

BTPWQRES ;

 ;;Access available results by clicking on the link.

 Q

 ;

BTPWQSTS ;

 ;;Statuses include Pending, Tracked, or Not Tracked.

 Q

 ;

BTPWTCAT ;

 ;;Events are categorized into Breast; Cervical; Colon; and Skeletal.

 Q

 ;

BTPWTEDT ;

 ;;The date the event was performed.  Access the visit by clicking on the

 ;;link.

 Q

 ;

BTPWTENM ;

 ;;Events are procedures, exams or tests that have been documented in RPMS.

 ;;Events are predefined. See the CMET Glossary for a list of events.

 Q

 ;

BTPWTFDA ;

 ;;The finding information associated with this event: Finding; Finding Interpretation; Finding Date; Finding Comments;

 ;;Last Modified By; Last Modified Date

 Q

 ;

BTPWTFND ;

 ;;The Feather icon  indicates entry of the Finding is past due based on

 ;;Tickler Timeframes.  The Checkmark icon indicates the Finding has been

 ;;entered.  An empty cell indicates that a finding has not been entered and

 ;;is not past due.

 Q

 ;

BTPWTFUA ;

 ;;The follow-up information associated with this event: Follow-up; Follow-up Entered By; Follow-up Entered Date;

 ;;Follow-up Due By; Next Follow-up

 Q

 ;

BTPWTFUP ;

 ;;The Feather icon indicates entry of the recommended Follow-up is past due

 ;;based on Tickler Timeframes.  The Checkmark icon indicates the Follow-up

 ;;has been entered.  An empty cell indicates that a decision regarding the

 ;;Follow-up has not been entered and is not past due.

 Q

 ;

BTPWTNOA ;

 ;;The notification information associated with this event: Notification Date; Notification Type; Notification Entered Date;

 ;;Notification Entered By; Notification Document; Notification Notes

 Q

 ;

BTPWTNOT ;

 ;;The Feather icon indicates entry of the type of Patient Notification is

 ;;past due based on Tickler Timeframes.  The Checkmark icon indicates the

 ;;type of Patient Notification has been entered.  An empty cell indicates

 ;;that the type of Patient Notification has not been entered but is not

 ;;past due.

 Q

 ;

BTPWTSTA ;

 ;;The state of a CMET is either Open or Closed.

 Q

BTPW1PSU  ;VNGT/HS/BEE-Post Installation Overflow for CMET ; 24 Apr 2008  7:46 PM

 +1       ;;1.0;CARE MANAGEMENT EVENT TRACKING;;Feb 07, 2011

 +2       ;

 +3        QUIT 

 +4       ;

TPS       ;EP - Set tooltips

 +1        NEW BI,TEXT

 +2        FOR BI=1:1

               SET TEXT=$PIECE($TEXT(TIP+BI),";;",2)

               IF TEXT=""

                   QUIT 

               Begin DoDot:1

 +3                NEW CODE,IEN,BJ,TXT,HELP,ERROR

 +4                SET CODE=$PIECE(TEXT,"~",1)

 +5                SET IEN=$ORDER(^BQI(90506.1,"B",CODE,""))

                   IF IEN=""

                       QUIT 

 +6                FOR BJ=1:1

                       SET TXT=$PIECE($TEXT(@CODE+BJ),";;",2)

                       IF TXT=""

                           QUIT 

                       Begin DoDot:2

 +7                        SET HELP(BJ)=TXT

                       End DoDot:2

 +8                DO WP^DIE(90506.1,IEN_",",4,"","HELP","ERROR")

               End DoDot:1

 +9        KILL BI,TEXT

 +10      ;

 +11       QUIT 

 +12      ;

TIP       ;  Tooltips

 +1       ;;BTPWNCAT

 +2       ;;BTPWNEDT

 +3       ;;BTPWNENM

 +4       ;;BTPWNPEV

 +5       ;;BTPWQCAT

 +6       ;;BTPWQEDT

 +7       ;;BTPWQENM

 +8       ;;BTPWQRES

 +9       ;;BTPWQSTS

 +10      ;;BTPWTCAT

 +11      ;;BTPWTEDT

 +12      ;;BTPWTENM

 +13      ;;BTPWTFDA

 +14      ;;BTPWTFND

 +15      ;;BTPWTFUA

 +16      ;;BTPWTFUP

 +17      ;;BTPWTNOA

 +18      ;;BTPWTNOT

 +19      ;;BTPWTSTA

 +20       QUIT 

 +21      ;

BTPWNCAT  ;

 +1       ;;Events are categorized into Breast; Cervical; Colon; and Skeletal.

 +2        QUIT 

 +3       ;

BTPWNEDT  ;

 +1       ;;The date by which the recommended Follow-up is to occur.

 +2        QUIT 

 +3       ;

BTPWNENM  ;

 +1       ;;This is the recommended Follow-up entered in CMET.

 +2        QUIT 

 +3       ;

BTPWNPEV  ;

 +1       ;;The event date of the preceding event.

 +2        QUIT 

 +3       ;

BTPWQCAT  ;

 +1       ;;Events are categorized into Breast; Cervical; Colon; and Skeletal.

 +2        QUIT 

 +3       ;

BTPWQEDT  ;

 +1       ;;The date the event was performed.  Access the visit by clicking on the

 +2       ;;link.

 +3        QUIT 

 +4       ;

BTPWQENM  ;

 +1       ;;Events are procedures, exams or tests that have been documented in RPMS.

 +2       ;;Events are predefined. See the CMET Glossary for a list of events.

 +3        QUIT 

 +4       ;

BTPWQRES  ;

 +1       ;;Access available results by clicking on the link.

 +2        QUIT 

 +3       ;

BTPWQSTS  ;

 +1       ;;Statuses include Pending, Tracked, or Not Tracked.

 +2        QUIT 

 +3       ;

BTPWTCAT  ;

 +1       ;;Events are categorized into Breast; Cervical; Colon; and Skeletal.

 +2        QUIT 

 +3       ;

BTPWTEDT  ;

 +1       ;;The date the event was performed.  Access the visit by clicking on the

 +2       ;;link.

 +3        QUIT 

 +4       ;

BTPWTENM  ;

 +1       ;;Events are procedures, exams or tests that have been documented in RPMS.

 +2       ;;Events are predefined. See the CMET Glossary for a list of events.

 +3        QUIT 

 +4       ;

BTPWTFDA  ;

 +1       ;;The finding information associated with this event: Finding; Finding Interpretation; Finding Date; Finding Comments;

 +2       ;;Last Modified By; Last Modified Date

 +3        QUIT 

 +4       ;

BTPWTFND  ;

 +1       ;;The Feather icon  indicates entry of the Finding is past due based on

 +2       ;;Tickler Timeframes.  The Checkmark icon indicates the Finding has been

 +3       ;;entered.  An empty cell indicates that a finding has not been entered and

 +4       ;;is not past due.

 +5        QUIT 

 +6       ;

BTPWTFUA  ;

 +1       ;;The follow-up information associated with this event: Follow-up; Follow-up Entered By; Follow-up Entered Date;

 +2       ;;Follow-up Due By; Next Follow-up

 +3        QUIT 

 +4       ;

BTPWTFUP  ;

 +1       ;;The Feather icon indicates entry of the recommended Follow-up is past due

 +2       ;;based on Tickler Timeframes.  The Checkmark icon indicates the Follow-up

 +3       ;;has been entered.  An empty cell indicates that a decision regarding the

 +4       ;;Follow-up has not been entered and is not past due.

 +5        QUIT 

 +6       ;

BTPWTNOA  ;

 +1       ;;The notification information associated with this event: Notification Date; Notification Type; Notification Entered Date;

 +2       ;;Notification Entered By; Notification Document; Notification Notes

 +3        QUIT 

 +4       ;

BTPWTNOT  ;

 +1       ;;The Feather icon indicates entry of the type of Patient Notification is

 +2       ;;past due based on Tickler Timeframes.  The Checkmark icon indicates the

 +3       ;;type of Patient Notification has been entered.  An empty cell indicates

 +4       ;;that the type of Patient Notification has not been entered but is not

 +5       ;;past due.

 +6        QUIT 

 +7       ;

BTPWTSTA  ;

 +1       ;;The state of a CMET is either Open or Closed.

 +2        QUIT