Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^PSX(552.1

Package: CMOP

Global: ^PSX(552.1


Information

FileMan FileNo FileMan Filename Package
552.1 CMOP REFERENCE CMOP

Description

Directly Accessed By Routines, Total: 39

Package Total Routines
CMOP 37 LABELS PRINTED    PSXARC    PSXARC1    PSXBKD    PSXCSCMN    PSXCSDA    PSXCSHI    PSXDODQY
PSXDRPT    PSXHSYS    PSXJOB    PSXLBL    PSXLBL1    PSXLBLU    PSXLIST    PSXLKUP
PSXMST    PSXNOTE    PSXPURG    PSXPURG1    PSXQUE    PSXRECV    PSXRECV1    PSXREJ
PSXRPT    PSXRTN1    PSXSMRY    PSXSND    PSXSTAT    PSXTNRPT    PSXUNHLD    PSXUNREL
PSXVEND    PSXYSND    RELEASE DATA    RX NUMBER    ^PSX(552.1    

Accessed By FileMan Db Calls, Total: 14

Package Total Routines
CMOP 14 PSXARC    PSXARC1    PSXLBLU    PSXLIST    PSXQUE    PSXRECV    PSXRECV1    PSXSND
PSXSTAT    PSXSTRT    PSXUNHLD    PSXVEND    PSXYSND    PSXYSTRT    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
CMOP 1 CMOP MASTER DATABASE(#552.4)[.01]    

Fields, Total: 22

Field # Name Loc Type Details
.01 FACILITY BATCH REFERENCE 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1)!'(X'?1P.E) X
  • LAST EDITED:  MAY 29, 1993
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    The unique number which identifies this data transmission.
  • TECHNICAL DESCR:  
    Station number - transmission number
  • CROSS-REFERENCE:  552.1^B
    1)= S ^PSX(552.1,"B",$E(X,1,30),DA)=""
    2)= K ^PSX(552.1,"B",$E(X,1,30),DA)
    Cross reference is used to validate vendor release data prior to filing.
1 STATUS 0;2 SET
  • '1' FOR RECEIVED;
  • '2' FOR QUEUED;
  • '3' FOR PROCESSED;
  • '4' FOR CLOSED;
  • '5' FOR HOLD;
  • '6' FOR PRINTED;
  • '99' FOR REJECTED;
  • '7' FOR PROCESSING;

  • LAST EDITED:  JUL 05, 1996
  • DESCRIPTION:  The current status of this transmission.
    Received - Downloading to CMOP Database.
    Queued - Ready to transmit to vendor.
    Processed - Transmitted to vendor.
    Closed - All Rx's processed.
    Hold - Hold for review.
    Printed - Labels printed by DHCP.
    Rejected - Transmission rejected by vendor system.
    Processing - Transmission is either downloading to the vendor system or
    labels are being printed on the DHCP system.
  • TECHNICAL DESCR:  
    Set of codes.
  • CROSS-REFERENCE:  552.1^AB^MUMPS
    1)= I $G(X)="2" S ^PSX(552.1,"AB",$P(^PSX(552.1,DA,0),U,1),DA)="" K:$P(^PSX(552.1,DA,0),U,4)'="" ^PSX(552.1,"AQ",$P(^PSX(552.1,DA,0),U,4),$P(^PSX(552.1,DA,0),U,1),DA)
    2)= K ^PSX(552.1,"AB",$P(^PSX(552.1,DA,0),U,1),DA)
    This cross reference indicates that the transmission is Queued to send.
  • CROSS-REFERENCE:  552.1^AD^MUMPS
    1)= I $G(X)="1" S ^PSX(552.1,"AD",$P(^PSX(552.1,DA,0),U,1),DA)="" K:$P(^PSX(552.1,DA,0),"^",4)'="" ^PSX(552.1,"AQ",$P(^PSX(552.1,DA,0),"^",4),$P(^PSX(552.1,DA,0),U,1),DA)
    2)= K ^PSX(552.1,"AD",$P(^PSX(552.1,DA,0),U,1),DA)
    This cross reference indicates data is currently being downloaded.
  • CROSS-REFERENCE:  552.1^AE^MUMPS
    1)= I $G(X)="3" S ^PSX(552.1,"AE",$P(^PSX(552.1,DA,0),U,1),DA)="" K:$P(^PSX(552.1,DA,0),U,4)'="" ^PSX(552.1,"AQ",$P(^PSX(552.1,DA,0),U,4),$P(^PSX(552.1,DA,0),U,1),DA)
    2)= K ^PSX(552.1,"AE",$P(^PSX(552.1,DA,0),U,1),DA)
    This cross reference indicates that processing has completed.
  • CROSS-REFERENCE:  552.1^AH^MUMPS
    1)= I $G(X)="5" S ^PSX(552.1,"AH",$P(^PSX(552.1,DA,0),"^",1),DA)="" K:$P(^PSX(552.1,DA,0),U,4)'="" ^PSX(552.1,"AQ",$P(^PSX(552.1,DA,0),U,4),$P(^PSX(552.1,DA,0),U,1),DA)
    2)= K ^PSX(552.1,"AH",$P(^PSX(552.1,DA,0),U,1),DA)
    This cross reference indicates the transmission has been placed in 'Hold' status requiring further review before processing.
