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: 50.72

Package: Pharmacy Data Management

PHARMACY ORDERABLE ITEM(#50.7)-->50.72

Sub-Field: 50.72


Information

Parent File Name Number Package
PHARMACY ORDERABLE ITEM(#50.7) SYNONYM 50.72 Pharmacy Data Management

Details

Field # Name Loc Type Details
.01 SYNONYM 0;1 FREE TEXT

  • INPUT TRANSFORM:  S X=$$TRIM^XLFSTR(X,," ") K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  JUL 31, 2007
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  50.72^B
    1)= S ^PS(50.7,DA(1),2,"B",$E(X,1,30),DA)=""
    2)= K ^PS(50.7,DA(1),2,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  50.72^AC^MUMPS
    1)= I '$D(DIU(0)),'$G(PSCREATE) N PSSTEST S PSSTEST=DA(1),PSSCROSS=1,ZTIO="",ZTDTH=$H,ZTDESC="Orderable Item Update",ZTRTN="EN1^PSSPOIDT",ZTSAVE("PSSCROSS")="",ZTSAVE("PSSTEST")="" D ^%ZTLOAD K PSSCROSS Q
    2)= I '$D(DIU(0)),'$G(PSCREATE) N PSSTEST S PSSTEST=DA(1),PSSCROSS=1,ZTIO="",ZTDTH=$H,ZTDESC="Orderable Item Update",ZTRTN="EN1^PSSPOIDT",ZTSAVE("PSSCROSS")="",ZTSAVE("PSSTEST")="" D ^%ZTLOAD K PSSCROSS Q
    3)= Do Not Delete
    This is used to keep the Orderable Item up to date.  In the form of: ^PS(50.7,DA,0)
  • CROSS-REFERENCE:  50.7^C
    1)= S ^PS(50.7,"C",$E(X,1,30),DA(1),DA)=""
    2)= K ^PS(50.7,"C",$E(X,1,30),DA(1),DA)
Info |  Details |  All