โดย suchai » พฤหัสฯ. ม.ค. 04, 2018 11:58 pm
ดูแล้ว คงมีคนอยากได้ Bill to ในใบวางบิล
ผมเลยเข้าไปดูในใบวางบิล อืม.. เอาหมายเหตุ มาทำเป็น Bill to แต่ต้องใส่รหัสเองให้ถูกต้อง โปรแกรมจะนำไปเทียบกับฐานข้อมูลประวัติ หากใส่ผิด มันก็ไม่แสดงอะไรเลย นอกจากรหัสผิด แต่ถ้าใส่ถูกต้อง มันจะแสดง ชื่อ ที่อยู่ แทนรหัสลูกค้า และถ้าลบรายการหมายเหตุให้ว่าง โปรแกรมก็จะกลับไปใช้ รหัสลูกค้าและที่อยู่ลูกค้าปกติ
He: ลูกค้า ~CUSCOD ~TAXIDX เลขที่ใบวางบิล• ~BILNUM
He: ~CUSNAM
He: ~ADDR01 วันที่ ~BILDAT
He: ~ADDR02
He: ~ADDR03 เงื่อนไขการชำระเงิน ~PAYCOND
[relate file]
File=armas
Alias=R
Tag=armas1
System=DATA_PATH
Master file=arbil
Master-Related Field=CUSCOD
File=armasz
Clone From=armas
Alias=S
Tag=armas1
System=DATA_PATH
Master file=arbil
Master-Related Field=SUBSTR(REMARK,1,10)
**~CUSCOD: 0, "", "ARBIL->CUSCOD", ""
~CUSCOD: 0, "", "cus_cod", "cus_cod=IIF(ARBIL->REMARK#' ',ARBIL->REMARK,ARBIL->CUSCOD)"
**~CUSNAM: 0, "", "cus_nam", "cus_nam = ARMAS->PRENAM - '•' - ARMAS->CUSNAM"
~CUSNAM: 0, "", "cus_nam", "cus_nam = IIF(ARBIL->REMARK=' ',ARMAS->PRENAM - '•' - ARMAS->CUSNAM,ARMASZ->PRENAM - '•' - ARMASZ->CUSNAM)"
**~ADDR01: 0, "", "ARMAS->ADDR01", ""
~ADDR01: 0, "", "addr_01", "addr_01=IIF(ARBIL->REMARK=' ',ARMAS->ADDR01,ARMASZ->ADDR01)"
**~ADDR02: 0, "", "ARMAS->ADDR02", ""
~ADDR02: 0, "", "addr_02", "addr_02=IIF(ARBIL->REMARK=' ',ARMAS->ADDR02,ARMASZ->ADDR02)"
**~ADDR03: 0, "", "addr_03", "addr_03 = ARMAS->ADDR03 - '•' - ARMAS->ZIPCOD"
~ADDR03: 0, "", "addr_03", "addr_03 = IIF(ARBIL->REMARK=' ',ARMAS->ADDR03 - '•' - ARMAS->ZIPCOD,ARMASZ->ADDR03 - '•' - ARMASZ->ZIPCOD)"
~TAXIDX: 0, "", "taxidx", "taxidx=IIF(ARBIL->REMARK=' ',ARMAS->TAXID,ARMASZ->TAXID)"
(บรรทัดที่มีเครื่องหมาย ** คือคำสั่งเดิม ที่บอกโปรแกรมว่า ไม่ให้ทำงาน ผมเช็คว่า ถ้าหมายเหตุว่าง ให้ใช้รหัสลูกค้าและรายละเอียดปกติ แต่ถ้าใส่รหัสลูกค้าลงในช่องหมายเหตุถูกต้อง โปรแกรมก็จะเปลี่ยนรหัสและรายละเอียดตามหมายเหตุเอง)
อันนี้เขียนแก้ไขง่ายๆ ไม่ได้ซับซ้อนอะไร ใช้คนในการกรอกฃ่องหมายเหตุเอง หากใส่รหัสผิดๆ เข้าไป จะทำให้เกิดเอกสารที่อาจจะผิดพลาดได้ ไปลองเล่นกันดู