2 DIVISION P;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  MAY 29, 1993
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    The outpatient pharmacy division responsible for this transmission.
  • TECHNICAL DESCR:  
    Name field of the Outpatient Site file from the facility.
3 SITE # P;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  MAY 29, 1993
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    The site number of the outpatient pharmacy division responsible for this transmission.
  • TECHNICAL DESCR:  
    The SITE NUMBER field of the Outpatient Site file for the facility.
4 SENDER P;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  MAY 29, 1993
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    The individual responsible for this transmission.
  • TECHNICAL DESCR:  
    Free text name from the New Person file at the facility.
5 TRANSMISSION DT/TM 0;3 DATE

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 29, 1993
  • DESCRIPTION:  
    The date/time the transmission was sent from the facility.
  • TECHNICAL DESCR:  
    Date/time.
6 RECEIVED DT/TM 0;4 DATE

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 06, 1995
  • DESCRIPTION:  
    The date/time the transmission was received and downloaded into the CMOP DATABASE file.
  • TECHNICAL DESCR:  
    Date/time.
  • CROSS-REFERENCE:  552.1^AQ^MUMPS
    1)= S:$P(^PSX(552.1,DA,0),U,2)=2 ^PSX(552.1,"AQ",$P(^PSX(552.1,DA,0),U,4),$P(^PSX(552.1,DA,0),U,1),DA)=""
    2)= K:$P(^PSX(552.1,DA,0),U,2)'=2 ^PSX(552.1,"AQ",$P(^PSX(552.1,DA,0),U,4),$P(^PSX(552.1,DA,0),U,1),DA)
    This cross reference exists if the transmission is 'Queued to Send'.
  • CROSS-REFERENCE:  552.1^AR^MUMPS
    1)= S ^PSX(552.1,"AR",$P(^PSX(552.1,DA,0),U,4),$P(^PSX(552.1,DA,0),U,1),DA)=""
    2)= K ^PSX(552.1,"AR",$P(^PSX(552.1,DA,0),U,4),$P(^PSX(552.1,DA,0),U,1),DA)
    This cross reference exists for all entries in the file and is used for reporting purposes.
7 CLOSED DT/TM 0;5 DATE

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 06, 1995
  • DESCRIPTION:  
    The date/time all processing was completed for this transmission.
  • TECHNICAL DESCR:  
    Date/time.
  • CROSS-REFERENCE:  552.1^AC^MUMPS
    1)= S ^PSX(552.1,"AC",$P(^PSX(552.1,DA,0),U,5),$P(^PSX(552.1,DA,0),U,1),DA)="" K ^PSX(552.1,"AP",$P(^PSX(552.1,DA,0),U,6),$P(^PSX(552.1,DA,0),U,1),DA)
    2)= K:$P(^PSX(552.1,DA,0),"^",2)=4 ^PSX(552.1,"AP",$P(^PSX(552.1,DA,0),"^",6),$P(^PSX(552.1,DA,0),"^",1),DA) K ^PSX(552.1,"AC",$P(^PSX(552.1,DA,0),U,5),$P(^PSX(552.1,DA,0),U,1),DA)
    This cross reference exists for transmissions which have been closed.
