Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: PSOASAP

PSOASAP.m

Go to the documentation of this file.
  1. PSOASAP ;BIRM/MFR - American Society for Automation in Pharmacy (ASAP) Field Values ;09/30/15
  1. ;;7.0;OUTPATIENT PHARMACY;**451,496,625**;DEC 1997;Build 42
  1. ;
  1. ; *** TH Segment - Transaction Header ***
  1. TH01() ;ASAP Version (3.0, 4.0, 4.1, 4.2, etc.)
  1. Q PSOASVER
  1. ;
  1. TH02() ;ASAP 3.0 : Business Partner Implemetation Version (Not Used)
  1. ; ASAP 4.0+: Transaction Control Number
  1. Q $$TH02^PSOASAP0()
  1. ;
  1. TH03() ;ASAP 3.0 : Transaction Control Number
  1. ; ASAP 4.0+: Transaction Type (Always "01" - Send/Request Transaction)
  1. Q $$TH03^PSOASAP0()
  1. ;
  1. TH04() ;ASAP 3.0 : Transaction Type (Not Used)
  1. ; ASAP 4.0+: Response ID (Not Used)
  1. Q ""
  1. ;
  1. TH05() ;ASAP 3.0 : Message Type (Not Used)
  1. ; ASAP 4.0+: Creation Date (Format: YYYYMMDD)
  1. Q $$TH05^PSOASAP0()
  1. ;
  1. TH06() ;ASAP 3.0 : Response ID (Not Used)
  1. ; ASAP 4.0+: Creation Time. Format: HHMMSS or HHMM
  1. Q $$TH06^PSOASAP0()
  1. ;
  1. TH07() ;ASAP 3.0 : Project ID (Not Used)
  1. ; ASAP 4.0+: File Type. Returns: "T" - Test or "P" - Production
  1. Q $$TH07^PSOASAP0()
  1. ;
  1. TH08() ;ASAP 3.0 : Creation Date (Format: YYYYMMDD)
  1. ; ASAP 4.0 : Composite Element Separator (:)
  1. ; ASAP 4.1+: Routing Number (Real-time transactions only)(Not Used)
  1. Q $$TH08^PSOASAP0()
  1. ;
  1. TH09() ;ASAP 3.0 : Creation Time. Format: HHMMSS or HHMM
  1. ; ASAP 4.0+: Segment Terminator Character
  1. Q $$TH09^PSOASAP0()
  1. ;
  1. TH10() ;ASAP 3.0 : File Type
  1. ; ASAP 4.0+: N/A
  1. Q $$TH10^PSOASAP0()
  1. ;
  1. TH11() ;ASAP 3.0 : Message (Not Used)
  1. ; ASAP 4.0+: N/A
  1. Q ""
  1. ;
  1. TH12() ;ASAP 3.0 : Composite Element Separator
  1. ; ASAP 4.0+: N/A
  1. Q $$TH12^PSOASAP0()
  1. ;
  1. TH13() ;ASAP 3.0 : Data Segment Terminator Character
  1. ; ASAP 4.0+: N/A
  1. Q $$TH13^PSOASAP0()
  1. ;
  1. ; *** IS Segment - Information Source ***
  1. IS01() ; Unique Information Source ID
  1. Q ("VA"_+$$SITE^VASITE())
  1. ;
  1. IS02() ; Information Source Entity Name
  1. Q $$GET1^DIQ(4,+$$SITE^VASITE,100)
  1. ;
  1. IS03() ;ASAP 3.0 : Address Information 1 (Not Used)
  1. ; ASAP 4.0+: Message (Not Used)
  1. ; ZERO RPT 4.0+: Date Range of Report
  1. N BEGDATE,ENDDATE,RANGE
  1. S (BEGDATE,ENDDATE,RANGE)=""
  1. I $G(BATCHIEN),$$GET1^DIQ(58.42,BATCHIEN,2,"I")="ZR" D Q RANGE
  1. . S BEGDATE=$$FMTHL7^XLFDT($$GET1^DIQ(58.42,BATCHIEN,4,"I")\1)
  1. . S ENDDATE=$$FMTHL7^XLFDT($$GET1^DIQ(58.42,BATCHIEN,5,"I")\1)
  1. . S RANGE="#"_BEGDATE_"#-#"_ENDDATE_"#"
  1. Q ""
  1. ;
  1. IS04() ;ASAP 3.0 : Address Information 2 (Not Used)
  1. ; ASAP 4.0+: N/A
  1. Q ""
  1. ;
  1. IS05() ;ASAP 3.0 : City Address (Not Used)
  1. ; ASAP 4.0+: N/A
  1. Q ""
  1. ;
  1. IS06() ;ASAP 3.0 : State Address (Not Used)
  1. ; ASAP 4.0+: N/A
  1. Q ""
  1. ;
  1. IS07() ;ASAP 3.0 : Zip code Address (Not Used)
  1. ; ASAP 4.0+: N/A
  1. Q ""
  1. ;
  1. IS08() ;ASAP 3.0 : Phone Number (Not Used)
  1. ; ASAP 4.0+: N/A
  1. Q ""
  1. ;
  1. IS09() ;ASAP 3.0 : Contact Name (Not Used)
  1. ; ASAP 4.0+: N/A
  1. Q ""
  1. ;
  1. IS10() ;ASAP 3.0 : Message (Not Used)
  1. ; ASAP 4.0+: N/A
  1. Q ""
  1. ;
  1. IS11() ;ASAP 3.0 : Data Entry Terminal ID (Not Used)
  1. ; ASAP 4.0+: N/A
  1. Q ""
  1. ;
  1. ; *** IR Segment - Information Receiver (ASAP 3.0 only) ***
  1. IR01() ; Unique Information Receiver ID
  1. Q ("VA"_+$$SITE^VASITE())
  1. ;
  1. IR02() ; Information Receiver Entity Name
  1. Q $$GET1^DIQ(5,STATEIEN,.01)_" PMP PROGRAM"
  1. ;
  1. IR03() ;Address Information 1 (Not Used)
  1. Q ""
  1. ;
  1. IR04() ;Address Information 2 (Not Used)
  1. Q ""
  1. ;
  1. IR05() ;City Address (Not Used)
  1. Q ""
  1. ;
  1. IR06() ;State Address (Not Used)
  1. Q ""
  1. ;
  1. IR07() ;Zip code Address (Not Used)
  1. Q ""
  1. ;
  1. IR08() ;Phone Number (Not Used)
  1. Q ""
  1. ;
  1. IR09() ;Contact Name (Not Used)
  1. Q ""
  1. ;
  1. IR10() ;Message (Not Used)
  1. Q ""
  1. ;
  1. ; *** PHA Segment - Pharmacy Header ***
  1. PHA01() ; National Provider Identifier (NPI)
  1. Q $$PHA01^PSOASAP0()
  1. ;
  1. PHA02() ;NCPDP/NABP Provider ID
  1. Q $$GET1^DIQ(59,SITEIEN,1008)
  1. ;
  1. PHA03() ;Pharmacy DEA Number
  1. Q $$PHA03^PSOASAP0()
  1. ;
  1. PHA04() ;Pharmacy Name
  1. Q $$GET1^DIQ(59,SITEIEN,.01)
  1. ;
  1. PHA05() ;Pharmacy Address Information - Line 1
  1. Q $$TRIM^XLFSTR($$GET1^DIQ(59,SITEIEN,.02))
  1. ;
  1. PHA06() ; Pharmacy Address Information - Line 2 (Not Used)
  1. Q ""
  1. ;
  1. PHA07() ;Pharmacy City Address
  1. Q $$GET1^DIQ(59,SITEIEN,.07)
  1. ;
  1. PHA08() ;Pharmacy State Address
  1. Q $$GET1^DIQ(5,STATEIEN,1)
  1. ;
  1. PHA09() ;Pharmacy ZIP Code
  1. Q $$NUMERIC^PSOASAP0($$GET1^DIQ(59,SITEIEN,.05))
  1. ;
  1. PHA10() ;Phone Number
  1. Q $$PHA10^PSOASAP0()
  1. ;
  1. PHA11() ;Pharmacy Contact name (Not Used)
  1. Q ""
  1. ;
  1. PHA12() ;Pharmacy Chain Site ID (Not Used)
  1. Q ""
  1. ;
  1. PHA13() ;Message (Not Used)
  1. Q ""
  1. ;
  1. ; *** PAT Segment - Patient Information ***
  1. PAT01() ; ASAP 3.0 : Not Used
  1. ; ASAP 4.0+: ID Qualifier of Patient Identifier (Always "US" - United States)
  1. I PSOASVER="3.0" Q ""
  1. Q "US"
  1. ;
  1. PAT02() ;ID Qualifier (Always "07" - Social Security Number)
  1. Q "07"
  1. ;
  1. PAT03() ;ASAP 3.0 : Unique System ID - Patient (Not Used)
  1. ; ASAP 4.0+: ID of Patient (SSN)
  1. Q $$PAT03^PSOASAP0()
  1. ;
  1. PAT04() ;ASAP 3.0 : SSN
  1. ; ASAP 4.0+: ID Qualifier of Additional Patient Identifier (Not Used)
  1. Q $$PAT04^PSOASAP0()
  1. ;
  1. PAT05() ;Additional Patient ID Qualifier (Not Used)
  1. Q ""
  1. ;
  1. PAT06() ;Additional ID (Not Used)
  1. Q ""
  1. ;
  1. PAT07() ;Patient Last Name
  1. Q PSONAME("LAST")
  1. ;
  1. PAT08() ;Patient First Name
  1. Q PSONAME("FIRST")
  1. ;
  1. PAT09() ;Patient Middle Name or Initial
  1. Q PSONAME("MIDDLE")
  1. ;
  1. PAT10() ;Name Prefix
  1. Q PSONAME("PREFIX")
  1. ;
  1. PAT11() ;Name Suffix
  1. Q PSONAME("SUFFIX")
  1. ;
  1. PAT12() ;Patient Address Information - Line 1
  1. Q $$PAT12^PSOASAP0()
  1. ;
  1. PAT13() ;Patient Address Information - Line 2
  1. Q $$PAT13^PSOASAP0()
  1. ;
  1. PAT14() ;Patient City Address
  1. Q $P($G(VAPA(4)),"^",1)
  1. ;
  1. PAT15() ;Patient State Address
  1. Q $$PAT15^PSOASAP0()
  1. ;
  1. PAT16() ;Patient ZIP Code
  1. Q $$PAT16^PSOASAP0()
  1. ;
  1. PAT17() ;Patient Phone Number
  1. Q $$PAT17^PSOASAP0()
  1. ;
  1. PAT18() ;ASAP 3.0 : Email Address (Not Used)
  1. ; ASAP 4.0+: Patient DOB
  1. Q $$PAT18^PSOASAP0()
  1. ;
  1. PAT19() ;ASAP 3.0 : Patient DOB
  1. ; ASAP 4.0+: Patient Gender Code
  1. Q $$PAT19^PSOASAP0()
  1. ;
  1. PAT20() ;ASAP 3.0 : Patient Gender Code
  1. ; ASAP 4.0+: Species Code (Always return "01" for 'Human')
  1. Q $$PAT20^PSOASAP0()
  1. ;
  1. PAT21() ;Patient Location Code (Always return "10" for 'Outpatient')
  1. Q "10"
  1. ;
  1. PAT22() ;ASAP 3.0 : Primary Prescription Coverage Type (Not Used)
  1. ; ASAP 4.0+:Country of Non-U.S. Resident
  1. Q $$PAT22^PSOASAP0()
  1. ;
  1. PAT23() ;ASAP 3.0: Secondary Prescription Coverage Type (Not Used)
  1. Q ""
  1. ;
  1. PAT24() ;ASAP 3.0: Language Code (Not Used)
  1. Q ""
  1. ;
  1. PAT25() ;ASAP 3.0: Work Phone Number (Not Used)
  1. Q ""
  1. ;
  1. PAT26() ;ASAP 3.0: Alternate Phone Number (Not Used)
  1. Q ""
  1. ;
  1. PAT27() ;ASAP 3.0: Drivers License Number
  1. Q ""
  1. ;
  1. PAT28() ;ASAP 3.0: Facility Code (Not Used)
  1. Q ""
  1. ;
  1. PAT29() ;ASAP 3.0: Unit Identifier (Not Used)
  1. Q ""
  1. ;
  1. PAT30() ;ASAP 3.0: Room Number (Not Used)
  1. Q ""
  1. ;
  1. PAT31() ;ASAP 3.0: Bed (Not Used)
  1. Q ""
  1. ;
  1. PAT32() ;ASAP 3.0: Medical Record Number (Not Used)
  1. Q ""
  1. ;
  1. PAT33() ;ASAP 3.0: Admission Date (Not Used)
  1. Q ""
  1. ;
  1. PAT34() ;ASAP 3.0: Admission Time (Not Used)
  1. Q ""
  1. ;
  1. PAT35() ;ASAP 3.0: Discharge Date (Not Used)
  1. Q ""
  1. ;
  1. PAT36() ;ASAP 3.0: Discharge Time (Not Used)
  1. Q ""
  1. ;
  1. PAT37() ;ASAP 3.0: Primary Coverage Start Date (Not Used)
  1. Q ""
  1. ;
  1. PAT38() ;ASAP 3.0: Not Used
  1. Q ""
  1. ;
  1. PAT39() ;ASAP 3.0: Secondary Coverage Start Date (Not Used)
  1. Q ""
  1. ;
  1. PAT40() ;ASAP 3.0: Secondary Coverage Stop Date (Not Used)
  1. Q ""
  1. ;
  1. ; *** RX Segment - Prescription Order (ASAP 3.0 only) ***
  1. RX01() ;Reporting Status ("01" - Add / "02" - Change / "03" - Delete)
  1. Q $S($G(RECTYPE)="N":"01",$G(RECTYPE)="R":"02",$G(RECTYPE)="V":"03",1:"")
  1. ;
  1. RX02() ;Program Participation Status (Not Used)
  1. Q ""
  1. ;
  1. RX03() ;Prescription Number
  1. Q $$GET1^DIQ(52,+$G(RXIEN),.01)
  1. ;
  1. RX04() ;Unique System ID() - RPh (Not Used)
  1. Q ""
  1. ;
  1. RX05() ;Unique System ID() - Patient (Not Used)
  1. Q ""
  1. ;
  1. RX06() ;Unique System ID() - Prescriber (Not Used)
  1. Q ""
  1. ;
  1. RX07() ;Unique System ID() - Drug (Not Used)
  1. Q ""
  1. ;
  1. RX08() ;Date Rx Written (Format: YYYYMMDD)
  1. Q $$RX08^PSOASAP0()
  1. ;
  1. RX09() ;RX Start Date (Not Used)
  1. Q ""
  1. ;
  1. RX10() ;RX End Date (Not Used)
  1. Q ""
  1. ;
  1. RX11() ;Diagnosis Code Qualifier
  1. Q ""
  1. ;
  1. RX12() ;Diagnosis Code
  1. Q ""
  1. ;
  1. RX13() ;Product ID Qualifier (Always return "01" for 'NDC')
  1. Q "01"
  1. ;
  1. RX14() ;Product ID (NDC - National Drug Code)
  1. Q $$RX14^PSOASAP0()
  1. ;
  1. RX15() ;Product Description (Not Used)
  1. Q ""
  1. ;
  1. RX16() ;DAW Code (Not Used)
  1. Q ""
  1. ;
  1. RX17() ;Quantity Dispensed
  1. Q $S(RECTYPE="V":$G(RTSDATA("QTY")),1:$$RXQTY^PSOBPSUT(RXIEN,FILLNUM))
  1. ;
  1. RX18() ;Days Supply
  1. Q $S(RECTYPE="V":$G(RTSDATA("DAYSUP")),1:$$RXDAYSUP^PSOBPSUT(RXIEN,FILLNUM))
  1. ;
  1. RX19() ;Basis of Days Supply Determination (Not Used)
  1. Q ""
  1. ;
  1. RX20() ;Refills Authorized
  1. Q +$$GET1^DIQ(52,+$G(RXIEN),9)
  1. ;
  1. RX21() ;Refills Authorized Through Date (Not Used)
  1. Q ""
  1. ;
  1. RX22() ;DEA Schedule (Not Used)
  1. Q ""
  1. ;
  1. RX23() ;Unit Dose Indicator (Not Used)
  1. Q ""
  1. ;
  1. RX24() ;Compound Indicator (Not Used)
  1. Q ""
  1. ;
  1. RX25() ;Origin Code (Not Used)
  1. Q ""
  1. ;
  1. RX26() ;Brand Versus Generic Indicator (Not Used)
  1. Q ""
  1. ;
  1. RX27() ;Original Fill Date (Not Used)
  1. Q ""
  1. ;
  1. RX28() ;AlternateRX Identifier (Not Used)
  1. Q ""
  1. ;
  1. RX29() ;Previous RX Number (Not Used)
  1. Q ""
  1. ;
  1. ; *** DSP Segment - Dispensing Record ***
  1. DSP01() ;ASAP 3.0 : Reporting Status ("01" - Add / "02" - Change / "03" - Delete)
  1. ; ASAP 4.0 : Reporting Status ("" - New / "01" - Revise / "02" - Void)
  1. ; ASAP 4.1+: Reporting Status ("00" - New / "01" - Revise / "02" - Void)
  1. Q $$DSP01^PSOASAP0()
  1. ;
  1. DSP02() ;ASAP 3.0 : Program Participation Status (Not Used)
  1. ; ASAP 4.0+: Prescription Number (Not Used by ASAP 3.0)
  1. Q $$DSP02^PSOASAP0()
  1. ;
  1. DSP03() ;ASAP 3.0 : Prescription Number
  1. ; ASAP 4.0+: Date Rx Written (Format: YYYYMMDD)
  1. Q $$DSP03^PSOASAP0()
  1. ;
  1. DSP04() ;ASAP 3.0 : Refill Number
  1. ; ASAP 4.0+: Refills Authorized
  1. Q $$DSP04^PSOASAP0()
  1. ;
  1. DSP05() ;ASAP 3.0 : Unique System ID - RPh (Not Used)
  1. ; ASAP 4.0+: Date Filled (Release Date) (Format: YYYYMMDD)
  1. Q $$DSP05^PSOASAP0()
  1. ;
  1. DSP06() ;ASAP 3.0 : ;Unique System ID - Patient (Not Used)
  1. ; ASAP 4.0+: Refill Number (Partials are always "0")
  1. Q $$DSP06^PSOASAP0()
  1. ;
  1. DSP07() ;ASAP 3.0 : ;Unique System ID - Prescriber (Not Used)
  1. ; ASAP 4.0+: Product ID Qualifier (Always return "01" for 'NDC')
  1. Q $$DSP07^PSOASAP0()
  1. ;
  1. DSP08() ;Product ID (NDC - National Drug Code) (ASAP 3.0: Not Used)
  1. Q $$DSP08^PSOASAP0()
  1. ;
  1. DSP09() ;ASAP 3.0: Date Filled
  1. ; ASAP 4.0+: Quantity Dispensed
  1. Q $$DSP09^PSOASAP0()
  1. ;
  1. DSP10() ;Days Supply
  1. Q $$DSP10^PSOASAP0()
  1. ;
  1. DSP11() ;ASAP 3.0 : Product ID Qualifier (01:NDC)
  1. ; ASAP 4.0+: Drug Dosage Units Code
  1. Q $$DSP11^PSOASAP0()
  1. ;
  1. DSP12() ;ASAP 3.0: Product ID (NDC)
  1. ; ASAP 4.0+: Transmission Form of Rx Origin Code (Nature of Order)
  1. Q $$DSP12^PSOASAP0()
  1. ;
  1. DSP13() ;ASAP 3.0 : Product Description (Not Used)
  1. ; ASAP 4.0+: Partial Fill Indicator
  1. Q $$DSP13^PSOASAP0()
  1. ;
  1. DSP14() ;ASAP 3.0 : Quantity Dispensed
  1. ; ASAP 4.0+: Pharmacist National Provider Identifier (NPI)
  1. Q $$DSP14^PSOASAP0()
  1. ;
  1. DSP15() ;ASAP 3.0 : Days Supply
  1. ; ASAP 4.0+: Pharmacist State License Number (Not Used)
  1. Q $$DSP15^PSOASAP0()
  1. ;
  1. DSP16() ;ASAP 3.0 : Basis of Days Supply Determiniation (Always "3" for 'As directed by doctor')
  1. ; ASAP 4.0+: Classification Code for Payment Type (Always return "05" for 'Military Installations and VA')
  1. Q $$DSP16^PSOASAP0()
  1. ;
  1. DSP17() ;ASAP 3.0 : Refills Remaining (Not Used)
  1. ; ASAP 4.0 : N/A (up to DSP16 only)
  1. ; ASAP 4.1+: Date Sold
  1. Q $$DSP17^PSOASAP0()
  1. ;
  1. DSP18() ;ASAP 3.0: Refills Authorized Through Date (Not Used)
  1. ; ASAP 4.1: RxNorm Code (Not Used)
  1. ; ASAP 4.2: RxNorm Product Qualifier (Not Used)
  1. Q ""
  1. ;
  1. DSP19() ;ASAP 3.0: Previous Fill Date (Not Used)
  1. ; ASAP 4.1: Electronic Prescription Reference Number (Not Used)
  1. ; ASAP 4.2: RxNorm Code (Not Used)
  1. Q ""
  1. ;
  1. DSP20() ;ASAP 3.0: Previous Fill Quantity Dispensed (Not Used)
  1. ; ASAP 4.2: Electronic Prescription Reference Number (Not Used)
  1. Q ""
  1. ;
  1. DSP21() ;ASAP 3.0: Level of Service Code (Not Used)
  1. ; ASAP 4.2: Electronic Prescription Order Number (Not Used)
  1. Q ""
  1. ;
  1. DSP22() ;ASAP 3.0: Brand or Generic Indicator (Not Used)
  1. Q ""
  1. ;
  1. DSP23() ;ASAP 3.0: Patient Advisory Leaflet (Not Used)
  1. Q ""
  1. ;
  1. DSP24() ;ASAP 3.0: Warning/Auxiliary Labels (Not Used)
  1. Q ""
  1. ;
  1. DSP25() ;ASAP 3.0: Warning/Auxiliary Labels (Not Used)
  1. Q ""
  1. ;
  1. DSP26() ;ASAP 3.0: Warning/Auxiliary Labels (Not Used)
  1. Q ""
  1. ;
  1. DSP27() ;ASAP 3.0: Warning/Auxiliary Labels (Not Used)
  1. Q ""
  1. ;
  1. DSP28() ;ASAP 3.0: Warning/Auxiliary Labels (Not Used)
  1. Q ""
  1. ;
  1. DSP29() ;ASAP 3.0: Bar Code on Vial Label (Not Used)
  1. Q ""
  1. ;
  1. DSP30() ;ASAP 3.0: Group Identifier (Not Used)
  1. Q ""
  1. ;
  1. DSP31() ;ASAP 3.0: Group Rx Count (Not Used)
  1. Q ""
  1. ;
  1. DSP32() ;ASAP 3.0: Partial Fill Indicator (Not Used)
  1. Q ""
  1. ;
  1. DSP33() ;ASAP 3.0: Priority (Not Used)
  1. Q ""
  1. ;
  1. ; *** PRE Segment - Prescriber Information ***
  1. PRE01() ;ASAP 3.0 : Not Used
  1. ; ASAP 4.0+: Prescriber National Provider Identifier (NPI)
  1. Q $$PRE01^PSOASAP0()
  1. ;
  1. PRE02() ; Prescriber DEA Number
  1. Q $$PRE02^PSOASAP0()
  1. ;
  1. PRE03() ;ASAP 3.0 : Prescriber NPI
  1. ; ASAP 4.0+: Prescriber DEA Number Suffix
  1. Q $$PRE03^PSOASAP0()
  1. ;
  1. PRE04() ;ASAP 3.0 : Prescriber DEA Number
  1. ; ASAP 4.0+: Prescriber State License Number (Not Used)
  1. Q $$PRE04^PSOASAP0()
  1. ;
  1. PRE05() ;ASAP 3.0 : Prescriber DEA Number Suffix
  1. ; ASAP 4.0+: Prescriber Last Name
  1. Q $$PRE05^PSOASAP0()
  1. ;
  1. PRE06() ;ASAP 3.0 : Prescriber State Lince Number (Not Used)
  1. ; ASAP 4.0+: Prescriber First Name
  1. Q $$PRE06^PSOASAP0()
  1. ;
  1. PRE07() ;ASAP 3.0 : Prescriber Alternate ID (Not Used)
  1. ; ASAP 4.0+: Prescriber Middle Name
  1. Q $$PRE07^PSOASAP0()
  1. ;
  1. PRE08() ;ASAP 3.0 : Prescriber's Last Name
  1. ; ASAP 4.0 & 4.1: N/A (Up to PRE07 only)
  1. ; ASAP 4.2: Prescriber's Phone Number
  1. Q $$PRE08^PSOASAP0()
  1. ;
  1. PRE09() ;ASAP 3.0: Prescriber' First Name
  1. Q $$PRE09^PSOASAP0()
  1. ;
  1. PRE10() ;ASAP 3.0: Prescriber' Middle Name
  1. Q $$PRE10^PSOASAP0()
  1. ;
  1. PRE11() ;ASAP 3.0: Name Prefix (Not Used)
  1. Q ""
  1. ;
  1. PRE12() ;ASAP 3.0: Name Suffix (Not Used)
  1. Q ""
  1. ;
  1. PRE13() ;ASAP 3.0: Address Information - 1 (Not Used)
  1. Q ""
  1. ;
  1. PRE14() ;ASAP 3.0: Address Information - 2 (Not Used)
  1. Q ""
  1. ;
  1. PRE15() ;ASAP 3.0: City Address (Not Used)
  1. Q ""
  1. ;
  1. PRE16() ;ASAP 3.0: State Address (Not Used)
  1. Q ""
  1. ;
  1. PRE17() ;ASAP 3.0: Zip Code Address (Not Used)
  1. Q ""
  1. ;
  1. PRE18() ;ASAP 3.0: Phone Number (Not Used)
  1. Q ""
  1. ;
  1. PRE19() ;ASAP 3.0: Prescriber Specialty (Not Used)
  1. Q ""
  1. ;
  1. PRE20() ;ASAP 3.0: Prescriber Fax Number (Not Used)
  1. Q ""
  1. ;
  1. ; *** CDI Segment - Compound Drug Ingredient Detail ***
  1. CDI01() ;Compound Drug Ingredient Sequence Number (Not Used)
  1. Q ""
  1. ;
  1. CDI02() ;Product ID Qualifier (Not Used)
  1. Q ""
  1. ;
  1. CDI03() ;Product ID (Not Used)
  1. Q ""
  1. ;
  1. CDI04() ;Component Ingredient Product Description (Not Used)
  1. Q ""
  1. ;
  1. CDI05() ;Component Ingredient Quantity (Not Used)
  1. Q ""
  1. ;
  1. CDI06() ;ASAP 3.0: Component Ingredient Cost (Not Used)
  1. Q ""
  1. ;
  1. CDI07() ;ASAP 3.0: Component Ingredient Basis of Cost Determination (Not Used)
  1. Q ""
  1. ;
  1. CDI08() ;ASAP 3.0: Compound Drug Dosage Units Code (Not Used)
  1. Q ""
  1. ;
  1. ; *** CSR Segment - Controlled Substance Reporting (ASAP 3.0 only) ***
  1. CSR01() ;State Issuing Rx Serial Number (Not Used)
  1. Q ""
  1. ;
  1. CSR02() ;State Issued Rx Serial Number (Not Used)
  1. Q ""
  1. ;
  1. CSR03() ;ID Qualifier (Not Used)
  1. Q ""
  1. ;
  1. CSR04() ;ID of Person Picking Up Rx (Not Used)
  1. Q ""
  1. ;
  1. CSR05() ;Relationship of Person Picking Up Rx (Not Used)
  1. Q ""
  1. ;
  1. CSR06() ;Last Name of Person Picking Up Rx (Not Used)
  1. Q ""
  1. ;
  1. CSR07() ;First Name of Person Picking Up Rx (Not Used)
  1. Q ""
  1. ;
  1. ; *** AIR Segment - Additional Information Reporting (Not Used by ASAP 3.0) ***
  1. AIR01() ;State Issuing Rx Serial Number (Not Used)
  1. Q ""
  1. ;
  1. AIR02() ;State Issued Rx Serial Number (Not Used)
  1. Q ""
  1. ;
  1. AIR03() ;Issuing Jurisdiction (Not Used)
  1. Q ""
  1. ;
  1. AIR04() ;ID Qualifier of Person Dropping Off or Picking Up Rx (Not Used)
  1. Q ""
  1. ;
  1. AIR05() ;ID of Person Dropping Off or Picking Up Rx (Not Used)
  1. Q ""
  1. ;
  1. AIR06() ;Relationship of Person Dropping Off or Picking Up Rx (Not Used)
  1. Q ""
  1. ;
  1. AIR07() ;Last Name of Person Dropping Off or Picking Up Rx (Not Used)
  1. Q ""
  1. ;
  1. AIR08() ;First Name of Person Dropping Off or Picking Up Rx (Not Used)
  1. Q ""
  1. ;
  1. AIR09() ;Last Name or Initials of Pharmacist (Not Used)
  1. Q ""
  1. ;
  1. AIR10() ;First Name of Pharmacist (Not Used)
  1. Q ""
  1. ;
  1. AIR11() ;ASAP 4.2: Dropping Off/Picking Up Identifier Qualifier
  1. Q ""
  1. ;
  1. ; *** RPH Segment - Pharmacist Information (ASAP 3.0 Only) ***
  1. RPH01() ;Reporting Status (Not Used)
  1. Q ""
  1. ;
  1. RPH02() ;Unique System ID (Not Used)
  1. Q ""
  1. ;
  1. RPH03() ;National Provider Identification (NPI)
  1. Q $$RPH03^PSOASAP0()
  1. ;
  1. RPH04() ;Pharmacist State License Number (Not Used)
  1. Q ""
  1. ;
  1. RPH05() ;Pharmacist Alternate ID (Not Used)
  1. Q ""
  1. ;
  1. RPH06() ;Pharmacist Last Name
  1. Q $$RPH06^PSOASAP0()
  1. ;
  1. RPH07() ;Pharmacist First Name
  1. Q $$RPH07^PSOASAP0()
  1. ;
  1. RPH08() ;Pharmacist Middle Name
  1. Q $$RPH08^PSOASAP0()
  1. ;
  1. RPH09() ;Name Prefix (Not Used)
  1. Q ""
  1. ;
  1. RPH10() ;Name Suffix (Not Used)
  1. Q ""
  1. ;
  1. RPH11() ;Pharmacist Title (Not Used)
  1. Q ""
  1. ;
  1. ; *** PLN Segment - Third-Party Plan (ASAP 3.0 Only) ***
  1. PLN01() ;Reporting Status (Not Used)
  1. Q ""
  1. ;
  1. PLN02() ;Plan Coverage Status to Patient (Not Used)
  1. Q ""
  1. ;
  1. PLN03() ;Unique System ID - Plan (Not Used)
  1. Q ""
  1. ;
  1. PLN04() ;Classification Code for Plan Type (Not Used)
  1. Q ""
  1. ;
  1. PLN05() ;Plan Name (Not Used)
  1. Q ""
  1. ;
  1. PLN06() ;Processor BIN (Not Used)
  1. Q ""
  1. ;
  1. PLN07() ;Processor Control Number (Not Used)
  1. Q ""
  1. ;
  1. PLN08() ;Plan ID (Not Used)
  1. Q ""
  1. ;
  1. PLN09() ;Group Number (Not Used)
  1. Q ""
  1. ;
  1. PLN10() ;Cardholder ID (Not Used)
  1. Q ""
  1. ;
  1. PLN11() ;Person Code (Not Used)
  1. Q ""
  1. ;
  1. PLN12() ;Relationship Code (Not Used)
  1. Q ""
  1. ;
  1. ; *** TP Segment - Pharmacy Trailer ***
  1. TP01() ;Detail Segment Count
  1. Q PSOTPCNT
 ;
 ; *** TT Segment - Transaction Set Trailer ***
TT01() ;Transaction Control Number
 ;      ASAP 3.0 : Same as TH03
 ;      ASAP 4.0+: Same as TH02
 Q $$TT01^PSOASAP0()
 ;
TT02() ;Segment Count
 Q $G(PSOTTCNT)