I keep getting the following error:
0 ERROR AT OR NEAR LINE 49 IN PROCEDURE lbinsface2
(FOC012) THE WORD 'FILE' OR THE FILENAME APPEARS TWICE
BYPASSING TO END OF COMMAND
Below is my FEX code:
-SET &TIME=HCNVRT(HGETC(8,'HYYMDm'),'(HMDYYSA)',21,'A21');
DEFINE FILE PRC_INSURANCE_FACE_SHEET
ORDER/A20V=
IF PRC_INSURANCE_FACE_SHEET.ANSWERSET1.LEVEL_NO EQ '1' THEN 'Primary Insurance' ELSE
IF PRC_INSURANCE_FACE_SHEET.ANSWERSET1.LEVEL_NO EQ '2' THEN 'Secondary Insurance' ELSE
IF PRC_INSURANCE_FACE_SHEET.ANSWERSET1.LEVEL_NO EQ '3' THEN 'Tertiary Insurance' ELSE
IF PRC_INSURANCE_FACE_SHEET.ANSWERSET1.LEVEL_NO EQ '4' THEN 'Quaternary Insurance';
DOBCAST/HMDYY=PRC_INSURANCE_FACE_SHEET.ANSWERSET1.BIRTH_DATE;
STARTDATECAST/HMDYY=PRC_INSURANCE_FACE_SHEET.ANSWERSET1.DATE_DIALYSIS_BEGAN;
EFFECTIVEDATECAST/HMDYY=PRC_INSURANCE_FACE_SHEET.ANSWERSET1.COV_EFF_DATE;
EXPDATECAST/HMDYY=PRC_INSURANCE_FACE_SHEET.ANSWERSET1.COV_EXP_DATE;
PHONEFORMAT/A14=EDIT(PRC_INSURANCE_FACE_SHEET.ANSWERSET1.TELEPHONE, '(999) 999-9999');
SSFORMAT/A11=EDIT(PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SOCIAL_SECURITY, '999-99-9999');
END
TABLE FILE PRC_INSURANCE_FACE_SHEET
BY 'PRC_INSURANCE_FACE_SHEET.ANSWERSET1.LEVEL_NO' NOPRINT AS ''
ON PRC_INSURANCE_FACE_SHEET.ANSWERSET1.LEVEL_NO SUBHEAD
"<PRC_INSURANCE_FACE_SHEET.ANSWERSET1.ORDER "
" "
"Plan Name: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PLAN_NAME Certification: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.CERTIFICATION_NUMBER Effective Date: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.EFFECTIVEDATECAST"
"Address: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.CARRIER_ADDRESS_1 Group Number: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.GROUP_NUMBER Ending Date: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.EXPDATECAST"
" <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.CARRIER_ADDRESS_2"
" <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.CARRIER_CITY<PRC_INSURANCE_FACE_SHEET.ANSWERSET1.CARRIER_STATE<PRC_INSURANCE_FACE_SHEET.ANSWERSET1.CARRIER_ZIP_CODE <+0> "
"Insured's Name: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SUBSCRIBER_NAME Insured's Relation: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SUBSCRIBER_RELATION_DESC"
"Insured's Address: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SUBSCRIBER_ADDRESS_1"
" <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SUBSCRIBER_ADDRESS_2 <+0> <+0> <+0> "
" <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SUBSCRIBER_CITY<PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SUBSCRIBER_STATE<PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SUBSCRIBER_ZIP_CODE <+0> "
" <+0> "
ON TABLE SUBHEAD
"Insurance Face Sheet<+0> <+0>DCI Laboratory Division"
" <+0>Printed<+0>&TIME"
HEADING
" "
"Demographics<+0> "
" "
"Patient Name: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PATIENT_NAME Sex: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SEX Race: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.RACE"
"Address: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.ADDRESS Marital Status: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.MARITAL_STATUS"
" <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.ADDRESS_2 <+0> "
"City: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.CITY State: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.STATE Zip: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.ZIP_CODE DOB: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.DOBCAST"
"Phone: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PHONEFORMAT Social Security #: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SSFORMAT Patient ID: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PATIENT_ID"
"Primary Nephrologist: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PHYSICIAN_NAME NPI: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.NPI"
"Primary Diagnosis: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PRIMARY_CAUSE_ESRD<PRC_INSURANCE_FACE_SHEET.ANSWERSET1.NARRATIVE"
"First Dialysis Date: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.STARTDATECAST"
"Patient Type: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PATIENT_TYPE Method: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.TREATMENT_METHOD Status: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PATIENT_STATUS"
" <+0> "
FOOTING
"LBINSFACE"
IF PRC_INSURANCE_FACE_SHEET.INPUT.@PATIENT_ID EQ &@PATIENT_ID
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT PDF
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,
PAGESIZE='Letter',
SQUEEZE=ON,
ORIENTATION=PORTRAIT,
$
...
ENDSTYLE
END
The issue seems to be related to the @PATIENT_ID variable. This is how my launch page passes it:
<![CDATA[TABLE FILE prc_insurance_face_sheet
SUM FST.PRC_INSURANCE_FACE_SHEET.INPUT.@PATIENT_ID
BY PRC_INSURANCE_FACE_SHEET.INPUT.@PATIENT_ID
-*insert_filters_here
ON TABLE PCHOLD FORMAT XML
END
]]>
Any help would be greatly appreciated! Thank you
0 ERROR AT OR NEAR LINE 49 IN PROCEDURE lbinsface2
(FOC012) THE WORD 'FILE' OR THE FILENAME APPEARS TWICE
BYPASSING TO END OF COMMAND
Below is my FEX code:
-SET &TIME=HCNVRT(HGETC(8,'HYYMDm'),'(HMDYYSA)',21,'A21');
DEFINE FILE PRC_INSURANCE_FACE_SHEET
ORDER/A20V=
IF PRC_INSURANCE_FACE_SHEET.ANSWERSET1.LEVEL_NO EQ '1' THEN 'Primary Insurance' ELSE
IF PRC_INSURANCE_FACE_SHEET.ANSWERSET1.LEVEL_NO EQ '2' THEN 'Secondary Insurance' ELSE
IF PRC_INSURANCE_FACE_SHEET.ANSWERSET1.LEVEL_NO EQ '3' THEN 'Tertiary Insurance' ELSE
IF PRC_INSURANCE_FACE_SHEET.ANSWERSET1.LEVEL_NO EQ '4' THEN 'Quaternary Insurance';
DOBCAST/HMDYY=PRC_INSURANCE_FACE_SHEET.ANSWERSET1.BIRTH_DATE;
STARTDATECAST/HMDYY=PRC_INSURANCE_FACE_SHEET.ANSWERSET1.DATE_DIALYSIS_BEGAN;
EFFECTIVEDATECAST/HMDYY=PRC_INSURANCE_FACE_SHEET.ANSWERSET1.COV_EFF_DATE;
EXPDATECAST/HMDYY=PRC_INSURANCE_FACE_SHEET.ANSWERSET1.COV_EXP_DATE;
PHONEFORMAT/A14=EDIT(PRC_INSURANCE_FACE_SHEET.ANSWERSET1.TELEPHONE, '(999) 999-9999');
SSFORMAT/A11=EDIT(PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SOCIAL_SECURITY, '999-99-9999');
END
TABLE FILE PRC_INSURANCE_FACE_SHEET
BY 'PRC_INSURANCE_FACE_SHEET.ANSWERSET1.LEVEL_NO' NOPRINT AS ''
ON PRC_INSURANCE_FACE_SHEET.ANSWERSET1.LEVEL_NO SUBHEAD
"<PRC_INSURANCE_FACE_SHEET.ANSWERSET1.ORDER "
" "
"Plan Name: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PLAN_NAME Certification: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.CERTIFICATION_NUMBER Effective Date: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.EFFECTIVEDATECAST"
"Address: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.CARRIER_ADDRESS_1 Group Number: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.GROUP_NUMBER Ending Date: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.EXPDATECAST"
" <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.CARRIER_ADDRESS_2"
" <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.CARRIER_CITY<PRC_INSURANCE_FACE_SHEET.ANSWERSET1.CARRIER_STATE<PRC_INSURANCE_FACE_SHEET.ANSWERSET1.CARRIER_ZIP_CODE <+0> "
"Insured's Name: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SUBSCRIBER_NAME Insured's Relation: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SUBSCRIBER_RELATION_DESC"
"Insured's Address: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SUBSCRIBER_ADDRESS_1"
" <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SUBSCRIBER_ADDRESS_2 <+0> <+0> <+0> "
" <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SUBSCRIBER_CITY<PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SUBSCRIBER_STATE<PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SUBSCRIBER_ZIP_CODE <+0> "
" <+0> "
ON TABLE SUBHEAD
"Insurance Face Sheet<+0> <+0>DCI Laboratory Division"
" <+0>Printed<+0>&TIME"
HEADING
" "
"Demographics<+0> "
" "
"Patient Name: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PATIENT_NAME Sex: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SEX Race: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.RACE"
"Address: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.ADDRESS Marital Status: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.MARITAL_STATUS"
" <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.ADDRESS_2 <+0> "
"City: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.CITY State: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.STATE Zip: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.ZIP_CODE DOB: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.DOBCAST"
"Phone: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PHONEFORMAT Social Security #: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.SSFORMAT Patient ID: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PATIENT_ID"
"Primary Nephrologist: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PHYSICIAN_NAME NPI: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.NPI"
"Primary Diagnosis: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PRIMARY_CAUSE_ESRD<PRC_INSURANCE_FACE_SHEET.ANSWERSET1.NARRATIVE"
"First Dialysis Date: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.STARTDATECAST"
"Patient Type: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PATIENT_TYPE Method: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.TREATMENT_METHOD Status: <PRC_INSURANCE_FACE_SHEET.ANSWERSET1.PATIENT_STATUS"
" <+0> "
FOOTING
"LBINSFACE"
IF PRC_INSURANCE_FACE_SHEET.INPUT.@PATIENT_ID EQ &@PATIENT_ID
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT PDF
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,
PAGESIZE='Letter',
SQUEEZE=ON,
ORIENTATION=PORTRAIT,
$
...
ENDSTYLE
END
The issue seems to be related to the @PATIENT_ID variable. This is how my launch page passes it:
<![CDATA[TABLE FILE prc_insurance_face_sheet
SUM FST.PRC_INSURANCE_FACE_SHEET.INPUT.@PATIENT_ID
BY PRC_INSURANCE_FACE_SHEET.INPUT.@PATIENT_ID
-*insert_filters_here
ON TABLE PCHOLD FORMAT XML
END
]]>
Any help would be greatly appreciated! Thank you