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

Package: Prosthetics

PROS RETURNED/CONDEMNED(#660.1)-->660.18

Sub-Field: 660.18


Information

Parent File Name Number Package
PROS RETURNED/CONDEMNED(#660.1) FOLLOW-UP DATE 660.18 Prosthetics

Details

Field # Name Loc Type Details
.01 FOLLOW-UP DATE 0;1 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 26, 1993
  • HELP-PROMPT:  Enter followup date for loaned item.
  • DESCRIPTION:  
    Date of the follow-up action.
  • CROSS-REFERENCE:  660.18^B
    1)= S ^RMPR(660.1,DA(1),2,"B",$E(X,1,30),DA)=""
    2)= K ^RMPR(660.1,DA(1),2,"B",$E(X,1,30),DA)
1 TYPE OF CONTACT 0;2 SET
  • '1' FOR PERSONAL;
  • '2' FOR RECORD REVIEW;
  • '3' FOR TELEPHONE;
  • '4' FOR LETTER;

  • LAST EDITED:  JUL 21, 1992
  • HELP-PROMPT:  Enter type of contact with the veteran for followup activity.
  • DESCRIPTION:  
    This field stores the type of contact with the patient during the follow-up action.
Info |  Details