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

Package: Drug Accountability

DRUG ACCOUNTABILITY ORDER(#58.811)-->58.8112-->58.81126

Sub-Field: 58.81126


Information

Parent File Name Number Package
58.8112 CREDITS 58.81126 Drug Accountability

Details

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

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  NOV 07, 1996
  • HELP-PROMPT:  Enter the credit memo number. If there is no credit memo number, enter "None".
  • DESCRIPTION:  
    The CREDIT MEMO field contains the credit memo number issued against the invoice.
  • CROSS-REFERENCE:  58.81126^B
    1)= S ^PSD(58.811,DA(2),1,DA(1),2,"B",$E(X,1,30),DA)=""
    2)= K ^PSD(58.811,DA(2),1,DA(1),2,"B",$E(X,1,30),DA)
    3)= DO NOT DELETE!
    This cross-reference is used to locate a credit memo number.
1 CREDIT DATE 0;2 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 07, 1996
  • HELP-PROMPT:  Enter the date the credit memo was issued.
  • DESCRIPTION:  
    The CREDIT DATE field contains the date the credit memo was issued.
2 AMOUNT 0;3 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>999999999)!(X<-999999999) X
  • LAST EDITED:  FEB 26, 1997
  • HELP-PROMPT:  Enter the credit memo amount.
  • DESCRIPTION:  
    The AMOUNT field contains the dollar value of the credit issued.
3 REASON 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  FEB 28, 1997
  • HELP-PROMPT:  Enter the reason the credit was issued. Enter 1-40 characters.
  • DESCRIPTION:  
    The REASON field contains the explanation why the credit memo was issued.
Info |  Details |  All