8 START SEQ # 1;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 29, 1993
  • HELP-PROMPT:  Type a Number between 1 and 9999999999, 0 Decimal Digits
  • DESCRIPTION:  The beginning message number from the CMOP Rx Queue file.
  • TECHNICAL DESCR:  
    The internal entry number from the facility's CMOP RX QUEUE file.
9 END SEQ # 1;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 29, 1993
  • HELP-PROMPT:  Type a Number between 1 and 9999999999, 0 Decimal Digits
  • DESCRIPTION:  The ending message number from the facility's CMOP Rx Queue file.
  • TECHNICAL DESCR:  
    The internal entry number from the facility's CMOP RX QUEUE file.
10 TOTAL ORDERS 1;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 29, 1993
  • HELP-PROMPT:  Type a Number between 1 and 9999999999, 0 Decimal Digits
  • DESCRIPTION:  
    The total number of patient orders included in this transmission.
  • TECHNICAL DESCR:  
    Number.
11 TOTAL RXS 1;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 29, 1993
  • HELP-PROMPT:  Type a Number between 1 and 9999999999, 0 Decimal Digits
  • DESCRIPTION:  
    The total number of individual prescriptions included in this transmission.
  • TECHNICAL DESCR:  
    Number.
12 RETRANSMISSION 2;1 SET
  • '1' FOR YES;

  • LAST EDITED:  SEP 06, 1995
  • DESCRIPTION:  
    A "1" indicates this is a retransmission of previously sent data.
  • TECHNICAL DESCR:  
    Set of codes.
  • CROSS-REFERENCE:  552.1^ART^MUMPS
    1)= S:$G(X)=1 ^PSX(552.1,"ART",$P($G(^PSX(552.1,DA,2)),"^",2),DA)=""
    2)= K ^PSX(552.1,"ART",$P($G(^PSX(552.1,DA,2)),"^",2),DA)
    This cross reference is set when a retransmitted batch is received.
13 BATCH REFERENCE 2;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  MAY 29, 1993
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    The facility-batch reference number of the original transmission.
  • TECHNICAL DESCR:  
    Facility number "-" Batch number of the original transmission.
14 SITE TEXT S;0 Multiple #552.114 552.114

  • DESCRIPTION:  
    The site specific information required for processing this transmission.
15 COMMENTS 3;0 WORD-PROCESSING #552.115

  • DESCRIPTION:  
    Comments or notes regarding this transmission.
  • TECHNICAL DESCR:  
    Word-Processing.
16 PROCESSED DATE/TIME 0;6 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  FEB 13, 1995
  • DESCRIPTION:  
    This is the date/time when all entries in the data transmission were marked processed.
  • CROSS-REFERENCE:  552.1^AP^MUMPS
    1)= S ^PSX(552.1,"AP",$P(^PSX(552.1,DA,0),U,6),$P(^PSX(552.1,DA,0),U,1),DA)="" K ^PSX(552.1,"AQ",$P(^PSX(552.1,DA,0),U,4),$P(^PSX(552.1,DA,0),U,1),DA)
    2)= K:$P(^PSX(552.1,DA,0),"^",2)=4 ^PSX(552.1,"AP",$P(^PSX(552.1,DA,0),"^",6),$P(^PSX(552.1,DA,0),"^",2),DA)
    This cross reference lists the transmissions that have been processed but not closed.
17 LABELS PRINTED 4;0 DATE Multiple #552.117 552.117

  • DESCRIPTION:  
    The date/time labels were printed by DHCP.
18 ACKNOWLEDGEMENT TEXT ACK;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>245!($L(X)<1) X
  • LAST EDITED:  OCT 22, 1993
  • HELP-PROMPT:  Answer must be 1-245 characters in length.
  • DESCRIPTION:  
    The general acknowledgement message for this data transmission.
