Select the objects that you wish to see in the downloaded PDF
JUL 30, 2013
9001303.06^B
1)= S ^APCMM24L("B",$E(X,1,30),DA)=""
2)= K ^APCMM24L("B",$E(X,1,30),DA)
K:$L(X)>12!($L(X)<1) X
APR 07, 2010
Answer must be 1-12 characters in length.
9001303.06^C
1)= S ^APCMM24L("C",$E(X,1,30),DA)=""
2)= K ^APCMM24L("C",$E(X,1,30),DA)
K:$L(X)>120!($L(X)<1) X
JUL 14, 2004
Answer must be 1-120 characters in length.
FEB 15, 2011
9001303.06^AR^MUMPS
1)= S ^APCMM24L("AR",+^APCMM24L(DA,0),X,DA)=""
2)= K ^APCMM24L("AR",+^APCMM24L(DA,0),X,DA)
K:+X'=X!(X>999)!(X<1)!(X?.E1"."1.N) X
DEC 05, 2007
Type a number between 1 and 999, 0 Decimal Digits
9001303.06^AEP^MUMPS
1)= S ^APCMM24L("AEP",+^APCMM24L(DA,0),X,DA)=""
2)= K ^APCMM24L("AEP",+^APCMM24L(DA,0),X,DA)
9001303.06^AH^MUMPS
1)= S ^APCMM24L("AH",+^APCMM24L(DA,0),X,DA)=""
2)= K ^APCMM24L("AH",+^APCMM24L(DA,0),X,DA)
FEB 15, 2010
K:$L(X)>245 X D:$D(X) ^DIM
This is Standard MUMPS code.
WRITE AUTHORITY: @