19 PURGE STATUS 1;5 SET
  • '1' FOR READY TO PURGE;
  • '2' FOR PURGE COMPLETE;

  • LAST EDITED:  AUG 16, 1994
  • DESCRIPTION:  This status indicates the purge status for the transmission. If the status equals 1, the transmission data in the files is ready to be purged.
    If the status equals 2, the purge of the data has been completed.
  • CROSS-REFERENCE:  552.1^APRG^MUMPS
    1)= S:X=1 ^PSX(552.1,"APRG",DA)=""
    2)= K ^PSX(552.1,"APRG",DA)
    This cross reference exists only if the transmission is ready to purge.
20 PRIORITY 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  FEB 14, 1996
  • HELP-PROMPT:  Type a Number between 1 and 999999, 0 Decimal Digits
  • DESCRIPTION:  
    This field is used to store the priority for download to the vendor. If no priority has been established or the transmission has been downloaded to the vendor, this field will be null.
  • CROSS-REFERENCE:  552.1^APQ^MUMPS
    1)= S:X>0 ^PSX(552.1,"APQ",X,$P(^PSX(552.1,DA,0),"^"),DA)=""
    2)= K ^PSX(552.1,"APQ",X,$P(^PSX(552.1,DA,0),"^"),DA)
    This cross reference will exist if a priority exists for downloading to the vendor.
21 CONTROLLED SUBSTANCE 0;8 SET
  • '0' FOR Non-CS Transmission;
  • '1' FOR CS Transmission;

  • LAST EDITED:  MAY 21, 2002
  • HELP-PROMPT:  Enter a 0 or 1, 1 for Controlled Substances Transmission
  • DESCRIPTION:  
    A 1 indicates that this CMOP batch contains controlled substances.
  • TECHNICAL DESCR:  
    This field is populated by routine PSXRECV. This field should not be edited by users.
  • CROSS-REFERENCE:  552.1^C
    1)= S ^PSX(552.1,"C",$E(X,1,30),DA)=""
    2)= K ^PSX(552.1,"C",$E(X,1,30),DA)
    This cross reference is set when a transmission is downloaded from the medical center. A 1 indicates the transmission is a controlled substance transmission.

External References

Name Field # of Occurrence
^%DT 5+1, 6+1, 7+1, 16+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSX(552.1 - [#552.1] .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 1(XREF 3S), 1(XREF 3K), 1(XREF 4S), 1(XREF 4K)
6(XREF 1S), 6(XREF 1K), 6(XREF 2S), 6(XREF 2K), 7(XREF 1S), 7(XREF 1K), 12(XREF 1S), 12(XREF 1K), 16(XREF 1S), 16(XREF 1K)
19(XREF 1S), 19(XREF 1K), 20(XREF 1S), 20(XREF 1K), 21(XREF 1S), 21(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 5+1*, 6+1*, 7+1*, 16+1*
>> DA .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 1(XREF 3S), 1(XREF 3K), 1(XREF 4S), 1(XREF 4K)
6(XREF 1S), 6(XREF 1K), 6(XREF 2S), 6(XREF 2K), 7(XREF 1S), 7(XREF 1K), 12(XREF 1S), 12(XREF 1K), 16(XREF 1S), 16(XREF 1K)
19(XREF 1S), 19(XREF 1K), 20(XREF 1S), 20(XREF 1K), 21(XREF 1S), 21(XREF 1K)
U 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 1(XREF 3S), 1(XREF 3K), 1(XREF 4S), 1(XREF 4K), 6(XREF 1S), 6(XREF 1K)
6(XREF 2S), 6(XREF 2K), 7(XREF 1S), 7(XREF 1K), 16(XREF 1S)
X .01+1!, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 2S), 1(XREF 3S), 1(XREF 4S), 2+1!, 3+1!, 4+1!
, 5+1*!, 6+1*!, 7+1*!, 8+1!, 9+1!, 10+1!, 11+1!, 12(XREF 1S), 13+1!, 16+1*!
, 18+1!, 19(XREF 1S), 20+1!, 20(XREF 1S), 20(XREF 1K), 21(XREF 1S), 21(XREF 1K)
>> Y 5+1, 6+1, 7+1, 16+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All